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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Carregar DataGrid dentro de um while
ANGUS TORMENTOR
JOINVILLE
SC - BRASIL
Postada em 22/03/2005 17:47 hs            
Entaum faça uma consulta mais detalhanda usando apenas os campos q vc vai usar. ai vc naum precisa fazer If para mostrar os campos:
ex:
ao invés de DtList.RecordSource = (" SELECT * FROM TABELA") que seleciona todos os campos faça:
DtList.RecordSource = (" SELECT Tabela.campo, Tabela.campo, Tabela.campo" & _
                                " FROM TABELA" & _
                                " WHERE Tabela.campo = '"&&"'") se precisar usar se naum acebe a instrução na linha acima com ") ao invés de "&_
 
ai vc pode mostrar só os campos q consultou utilizando os comando q eu mandei antes.
Se eu entendi vc quer isso.

Emoções ANGUS TORMENTOR Emoções 
     
Ferrazzini
não registrado
ENUNCIADA !
Postada em 06/01/2011 13:55 hs   
Boa tarde.
Poderia me ensinar de forma muito simples como eu posso alimentar um datagrid?

É mais ou menos isso o que preciso;


Após a consulta que realizo todas as informações do paciente são gravadas numa de nome tbHistorico.

Possui 5 campos

Hist01 = nome
Hist02 = data e horário
Hist03 = Queixas
Hist04 = Remédio
Hist05 = Valor

Só isso.

Fiz um form com um datagrid de nome DataGrid1

Possui também 5 colunas.

As colunas e respectidas variáveis são;

Nome/swap01
Data/swap02
Queixas/swap03
Remédio/swap04
Valor/swap05

Não sei como alimentar estas colunas para enviar pra impressão.

Somente preciso alimentar com os dados da consulta do dia.
   
Felipe
não registrado
ENUNCIADA !
Postada em 06/01/2011 19:04 hs   
With DataGrid1
    .Columns(0).Caption = "swap01"
    .Columns(1).Caption = ("swap02")
    .Columns(2).Caption = ("swap03")
    .Columns(3).Caption = ("swap04")
    .Columns(4).Caption = ("swap05")
  End With
   
Página(s): 2/2     « ANTERIOR  


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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