Как сделать добавление слов к тексту

@korol1337228 · Регистрация: 06.01.2016

Студворк — интернет-сервис помощи студентам

Проблема следующая -->

Я долго думал как лучше придумать вам задачку которая мне даст ответ на мой вопрос.
Вообщем,нужен код для программы у которой есть 3 чек бокса и 1 текст.Мне нужно чтобы При выборе чек боксов менялся текст.
Например: если был вбыран 1 текст бокс,то в тексте появилась надпись текст бокс 1- выбран, также с другими.
Как это сделать?
Прошу объяснить свой код, а не просто его скинуть.Заранее огромное спасибо!

SoftIce · 27.01.2016, 10:52

Одновременно может быть выбран только один чекбокс? Тогда Вам нужны OptionButton-ы, они же RadioButton-ы.

SoftIce · 27.01.2016, 11:01

Сообщение от korol1337228

Прошу объяснить свой код, а не просто его скинут

Не знаю, что тут может быть непонятно

Visual Basic
1
2
3
4
'При клике на OptionButton изменяется надпись в TextBox-e
Private Sub Option1_Click(Index As Integer)
     Text1.Text = Choose(Index, "Первый", "Второй", "Третий")
End Sub

@korol1337228 · 27.01.2016, 19:06 **[ТС]**

SoftIce, Это и я могу сделать :3)))
Вопрос другой!

Нет, не 1! Нужно так! Например выбранно 2 чекбокса и нужно чтобы в тексте написало что выбран 1 и 2.И так должно быть с любыми!

@Pro_grammer · 27.01.2016, 19:43

Сообщение от korol1337228

Например выбранно 2 чекбокса и нужно чтобы в тексте написало что выбран 1 и 2.И так должно быть с любыми!

Точно не понял, что надо, может это?

@korol1337228 · 10.02.2016, 21:48 **[ТС]**

Pro_grammer, В точку,таки код в студию пожулйста!)

@Pro_grammer · 11.02.2016, 06:49

Сообщение от korol1337228

код в студию пожулйста!)

Я уже и забыл, что там за код был

ну как то так:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
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

Check1 это 3 копии в режиме array

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

@korol1337228 4 / 4 / 0 Регистрация: 06.01.2016 Сообщений: 209

	Как сделать добавление слов к тексту 27.01.2016, 10:21. Показов 1293. Ответов 6 Метки нет (Все метки) Проблема следующая --> Я долго думал как лучше придумать вам задачку которая мне даст ответ на мой вопрос. Вообщем,нужен код для программы у которой есть 3 чек бокса и 1 текст.Мне нужно чтобы При выборе чек боксов менялся текст. Например: если был вбыран 1 текст бокс,то в тексте появилась надпись текст бокс 1- выбран, также с другими. Как это сделать? Прошу объяснить свой код, а не просто его скинуть.Заранее огромное спасибо! 0

SoftIce es geht mir gut 11274 / 4760 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	27.01.2016, 10:52
	Одновременно может быть выбран только один чекбокс? Тогда Вам нужны OptionButton-ы, они же RadioButton-ы. 0

@korol1337228 4 / 4 / 0 Регистрация: 06.01.2016 Сообщений: 209
	27.01.2016, 19:06 [ТС]
	SoftIce, Это и я могу сделать :3))) Вопрос другой! Нет, не 1! Нужно так! Например выбранно 2 чекбокса и нужно чтобы в тексте написало что выбран 1 и 2.И так должно быть с любыми! 0

@korol1337228 4 / 4 / 0 Регистрация: 06.01.2016 Сообщений: 209
	10.02.2016, 21:48 [ТС]
	Pro_grammer, В точку,таки код в студию пожулйста!) 0

Как сделать добавление слов к тексту

Решение