怎么让text1显示所有的数据，不是只有第一条记录
SQLStr = "select * from T_STOCK_TR "
RS.Open SQLStr, cnn, adOpenStatic, adLockOptimistic
Text1.Text = RS( "I_GAME_CD ")
怎么让text1显示所有的数据，不是只有第一条记录
[解决办法]
SQLStr = "select * from T_STOCK_TR "
RS.Open SQLStr, cnn, adOpenStatic, adLockOptimistic
text1.text= " "
do while not Rs.Eof
Text1.Text = text1.text & " " & RS( "I_GAME_CD ")
rs.movenext
loop
