Страницы: 1
RSS
VBA Как очистить форму.
 
Добрый вечер уважаемые форумчане .
На форме имеется несколько TextBox и ComboBox а точнее в перспективе их будет гораздо больше.
Интересует вопрос как очистить одним нажатием кнопки все поля, не закрывая форму.
 
.Value=""
 
.Value="" Каждому полю присваивать?
 
Я по-другому не умею, делаю так - каждому
Код
 Me.ComboBox1.Value = ""
  Me.TextBox1.Value = ""
 
Если полей немного - очистка каждого. Если много, можно чистить в цикле.
 
Код
Private Sub CommandButton1_Click()
Dim c As Control
For Each c In Controls
  Select Case TypeName(c)
  Case "TextBox", "ComboBox":    c = ""
  End Select
Next
End Sub
-это если в цикле
 
Апострофф,Спасибо!
Страницы: 1
Читают тему
Наверх