Dicas do OsmarJr

Fazer ciclo por controles com o mesmo nome


Tenho um conjunto de controles em um formulário, com nomes como txtTextBox1, txtTextBox2, txtTextBox3 até txtTextBox10. Como fazer referência aos campos em um único loop em lugar de explicitar Me!txtTextBox1, Me!txtTextBox2, etc?

Autor: Dev Hashish

Em formulários e relatórios podemos referenciar um controle passando uma string para o objeto. Por exemplo, o código abaixo imprime o conteúdo de todos estes campos na Janela de depuração:

'***** Início do Código*******
Dim i As Integer
    For i = 1 To 10
        Debug.Print Me("txtTextBox" & i).Value
    Next i '***** Final do Código ********


Dê uma olhada neste artigo.

Home

Contato | Copyright©Osmar José Correia Júnior | 24-Nov-2005 18:23
Hosted by www.Geocities.ws

1