vb6.0 dategrid 问题

Question

用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初学者，轻喷.

Answer 1

代码不完整，SQL语句写的含糊，无法判断。
char代表啥？