BUSCAR DADOS NA TABELA DE ACORDO COM MARCACAO DE U

GCCONTATOS 19/01/2013 22:42:36
#417748
olá pessoal, tenho duas tabelas no access, e estou montando um programinha em vb.net, na tela do form em questao, tenho um groupbox, com dois radiobutton dentro, alem disso tenho duas combos e uma textbox..

quero fazer o seguinte, de acordo com o radiobutton(rb) selecionado, quero que o vb busque a tabela, por exemplo:

rb1 é Cidadãos e o rb2 é Cidades, se eu selecionar o rb1, quero que o vb busque a tabela tblcidadaos porém se eu selecionar a rb2, quero que ele busque a tabela tblcidades.. e assim eu possa fazer o preenchimento das combos e textbox.

Agradeço a ajuda!
JESUEL.OLIVEIRA 19/01/2013 23:10:04
#417751
Amigo, monte a SQL


  
SQL = [Ô]SELECT * FROM [Ô]

If rb1.Checked = True Then SQL = SQL & [Ô]tblcidadaos[Ô]
If rb2.Checked = True Then SQL = SQL & [Ô]tblcidade[Ô]
SQL = SQL & [Ô] where ................
FELLIPEASSIS 19/01/2013 23:11:25
#417752
if radiobutton1.checked = true then
sql = [Ô]select*from tabela cidade[Ô],conexao
exit sub
end if

if radiobutton2.checked = true then
sql = [Ô]select*from tabela cidadao[Ô],conexao
exit sub
end if

sql é a string de parametro que vc tem q colocar con a conexao
FELLIPEASSIS 19/01/2013 23:27:08
#417754
Tem varia dicas nesse site tbm já com exemplos

http://vb.net-informations.com/
GCCONTATOS 20/01/2013 01:29:00
#417757
olá amigos, primeiramente obrigado pela ajuda... mas estou com o seguinte erro.. [Ô]erro de sintaxe na cláusula FROM[Ô]... o que podemos fazer a respeito? Abrçs
ALEVALE 21/01/2013 08:23:44
#417771
Posta a sua query fica mais fácil.
PEGUDO 21/01/2013 13:14:24
#417797
Só incrementando o que o JESUEL OLIVEIRA postou:
a cláusula WHERE é para você completar, por exemplo, digamos que você tenha uma coluna na tabela cidades chamada: Coluna_Cidade e queira buscar as cidades do Rio de Janeiro, então:
SQL = [txt-color=#e80000][Ô]SELECT * FROM [Ô][/txt-color]

If rb1.Checked = True Then SQL = SQL & [txt-color=#e80000][Ô]tblcidadaos[Ô][/txt-color]
If rb2.Checked = True Then SQL = SQL & [txt-color=#e80000][Ô]tblcidade[Ô][/txt-color]
SQL = SQL & [txt-color=#e80000][Ô] where Coluna_Cidade =[ô]Rio de Janeiro[ô] [Ô][/txt-color]

Se você deixar [Ô][txt-color=#0000f0]where .................[/txt-color][Ô] vai dar erro.
Faça seu login para responder