Изменение регистра символов строки
Функция Ucase() преобразует буквы исходной строки в большие буквы (верхнего регистра)
Функция Lcase() преобразует буквы исходной строки в маленькие буквы (нижнего регистра)
StrResult = Ucase(MyString)
StrResult = Lcase(MyString)
Функции преобразования
Преобразование типа данных переменной означает преобразование ее значения из одного типа в другой. VB большую часть работы по преобразованию типов данных делает автоматически, но иногда требуется вручную изменять тип данных, чтобы получить нужный результат. Для этого существуют специальные функции преобразования. Вот некоторые из них:
CCur() преобразует значение в тип Currency CCur(“25,98р.”)
CDate() преобразует выражение с датой в тип Date CDate(“1 дек 1995”)
CInt() преобразует значение в тип Integer CInt(“8”)
CStr() преобразует значение в тип String CStr(MyInt%)
Проверка данных с помощью функции IsNumeric()
Эта функция принимает строку и выясняет, может ли она представлять собой число. Если это число, то функция возвращает значение true, иначе – false.
Result = IsNumeric(MyString)
Пример:
Форма:
Код (проанализировать программу, при необходимости – набрать и проверить работу)
Private Sub Command1_Click()
If IsNumeric(Text1.Text) And IsNumeric(Text2.Text) Then
MsgBox "Это числа", vbInformation, "Проверка"
Else
MsgBox "Это строки", vbInformation, "Проверка"
End If
End Sub
Private Sub Command2_Click()
On Error GoTo er
Text3.Text = CInt(Text1.Text) + CInt(Text2.Text)
Text4.Text = Text1.Text + Text2.Text
er:
If Err.Number = 13 Then
MsgBox "Одно или оба данных невозможно привести к целому типу", vbInformation, "Error"
End If
End Sub
Создание меню
Редактор меню (Menu Editor) позволяет легко создавать строки меню, расположенные в верхней части формы, и редактировать уже созданные меню.
Создание простого меню:
Откройте новый проект.
Откройте редактор меню, щелкнув по кнопке
стандартной панели инструментов:
Перемещает выбранный пункт на один уровень вложенности вверх (в сторону главного меню)
Перемещает выбранный пункт на один уровень вложенности вниз. Допускается 4 уровня вложенности меню
Перемещает выбранный пункт в списке меню на одну позицию вверх, сохраняя неизменным уровень вложенности.
Перемещает выбранный пункт в списке меню на одну позицию вниз, сохраняя неизменным уровень вложенности
Список всех пунктов меню. Пункты с отступом представляют подменю
Выбор комбинации клавиш для вызова пункта меню
Название пункта меню
Имя пункта меню
Свойство Checked помещает флажок перед названием соответствующего пункта меню
Свойство Enabled определяет доступность элемента меню. Если равно false, то строка будет отображена затемненной.
Кнопка Next позволяет добавить новые пункты меню с текущим уровнем вложенности (выбранного пункта)
Кнопка Insert позволяет добавить новый пункт меню над выбранным пунктом.
Кнопка Delete позволяет удалить выбранный пункт меню.
В появившемся диалоговом окне редактора меню наберите &File в поле Caption и mnuFile в поле Name. Щелкните на кнопке Next.
Щелкните на кнопке со стрелкой вправо. Эта кнопка позволяет сделать отступ в списке меню.
Наберите E&xit в поле Caption и itmExit – в поле Name. Посмотрите, установлен ли флажок Enabled и Visible. Если нет – установите.
Щелкните на кнопке ОК.
Только что созданное Вами меню вставлено в форму. Раскройте меню File и щелкните раз на пункте Exit. При этом появится окно редактирования кода, открытое на процедуре обработки события itmExit_Click().
Добавьте оператор Unload Me (выгрузить текущую форму)в процедуру обработки события.
Запустите программу.