Ввод данных при помощи текстовых полей
Переменным присваиваются значения текстовых полей
strNameTov = txtNameTov.Text
intKolTov = txtKolTov.Text
dblCenaTov = txtCena.Text
Переменной присваивается значение, рассчитанное по формуле
dblSumma = intKolTov * dblCenaTov
Способы вывода данных
Оператор Print.
Оператор Print выводит результат вычисления, значения переменных, любую текстовую информацию.
Примеры:
1) Вывод значения переменных в окне Немедленный:
Debug.Print a,b,c
Debug.Print y+200
Debug.Print «Пройденный путь=»; P; «км»
Вывод информации на форме
Print “a+b”a+b
Print “3+2=”; 3+23+2=5
Вывод информации в текстовом поле
Вывод результата в текстовом поле с 2-мя знаками после запятой
txtPremiya.Text = "Сумма премии, причитающаяся _ каждому студенту =" & Format(dblRazmPrem, "0.00")
Форматирование результатов
Чтобы значение переменной в результате вычислений выводилось как целое число, необходимо при объявлении этой переменной использовать тип Integer(5) или Long(10): Dim a As Integer
Чтобы значения переменных в результате вычислений выводились как десятичные дроби , необходимо при объявлении этих переменных использовать тип Single(7) или Double(15): Dim a As Single (Результат вычисления 100,7866 )
Для вывода переменной в нужном нам формате можно вместо переменной (например Y) написать Format(Y,”0.0000”)
Например:
txtPremiya.Text = "Сумма премии, причитающаяся _ каждому студенту =" & Format(dblRazmPrem, "0.00")
Или
Print “ Сумма премии равна”;
Print Format(dblRazmPrem,”0.00”)
СОЗДАНИЕ ПРОСТОГО ВЫЧИСЛИТЕЛЬНОГО ПРОЕКТА
1. Порядок создания простого приложения.
2. Пошаговый режим выполнения программы.
3. Функции в VB. Функции Val и Str.
Порядок создания простого приложения.
Задача. Даны размеры спичечной коробки. Вычислить её объём.
1) Записываем формулы для расчета.
Площадь основания = ширина* толщину;
Объём = Площадь основания * высоту.
2) Придумываем имена переменным:
W- ширина H - высота
F- толщина V- объём
S- площадь основания
3) Определяем какого типа будут переменные. Поскольку заранее неизвестно, будут ли переменные целыми, объявляем переменные Double
4) Решаем, каким способом будем задавать исходные данные (при помощи текстовых полей или функции InputBox) и выводить результаты. В соответствии с этим на форме размещаем управляющие элементы и задаём их свойства.
5) В области объявления переменных на уровне модуля пишем строки, объявляющие переменные.
6) В процедуре кнопки пишем строки для ввода исходных данных, формулы, и строки для вывода результатов вычисления.
Функции в VISUAL BASIC
Функции | Синтаксис |
Абсолютное значение числа | Abs(число) |
Целая часть числа(дробная отбрасывается) | Fix(число) |
Наиболее целое число,не превышающее выражение в скобках | Int(число) |
Округление до целых | Round(число) |
Округление до N знаков после запятой | Round (число,N) |
Знак числа | Sgr(число) |
Тангенс | Tan(число) |
Арктангенс | Atn(число) |
Косинус | Cos(число) |
Синус | Sin(число) |
Экспонента | Exp(число) |
Квадратный корень | Sqr(число) |
Натуральный логарифм | Log(число) |
Случайное число от 0…..i | Rnd(число) |
Функции Val и Str.
Поля TextBox при вводе хранят данные символьного типа,если эти данные участвуют в вычислениях, необходимо преобразовать их в числа, с помощью функции Val
'Преобразование данных считанных из текстовых полей в числовые
X = Val(Text1)
Для вывода результатов, вычисленных в числовом формате в текстовые поля преобразуем их в символы, применив функцию преобразования форматов Str.
'Вывод результатов
Label10.Caption = Str(C)
ПРОГРАММИРОВАНИЕ ВЕТВЛЕНИЙ
1.Понятие ветвящегося процесса
2.Линейная конструкция условного оператора If
3.Блочная конструкция условного оператора If
4.Оператор Select Case
5.Оператор безусловного перехода
Понятие ветвящегося процесса
Ветвящимся называется такой процесс,в котором имеются два или более параллельных путей решения.
Например,вычисление функции Y=f(x):
Здесь может быть одно из двух решений
Выбор (ветвление) в Visual Basic осуществляют в основном 3 оператора:
· условный переход IF...THEN...ELSE
· множественный выбор (переключатели) SELECT CASE
· безусловный переход GOTO
Линейная конструкция условного оператора If