Загрузить PDF
Загрузить PDF
Из этой статьи вы узнаете, как написать простую программу на Visual Basic, чтобы вычислить сумму двух чисел. Для запуска программы понадобится компилятор Visual Basic, такой как Visual Studio 2017.
Шаги
-
Откройте редактор Visual Basic. Чтобы позже протестировать написанный код, убедитесь, что у вас есть программа, в которой можно отладить код (например, Visual Basic 2017).
- Если у вас нет редактора Visual Basic, используйте Notepad++ или скачайте Visual Basic 2017 .
-
Введите первую строку кода. Введите Private Class Form1 в редакторе Visual Basic, а затем нажмите ↵ Enter . Эта строка определяет следующие строки кода.
- Тег «Private Class» в Visual Basic аналогичен тегу <html> в HTML.
-
Задайте переменные. Чтобы найти сумму, нужно сложить два целых числа, поэтому необходимо сделать так, чтобы Visual Basic распознал числа как переменные. Для этого:
- Введите Private Sub Button1_Click(sender As Object, e As EventArgs) и нажмите ↵ Enter .
- Введите Handle(Button1_Click) и нажмите ↵ Enter .
- Введите Dim sum As Integer и нажмите ↵ Enter .
- Введите Dim a As Integer и нажмите ↵ Enter .
- Введите Dim b As Integer и нажмите ↵ Enter .
-
Задайте исключения для пустых полей. В этом случае программа выдаст ошибку, если какое-то число не будет введено. Для этого:
- Введите Label4.Visible = True и нажмите ↵ Enter .
- Введите If TextBox1.Text = "" Then и нажмите ↵ Enter .
- Введите Label4.Visible = False и нажмите ↵ Enter .
- Введите MessageBox.Show("Извините, поле не может быть пустым.") и нажмите ↵ Enter .
- Введите TextBox1.Focus() и нажмите ↵ Enter .
- Введите End If и нажмите ↵ Enter .
-
Создайте текстовые поля, в которые будут вводиться числа. Для этого:
- Введите a = Val(TextBox1.Text) и нажмите ↵ Enter .
- Введите b = Val(TextBox2.Text) и нажмите ↵ Enter .
- Введите sum = (a + b) и нажмите ↵ Enter .
- Введите Label4.Text = "Сумма" & a & " и " & b & " равна " & sum & "." и нажмите ↵ Enter .
-
Закройте раздел нажатия кнопок. Введите End Sub и нажмите ↵ Enter .
-
Создайте новый раздел. Введите Private Sub Form1_Load(sender As Object, e as EventArgs) Handles MyBase.Load и нажмите ↵ Enter .
-
Введите теги «false» и «label». Введите Label4.Visible = False , нажмите ↵ Enter , затем введите End Sub и нажмите ↵ Enter .
-
Создайте последний раздел. Введите Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click и нажмите ↵ Enter .
-
Добавьте ссылки на текстовые поля. Это позволит добавить числа в готовой программе. Для этого:
- Введите TextBox1.Text = "" и нажмите ↵ Enter .
- Введите TextBox2.Text = "" и нажмите ↵ Enter .
- Введите Label4.Text = "" и нажмите ↵ Enter .
- Введите TextBox1.Focus() и нажмите ↵ Enter .
-
Создайте команду для сложения чисел. Введите Sum = Val(TextBox1.Text) + Val(TextBox2.Text) и нажмите ↵ Enter .
-
Введите команду «sum». Введите TextBox3.Text = Sum и нажмите ↵ Enter .
-
Закройте код. Введите End Sub и нажмите ↵ Enter , чтобы закрыть последний раздел, а затем введите End Class , чтобы закрыть всю программу.
-
Отладьте программу. Перейдите на вкладку «Debug» (Отладка), нажмите «Start Debugging» (Начать отладку) и дождитесь, когда отладка завершится. Как только программа будет полностью отлажена, откроется окно с тремя текстовыми полями и кнопкой; теперь введите числа в верхние два поля и нажмите кнопку, чтобы сложить числа.
- Если код создан в простом текстовом редакторе, вкладки «Отладка» не будет. В этом случае откройте написанный код в Visual Studio 2017, чтобы отладить и запустить его.
- Если код написан в Notepad или TextEdit, сохраните файл в формате «.vb», а не «.txt» или «.text».
Реклама
Советы
- Visual Studio 2017 можно скачать бесплатно на сайте Microsoft.
- В Блокноте или TextEdit разные разделы кода можно помечать с помощью отступов, чтобы легче ориентироваться в коде.
Реклама
Предупреждения
- Visual Basic не чувствителен к регистру, но попробуйте использовать заглавные буквы там, где указано в приведенном здесь коде.
Реклама
Об этой статье
Эту страницу просматривали 14 288 раз.
Реклама