|
|
Postada em 23/04/2008 15:40 hs
olá amigos, tenho um bc (Games.mdb) e tem a tabela Consulta eu gostaria de criar um msflexgrid que filtre o nome e mostrando os outros dados. Ex: digito a letra"n" o msflexgrid mostra os jogos que comecem com a letra "n" digito "resident" o msflexgrid mostra os jogos que comecem com "resident" se alguém puder me ajudar, fico muito agradecido. |
|
|
|
|
|
Perci
|
MATÃO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 23/04/2008 16:42 hs
A pesquisa é em SQL? Se for, tente assim: sql = "Select * From Tabela Where nome Like '*" & txtnome.text & "*'" |
|
|
|
|
|
Postada em 23/04/2008 18:59 hs
sou novatissímo na programação, coloquei como vc mencionou, mas não deu em nada.. falta mais coisa né?
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
Postada em 23/04/2008 19:06 hs
Colega posta um trecho do código que você já possui, fica mais fácil |
|
|
|
|
|
Postada em 23/04/2008 19:51 hs
ok desculpe, eu peguei um exemplo aki e to tentando montar no meu projeto mas da um erro em uma coluna
da um erro de valor na coluna 9
Private Sub Limpar_Tela()
'
tabela.Rows = 2
tabela.Cols = 9
tabela.Row = 1
tabela.Col = 1
tabela.Text = Clear
tabela.Row = 1
tabela.Col = 2
tabela.Text = Clear
tabela.Row = 1
tabela.Col = 3
tabela.Text = Clear
tabela.Row = 1
tabela.Col = 4
tabela.Text = Clear
tabela.Row = 1
tabela.Col = 5
tabela.Text = Clear
tabela.Row = 1
tabela.Col = 6
tabela.Text = Clear
tabela.Row = 1
tabela.Col = 7
tabela.Text = Clear
tabela.Row = 1
tabela.Col = 8
tabela.Text = Clear
tabela.Row = 1
tabela.Col = 9
tabela.Text = Clear
tabela.FormatString = " | Código | Catalogo | Console |Nome |Genero |Armazenamento |Boot |Sistema Cor |Linguagem "
'
End Sub
|
|
|
|
|
|
Postada em 23/04/2008 20:09 hs
arrumei isso ja, tem que colocar no tabela.cols uma coluna a mais do que realmente vai ter
agora travei aki
Private Sub Form_Load()
Set WS = DBEngine.Workspaces(0)
Set DB = WS.OpenDatabase(App.Path & "Games.mdb")
Set TB = DB.OpenRecordset("Consulta", dbOpenDynaset)
cblocalizar.AddItem "Codigo"
cdlocalizar.AddItem "Nome"
cblocalizar.AddItem "Genero"
cdlocalizar.ListIndex = 0
CboOrdem.AddItem "Nome"
CboOrdem.ListIndex = 0
End Sub
quando peço pra carregar o formulário da erro Object Required e destaca a linha
cblocalizar.AddItem "Codigo"
e na tabela no access o Codigo ta sem acento mesmo.
|
|
|
|
