Страница 4 из 4
Private Sub Command1_Click()
программный код …
End Sub
Запуск программы для отладки выполняется щелчком по кнопке Start панели инструментов или через меню RUN (Start) или клавишей F5. Для выхода из программы можно использовать кнопку панели инструментов: End или закрыть окно программы. Имеются мощные графические отладчики, позволяющие находить и устранять ошибки в коде программ. Можно установить точки останова, щелчком справа от оператора текста программы, проверить ход программы, при помощи пошагового Debug выполнения. Для компиляции созданного приложения необходимо зайти в меню File, сохранить предварительно проект Save Project As, выбрав маршрут и указав имена файлов формы и проекта и затем в меню File выбрать Make ….EXE. Синтаксис языка Visual BASIC имеет некоторые отличия, но во многом совпадает с синтаксисом GWBasic.
Данные языка Visual BASIC
Комментарий в тексте программы начинается знаком апостроф (‘).
КОНСТАНТЫ объявляются в программе с помощью оператора Const, за которым через запятую перечисляются имена величин с их значениями, например: Const M=4,N=3 и т.д.
Оператор Dim объявляет тип переменных, например:
Dim My_Name As String
Dim Tel As String*9 (девять символов содержит переменная Tel)
Dim I As Integer ,J As Integer
Dim K As Double, A As Single
Оператор DIM также объявляет массивы, например:
Dim My_Mass(40) As String
Dim Mass1!(1 To 40)
Dim Mass2(1 To 30) As Double
ИНДЕКСЫ массива – целые выражения, принимающие положительные значения. Минимальное значение равно 0.
Массив с двумя индексами: Dim Ocenka(1 To 5, 1 To 20) As Integer
Удалить из памяти массивы можно оператором Erase с указанием через запятую списка имен массивов.
Для включения возможности изменения размеров массива их объявляют оператором ReDim и в диапазоне индексов можно указать имена переменных, значения которых, например, при решении ввести через текстовые поля. Чтобы при переопределении массива старые значения не были потеряны можно использовать оператор описания в виде: ReDim Preserve .
В случае, если обозначение типа данного отсутствует, то идентификатору присваивается тип Variant – произвольный. Основные обозначения: % -целые (Integer), например: Atip%, от -32768 до 32767, ! -вещественные (Single) от 1.41Е-45 до 3.4Е-38, # -двойной точности (Double) от 4.95Е-324 до 1.79Е-308, $ -символьные (String), обрамляются кавычками.
Для определения переменных используется оператор ПРИСВАИВАНИЯ:
V=A(4)
Itog_sceta=Itog_sceta+Ocenka(I,J)
C= А(6)+В
Ввод вывод данных
Для ввода данных может использоваться элемент текстовое поле (TextBox). Он может быть установлен на экранную форму. Оператор присваивания позволяет считать данные введенные с клавиатуры: A=Dlina.Text , где Dlina это имя поля (Name).
Считывание: В=InputBox("Комментарий","Заголовок окна","Начальное значение") позволяет вводить данные с помощью специального "окна ввода".
Данные можно выбрать из заранее подготовленного или заполняемого при решении задачи "окна списка". Например: Х=ИмяОкнаСписка.List(N).
Для ввода из файла используется оператор ОТКРЫТИЯ ФАЙЛА: OPEN.
Open "A1.TXT" For Input As #K
Открывается файл с именем A1 и расширением TXT, номер его К, затем из файла вводятся данные с помощью оператора Input #K,R переменная R. Оператор Line Input используется для ввода данных из файла построчно.
Оператор ЗАКРЫТИЯ файла: CLOSE #K закрывает открытый #К файл. Для вывода в файл используется оператор с записью ( For Output ) и затем (Print #K, … или Write #K, …).
Вывод на форму осуществляется оператором ВЫВОДА: PRINT со списком выводимых переменных.
Для слитного вывода в ряд числовых значений с комментарием используется разделение точкой с запятой между переменными.
Print “РЕЗУЛЬТАТ А и В =”,A;B
для раздельного вывода по столбцам, запятая:
Print C,D
Оператор PRINT без списка данных выполняет перевод строки.
Функция TAB производит форматирование вывода.
Print Tab(5),X
Перед выводом числа Х будет пропущено 5 пробелов. Функция TAB часто используется для построения графиков или таблиц.
Результат может быть показан в установленном "текстовом поле", например: ИмяПоля.Text=Y.
Нестандартные функции и процедуры
Одно из проявлений модульного принципа построения программ это использование собственных функций и процедур.
Повторяющиеся в программе арифметические выражения, можно представить в виде оператора функции и соответствующей процедуры.
Для описания функции используется например описание:
Public Function AA(A As Single,B As Single,C As Single) As Double
P=(A+B+C)/2
AA=Int(Sqr(P*A*B*C)
End Function
где AA– имя или идентификатор функции, в скобках список ФОРМАЛЬНЫХ ПАРАМЕТРОВ ( имена фиктивных переменных фактических значений, которые должны быть вычислены к моменту выполнения функции, если их несколько, то все они перечисляются через запятую). внутри блока вид описываемой функции. В результате работы блока возвращается вычисленное значение АА. Функции как и процедуры могут быть локальными: Private и глобальными: Public.
Процедура отличается от функции тем, что она возвращает значения переменных описанных в списке параметров, например:
Вызов процедуры: Call ИмяПроцедуры(СписокПараметров)
можно записать без скобок и ключевого слова Call , список параметров это переменные через запятую. ИмяПроцедуры СписокПараметров . Сама процедура имеет описание:
Public Sub ИмяПроцедуры(СписокПараметров)
и операторы для обработки данных или вычислений
End Sub
Cписок параметров это входные или выходные параметры процедуры. Процедура может обращаться к самой себе (рекурсивная).
Некоторые особые стандартные функции
Rnd = случайное число из диапазона 0 – 1 (r!=Rnd) (Для генерации псевдослучайных чисел используется оператор Randomize N, где N любое число, или Randomize Timer старт от счетчика времени).
Fix(X) – отбрасывает числа после запятой;
Сint(X) – определяет наибольшее целое, не превосходящее аргумент;
Int(X) – округляет значение до ближайшего целого;
Sgn(X) – определяет знак аргумента и присваивает результату значение -1, если знак аргумента отрицательный, 0, если аргумент равен нулю, и 1 , если положительный.
Val(X$) – преобразование цифровой строки в цифровое значение;
Str(X) – преобразование цифрового значения в текстовую строку, содержащую цифры;
Len(Х$) – возвращает длину строки;
Mid(Cтрока$,Позиция&,Длина&) – в строке выделяется подстрока с позиции заданной длиной;
Asc(Cтрока$) – преобразовывает строку в код ASCII первого символа строки;
Chr(Код&) – преобразует код в строку из одного символа.
InputBox(Приглашение,Заголовок,Начальное значение) – ввод данных с помощью окна ввода;
MsgBox(Текст,Вид значка,Заголовок окна) – вывод окна предупреждения (Вид значка: критическое сообщение=16, вопрос=32, предупреждение=48, информация=64; добавление к этому числу 0 означает кнопка ОК, 1 – это две кнопки: ОК и Отмена, 2 – Стоп, Повтор, Пропустить, 3 – Да, Нет, Отмена, 4 – Да, Нет, 5 – Повтор, Отмена); Функция возвращает значения: 1=ОК, 2=Отмена, 3=Стоп, 4=Повтор, 5=Пропустить, 6=Да, 7=Нет.
Конец ознакомительного фрагмента.
Текст предоставлен ООО «ЛитРес».
Прочитайте эту книгу целиком, купив полную легальную версию на ЛитРес.
Безопасно оплатить книгу можно банковской картой Visa, MasterCard, Maestro, со счета мобильного телефона, с платежного терминала, в салоне МТС или Связной, через PayPal, WebMoney, Яндекс.Деньги, QIWI Кошелек, бонусными картами или другим удобным Вам способом.