Как сделать добавление слов к тексту - VB
Формулировка задачи:
Проблема следующая -->
Я долго думал как лучше придумать вам задачку которая мне даст ответ на мой вопрос.
Вообщем,нужен код для программы у которой есть 3 чек бокса и 1 текст.Мне нужно чтобы При выборе чек боксов менялся текст.
Например: если был вбыран 1 текст бокс,то в тексте появилась надпись текст бокс 1- выбран, также с другими.
Как это сделать?
Прошу объяснить свой код, а не просто его скинуть.Заранее огромное спасибо!
Решение задачи: «Как сделать добавление слов к тексту»
textual
Листинг программы
Option Explicit Dim Check1Txt As String, Check3Txt As String, Check2Txt As String Private Sub Check1_Click(Index As Integer) If Check1(0).Value = 1 Then Check1Txt = "Выбран Check1" Else Check1Txt = "" End If If Check1(1).Value = 1 Then Check2Txt = "Выбран Check2" Else Check2Txt = "" End If If Check1(2).Value = 1 Then Check3Txt = "Выбран Check3" Else Check3Txt = "" End If Text1.Text = Check1Txt & Check2Txt & Check3Txt End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д