|
|
Postada em 26/10/2004 09:34 hs
Como faco para formatar em modo colunado o resultado de uma query para preencher um Text multi line de modo que venha assim Codigo Tipo 0001 AA 0002 AA 0003 BB Obrigado, Giovanni |
|
|
|
|
|
|
|
Postada em 26/10/2004 10:18 hs
Giovanni. E complicado pois as letras no TextBox não ocupam o mesmo espaço. Recomendo que faça com MSFLEXGRID.
So comentei
Alan |
|
|
|
|
|
Postada em 26/10/2004 10:24 hs
Um exemplo exato do que preciso fazer e o mesmo que o SQL Query Analyser faz no modo Result In Text, ao invez de Results in Grid. Nao posso exibir no Grid, pois devo exibir tambem outras informacoes que nao se enquadram no Grid. Eu ja vi isto no Forum uma vez, algum ja tinha feito algo deste genero. Obrigado, Giovanni |
|
|
|
|
|
Postada em 26/10/2004 11:13 hs
É só montar uma formatação no momento de preencher o text. Digamos que você tenha uma recordset (RS) com os campos Codigo e Tipo: dim Aux Aux = "" do until rs.eof Aux = Aux & format(rs!codigo, "0000") & " " & rs!tipo & vbCrLf rs.movenext loop Text1.text = Aux se você usar uma fonte no Text1 tipo Courier New, as letras e números vão ter todos o mesmo tamanho (largura) e vai ficar colunado. |
|
|
|
|
|
Postada em 26/10/2004 13:58 hs
Giovanni Recomendo então a utilização do compomente RICHTEXT, que fara o resultado identico ao Analyser. Alan
|
|
|
|
|
|
Postada em 26/10/2004 14:31 hs
Otimo, era isto que eu precisava. Gostaria de saber como faco para formatar uma string de modo a preencher com um determinado caracter um numero de posicoes. Por exemplo, preciso preencher a string 1 com 5 posicoes. ATencao, nao serve fazer format("00000",1) E variavel o numero de posicoes, o numero de posicoes sera um parametro. Obrigado, Giovanni |
|
|
|
