(Resolvido) Combo Box

[Gabriel Jardim]

Boa Tarde meus amigos,

gostaria de saber como faço para ler os 2 primeros caracteres de um Combo Box? :unsure:

Aguardo respostas...

Editado Novembro 2, 2010 por Gabriel Jardim

[Gabriel Jardim]

Boa Tarde galera,

Consegui dar um jeito no problema da combobox, está ai a Solução.

sql = "SELECT * FROM TB_CARGOS"
    Rs.Open sql, cn

    Rs.MoveFirst
    Do While Not Rs.EOF
        cmbCargoFunc.AddItem Rs!ID_CARGO & "     " & Rs!NAME_CARGO
        Rs.MoveNext
    Loop

outra coisa, eu quero que apareça o ID e o NOME, ai eu fiz o que está acima, sendo que a função só lerá o ID, então o que eu fiz: Declarei uma variável e fiz com que ela recebece a informação do cmbCargoFunc.Text

Dim sCargo As String * 2    ' Esse * 2 significa que só lerá os dois primeiros caracteres

sCargo = cmbCargoFunc.Text

sql = "INSERT INTO TB_FUNCIONARIO VALUES ('" & txtCadMatFunc.Text & "','" & txtCadNomeFunc.Text & "','" & sCargo & "')"
cn.Execute sql

Está ai a minha Solução para o meu problema, um Abraço a todos e agradeço sempre pela força que vocês nos dão.