请问怎么把一表中选出的某个字段的全部内容全放入一个文本框中啊？

Question

in delphi;
query.close;
query.sql.clear;
query.sql.add('select text from table ...');
query.open;
query.first;
while not query.eof do
begin
 text1.text:=text1.text+query.fieldbyname('text').asstring;
 query.next;
end;

Answer 1

vb中：
set rs=cn.execute("select field1 from table1 ")
do until rs.eof
    text1.text=text1.text+rs.fields("field1").value
    rs.movenext
loop

Answer 2

in delphi;
query.close;
query.sql.clear;
query.sql.add('select text from table ...');
query.open;
query.first;
while not query.eof do
begin
 text1.text:=text1.text+';'+query.fieldbyname('text').asstring;
 query.next;
end;

Answer 3

set rs=cn.execute("select field1 from table1 ")
while not rs.EOF
  text1.text=text1.text+rs.fields("field1").value
  rs.MoveNext
Wend

Answer 4

declare @r varchar(8000)
set @r=''
select @r=字段+char(13)+char(10)+@r from 你的表
select @r将上面批处理发送给SQL Server，它给你返回表中所有查询出某字段的内容。

Answer 5

谢谢各位大虾的解答 再请问若用c＃在vs.net里应该怎么写啊？ 谢谢

Answer 6

vb中的rs.eof在vs.net中用c＃应该怎样写啊 谢谢