Sub ShowGridData()
Dim rs As ADODB.Recordset
Dim sql As String
Dim msgstr As String
sql = "select roomID,customID,customname,discount,indate,sex,memo,from OrderRoom"
Set rs = Gosql(sql, msgstr)
With MSHFlexGrid1
Set .Recordset = rs
Call ShowTitle
End With
Set rs = Nothing
End Sub
给出详细的解决办法啊?我也不是太懂,你们说的都模糊的很?详细解答加分