作者orea2005 (orea)
看板Visual_Basic
标题[VB6 ] Datagrid的诡异问题
时间Thu Jan 18 17:29:40 2007
各位好
我在使用datagrid的时候遇到超诡异的问题
一样是datagrid在其他form很正常
但就这里会有问题
程式码:
qryStr = Left(Combo1.Text, 3)
sqlCmd = "select rm0104,rm0107,rm0112 from rm01 where rm0107='" & qryStr & "'"
Set rs2 = New Adodb.Recordset
rs2.CursorLocation = adUseClient
rs2.Open sqlCmd, connDat, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = rs2
Set MSHFlexGrid1.DataSoutce = rs2
开始执行後
MSHFlexGrid可以正确显示资料
Datagrid里没有显示任何资料
就只有一行空白格子
但可以发现Datagrid出现垂直的scrollBar
由此可以知Datagrid确实收到了资料
且资料量超过datagrid长度
可是只要去点Datagrid
整个就消失了
请问这是什麽问题?
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 139.223.20.28