MsgBox, InputBox

В программах встречается много диалоговых окон. Они используются для того, чтобы вывести сообщение об ошибке, результаты вычислений, полезные советы или предупреждения. С помощью диалогового окна можно получить подтверждение на выполнение некоторого действия, например на удаление файла. Для этого в диалоговом окне предусмотрены различные кнопки: OK, Cancel, Yes, No.Окна сообщений можно выводить с помощью функций из класса MessageBox. С помощью команды MsgBox (англ. message box: ящик сообщения) получают окно, в котором просто стоит текст, и в котором можно видеть некоторые иконки. Пример:MsgBox("Hello World"). Для функции MsgBox надо указывать 3 параметра: текст сообщения, константу, определяющую вид кнопок и пиктограмм, и заголовок диалогового окна. Функция InputBox— это совместно используемый элемент из класса Microsoft.VisualBasic. Interaction. Также как MsgBox, данную функцию можно вызывать напрямую, без указания иерархии класса.

InputBox("Enter your name")

Пользовательская функция

Пользовательские процедуры. Группы операторов, создаваемые разработчиком для выполнения определенных задач и не зависящие от текущего состояния приложения или произошедших в тот или иной момент событий. Пользовательские функции. Группы операторов, аналогичные пользовательским процедурам. Пользовательские процедуры обычно используются при необходимости выполнения одной и тоже последовательности операций.

Локальная и глобальная функции использующие локальные и глобальные переменные

Если переменная объявлена в процедуре, она является переменной уровня процедуры, т.е. локальной (private) для этой процедуры. Если переменная должна использоваться во многих процедурах данного модуля, она должна быть также объявлена как локальная, но ее объявление следует вынести за пределы всех процедур или функций. Если переменная должна использоваться в других моделях и классах, то ее следует определить как глобальную (public).

Пример определения пользовательской функции «Площадь треугольника» на языке VB 6.

Private Function Square(base As Single, height As Single)


Square = base/2*height

End Function