vb6.0 dategrid 问题
用dategrid的时候 鼠标点中某行并不会有任何反应 点列表头或者最左边的一列 直接清空dategrid的数据 是怎么回事
源码如下:
sql = "select book.bookID,book.bookname,book.bookauthor,book.bookpress,book.booktype,book.bookexist,book.booklend from book where " & char
rs.CursorLocation = adUseClient
rs.Open sql, conn, adOpenKeyset, adLockOptimistic
If char = "" Then
a = MsgBox("请输入查询信息!", vbOKOnly, "警告")
End If
Set DataGrid1.DataSource = rs
DataGrid1.ReBind
DataGrid1.Refresh
VB初学者,轻喷.