问题描述
MSFlexGrid1组件与数据库绑定
解决方案
解决方案二:
DimsqlAsStringsql="..."DimrsAsNewADODB.Recordsetrs.Opensql,Conn,adOpenKeyset,adLockReadOnly,adCmdTextDimiAsIntegermsCharpter.Rows=rs.RecordCount+1i=1DoWhileNotrs.EOFMSFlexGrid1.TextMatrix(i,0)=rs!字段名rs.MoveNexti=i+1Loop
时间: 2024-10-26 06:32:42