USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  consulta no msflexgride
josé
não registrado
Postada em 25/05/2006 00:12 hs   
oi pessoal!!

tenho um msflexgride com + de 300 item, e estou precisando fazer uma consulta para localizar o item desejado, eu queria digitar no text e conforme fosse digitando ele seleciona-se no msflexgride e trousese a consulta para primeira lina (coluna), sera que algem tem este código.

     
Donkey
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
PRESIDENTE PRUDENTE
SP - BRASIL
Postada em 25/05/2006 01:48 hs            
tente algo assim:
 
for var = 0 to flex.rows -1
    if left(flex.textmatrix(var.a, 2),len(txtnome.text)) = txtnome.text then
       flex.toprow = var.a
       exit for
    endif
next
 
* No caso estou supondo que o nome se encontra na coluna 2 do flexgrid. T+
     
jose
não registrado
Postada em 25/05/2006 18:22 hs   
este codigo eu coloquei no change + dar error
Dim var As Long
For var = 0 To Grade.Rows - 1
    If Left(Grade.TextMatrix(var.a, 2), Len(Text1.Text)) = Text1.Text Then
       Grade.TopRow = var.a
       Exit For
    End If
 
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página