REFRESH NO FORM DO VB6.0

DIONISIO 02/02/2013 09:30:30
#418632
BOM DIA PARA TODOS, ALGUEM PODE ME AJUDAR? TEM ALGUM COMANDO PARA VOCE LIMPAR TODOS OS CAMPOS DE UM FORM? TIPO FIZ TUDO QUE TINHA QUE FAZER NO FORM E DA UM REFRESH?
OMAR2011 02/02/2013 09:59:47
#418634 Resposta escolhida
Quanto ao [txt-color=#e80000]Textbox[/txt-color] limpa todas as caixas .
Eu entendi isto.
Valeu.
Sub Limpar()
For Each controle In Me.Controls
If TypeOf controle Is TextBox Then controle.Text = [Ô][Ô]
Next
End Sub
DIONISIO 02/02/2013 13:30:52
#418639
Citação:

:
Quanto ao [txt-color=#e80000]Textbox[/txt-color] limpa todas as caixas .
Eu entendi isto.
Valeu.
Sub Limpar()
For Each controle In Me.Controls
If TypeOf controle Is TextBox Then controle.Text = [Ô][Ô]
Next
End Sub

Citação:

:
BOM DIA PARA TODOS, ALGUEM PODE ME AJUDAR? TEM ALGUM COMANDO PARA VOCE LIMPAR TODOS OS CAMPOS DE UM FORM? TIPO FIZ TUDO QUE TINHA QUE FAZER NO FORM E DA UM REFRESH?




CARO AMIGO, VALEU PELA AJUDA, SE QU QUIZER LIMPAR OS CONTROLES, TIPO CHECK, OPTION LISTBOX, COMBOX??
OMAR2011 02/02/2013 16:07:41
#418647
Verifica.

Sub Limpar()
For Each controle In Me.Controls
If TypeOf controle Is TextBox Then controle.Text = [Ô][Ô]
If TypeOf controle Is CheckBox Then controle.Value = False
If TypeOf controle Is OptionButton Then controle.Value = False
If TypeOf controle Is ComboBox Then controle.Text = [Ô][Ô]
[ô]If TypeOf controle Is ComboBox Then controle.Clear
If TypeOf controle Is ListBox Then controle.Clear
Next
End Sub
Tópico encerrado , respostas não são mais permitidas
Voltar