Gostaria de saber como faço para mudar o caption de um botão usando uma consulta.
Ao entrar no formulario o botão pegaria o caption da consulta que gera o formulario baseado no codigo do campo nome.
Ex.
codigo-------nome
01------------eu
02------------tu
03------------eles
04------------vos

Tenho 5 botões um debaixo do outro, eles devem ter o caption preenchidos com os dados da coluna, na seguencia. então ficaria o primeiro botão EU, o segundo TU, e assim por diante, se não houve nomes sulficientes para o numero de botão deveria ficar em branco.

Desde já agradeço a ajuda.

Oi Julierme,

Faria algo assim:

Private Sub Form_Open(Cancel As Integer)
Dim rs As DAO.Recordset, mysql As String, j As Byte
Call fLimpaBotões
mysql = "SELECT codigo, nome FROM tblSuaTabela" 'aqui vc monta aconsulta igual ao do formulário
Set rs = CurrentDb.OpenRecordset(mysql)
If rs.RecordCount = 0 Then Exit Sub
rs.MoveFirst: j = 1
Do While Not rs.EOF
    Select Case j
        Case 1
            Me!botao1.Caption = rs!nome
        Case 2
            Me!botao2.Caption = rs!nome
        Case 3
            Me!botao3.Caption = rs!nome
        Case 4
            Me!botao4.Caption = rs!nome
        Case 5
            Me!botao5.Caption = rs!nome
    End Select
    j = j + 1
    rs.MoveNext
Loop
rs.Close
Set rs = Nothing
End Sub

Private Function fLimpaBotões()
  Me!botao1.Caption = "": Me!botao2.Caption = "": Me!botao3.Caption = ""
  Me!botao4.Caption = "": Me!botao5.Caption = ""
End Function  

Sucesso
...

Valeu Avelino, muito obrigado, funcionou uma blza.