0 / 0 / 0
Регистрация: 27.03.2018
Сообщений: 107
1

Очистка содержимого контролов

16.08.2019, 13:58. Показов 491. Ответов 6
Метки нет (Все метки)

На форме большое количество текстбоксов и комбобоксов. Впроцессе выполнения программы им задаются значения.
Кнопка CLEAR должна очистить их все. Как можно сделать это не прописывая кучу раз в теле кнопки textbox(n).text=""
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.08.2019, 13:58
Ответы с готовыми решениями:

Связь для содержимого двух контролов
Всем привет! Мужики, помогите решить задачу. В RTB1 есть список строк. В каждой новой строке...

Очистка содержимого DataGrid или запись в нее с нуля
Доброго времени суток! Подскажите пожалуйста, как полностью очистить содержимое DataGridView?...

Очистка содержимого WebBrowser
Можно ли как-то очищать данный компонент? Я точно знаю, что это не Clear, но может есть способ? И...

Очистка содержимого файла
Не могу разобраться (: Пишу программу чтобы удаляла содержимое текстового документа ( именно...

6
128 / 107 / 24
Регистрация: 11.07.2017
Сообщений: 274
16.08.2019, 14:23 2
Yur1S, для всех текстбоксов
VB.NET
1
2
3
4
5
6
        For Each ctrl As Control In Me.Controls
            If TypeName(ctrl) = "TextBox" Then
                ctrl.Text = ""
            End If
 
        Next
Добавлено через 1 минуту
С комбобоксами аналогично.
0
1003 / 774 / 178
Регистрация: 26.06.2017
Сообщений: 1,933
16.08.2019, 14:25 3
VB.NET
1
2
3
4
5
6
7
For Each ctr As Control In Me.Controls
    If ctr.GetType() Is GetType(TextBox) Then
        CType(ctr, TextBox).Text = ""
    ElseIf ctr.GetType() Is GetType(ComboBox) Then
        CType(ctr, ComboBox).Text = ""
    End If
Next ctr
вместо Me поставь имя формы.

Добавлено через 1 минуту

Не по теме:

на минуту опоздал

0
4003 / 3195 / 770
Регистрация: 02.02.2013
Сообщений: 3,065
Записей в блоге: 2
16.08.2019, 14:42 4
Если Control размещен в контейнере (контейнере контейнеров), то предложенные варианты не будут работать. Более общий код.
VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Clear_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Dim ctl As Control = Me.GetNextControl(Me, True)
    Do Until ctl Is Nothing
        If TypeOf ctl Is TextBox Then ctl.Text = ""
        If TypeOf ctl Is ComboBox Then
            Dim cb As ComboBox = CType(ctl, ComboBox)
            cb.Items.Clear()
            cb.Text = ""
        End If
        ctl = Me.GetNextControl(ctl, True)
    Loop
End Sub
2
250 / 202 / 52
Регистрация: 01.08.2016
Сообщений: 775
16.08.2019, 14:52 5
Uswer, Если комбобоксы очищать полностью то так надо:
VB.NET
1
2
3
4
5
6
For Each ctrl2 As Control In Me.Controls
            If TypeName(ctrl2) = "ComboBox" Then
                CType(ctrl2, ComboBox).Items.Clear()
            End If
 
        Next
0
1003 / 774 / 178
Регистрация: 26.06.2017
Сообщений: 1,933
16.08.2019, 16:35 6
Парни, про очистку списков комбобоксов у ТСа задача не обозначалась!
0
250 / 202 / 52
Регистрация: 01.08.2016
Сообщений: 775
16.08.2019, 17:02 7
Uswer,
Цитата Сообщение от Yur1S Посмотреть сообщение
Кнопка CLEAR должна очистить их все
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.08.2019, 17:02

Очистка содержимого QWidget
Доброе время ! Я рисую в Qwidjet Qpaineter'ом по кнопке но не знаю как очищать widget перед новым...

Очистка содержимого структуры
Приветствую. Есть структура: type tAllFields = packed record Account: string; Bik:...

Очистка содержимого Image
Всем доброго времени суток. Кто может подсказать как можно очистить Image? Нужно т.к. если загоняю...

Очистка содержимого DbGrid
Нужен код, с помощью которого, через кнопку очищалась полностью таблица dbgrid.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru