З цієї статті ви дізнаєтеся, як написати просту програму на 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 аналогічний тегу &#Lt; html &#gt; у 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 = " сума "&#amp; A &#amp; " і "&#amp; b &#amp; "дорівнює" &#amp; sum &#amp; "." і натисніть ↵ 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 не чутливий до регістру, але спробуйте використовувати великі літери там, де вказано в наведеному тут коді.
