Если честно, то я хотела дать эту тему позже, намного позже. Не потому, что она какая-то сложная, а просто чтобы не разбивать последовательность уроков по управляющим структурам. Но с другой стороны, выполнение тех заданий, которые мы с Dusk-ом решили для вас приготовить на сегодня, требует того, чтобы вы эту тему знали. Думаю, что не произойдет ничего из ряда вон выходящего, если мы разберем эту тему сегодня, вы с ее помощью сделаете задание на использование структуры if…else…, а после этого мы продолжим изучение управляющих структур.

Итак. Познакомимся с простейшими из диалоговых окон: с окнами сообщения и окнами ввода.



Иначе говоря- MessageBox. Выглядит примерно так:


  Чтобы это окно появилось в вашей программе, можно вызвать с помощью функции MsgBox.
  Синтаксис: (кто не знаком с условными обозначениями, скажем, что такие скобки [] обозначают необязательные параметры функции, они могут быть, а могут и не быть, функция будет работать и при их отсутствии.

  MsgBox (prompt [, buttons] [, title] [, helpfile, context])





А сделать это можно двумя способами:

  MsgBox “Народ, привет!” , vbYesNo+vbExclamation, “Окно сообщений”

  или

  Call MsgBox (“Народ, привет!” , vbYesNo+vbExclamation, “Окно сообщений”)

  Чем эти строки отличаются друг от друга, разберем позже. Пока запомните- если вы заключаете параметры в скобки, обязательно в начале строки поставьте Call. Или такое выражение можно присвоить соответствующий переменной, но об этом опять же- позже. Что получится в данном случае: при соответствующем событии в обработку которого вы включите эту строку, будет вызвано окно сообщений в котором будет написано «Народ, привет!», будут кнопки Да, Нет, картинка с восклицательным знаком, а в строке заголовка над всей этой радостью будет написано «Окно сообщений».



Часто в диалоговом окне необходимо не только нажать кнопки выбора действия, но и ввести определенную информацию в программу. Для этого в VB можно использовать окно ввода информации InputBox .

  Синтаксис:

  InputBox (prompt [,title] [,default] [,xpos] [,ypos] [,helpfile, context])


   В окне InputBox есть всегда только 2 кнопки управления:OK и Cancel.













   Для первых двух уровней этой программы можно было использовать только те свойства, которые вы уже выучили на предыдущих уроках. Для третьего уровня вы должны познакомиться с функцией Round(). Она округляет до целого аргумент функции. Эта функция понадобится для выполнения задания третьего уровня сложности. Теперь- само задание 3-го уровня.

При изменении размеров формы должно происходить следующее:




  Для этого вам понадобится :

  функция Len()-она определяет длину строки. которая вводится как аргумент данной функции. Поскольку мы еще не учили свойства текстовых полей, Скажем, что вводится в текстовое поле ВСЕГДА имеет тип String, т.е. всегда является строкой, независимо от того буквы вы туда ввели или цифры. А получить строку, введенную в текстовое поле можно с помощью свойства Text. Например, если ваше текстовое поле называется txt, то длину введенной в него строки можно измерить с помощью функции Len() так:

  Len(txt.Text)