COMBOBOX DADOS

Create table Veiculo (
cod_Veiculo integer unsigned primary key not null auto_increment,
placa_Veiculo varchar(30),
marca_Veiculo varchar(30),
modelo_Veiculo varchar(40),
ano_Veiculo integer,
chassi_Veiculo varchar(30),
observacoes_Veiculo varchar(100),
horadata_Veiculo varchar(30),
cod_Cliente integer unsigned not null,
Foreign Key (cod_Cliente) references Cliente (cod_Cliente)) ENGINE=INNODB;

Create table Manutencao (
cod_Manutencao integer unsigned primary key not null auto_increment,
descricao_Manutencao varchar(100),
data_Manutencao varchar(20),
hora_Manutencao varchar(20),
valor_Manutencao varchar(20),
cod_Veiculo integer unsigned not null,
Foreign Key (cod_Veiculo) references Veiculo (cod_Veiculo)) ENGINE=INNODB;

 While leitor.Read
            With cmb_Veiculo
                .ValueMember = [Ô]cod_Veiculo[Ô]
                .Items.Add(leitor.Item([Ô]marca_Veiculo[Ô]).ToString() & [Ô] [Ô] & leitor.Item([Ô]modelo_Veiculo[Ô]).ToString() & [Ô] [Ô] & leitor.Item([Ô]ano_Veiculo[Ô]).ToString)
            End With
        End While

With cmb_Veiculo
            .ValueMember = [Ô]cod_Veiculo[Ô]
            .DataSource = dados.Tables(0)
            .DisplayMember = [Ô]marca_Veiculo[Ô]
        End With