我想要点击一个datagrid2中的某一条记录,datagrid3就显示相应的内容,但现在有两个问题,
1,点后datagrid3不显示,说好象是数据类型怎么的了,代码如下
Private Sub DataGrid2_Click()
    hang = DataGrid2.Row + 1
    'MsgBox DataGrid2.Col
    SQL = "select 子专业 from 专业细目 where 专业代码=" & Trim(hang)
    'MsgBox SQL
    Set rstZY1 = New ADODB.Recordset
    rstZY1.Open SQL, cn, adOpenKeyset, adLockPessimistic
    Set DataGrid3.DataSource = rstZY1
    DataGrid3.Refresh
End Sub
2、我用msgbox显示点的是datagrid2中的哪条记录,点后当再点下一个的时候,才出上一个,也就是晚一个点击,
请问我该怎么解决?

解决方案 »

  1.   

    首先给你一个建议,不要用中文做表名或字段名称
    第二如果你的数据量不大的话,可以尝试用LISTVIEW使用起来容易些
    你的这条语句
    我认为不好    SQL = "select 子专业 from 专业细目 where 专业代码=" & Trim(hang)
    改为:
       SQL = "select 子专业 from 专业细目 where 专业代码='" & Trim(hang) &"'" 
      

  2.   

    还有,查询应该是按:专业代码查
    如果你的行号是专业代码的话
    这样做习惯不好
    通常我个人不使用DBGRID如果是数据量很大的时候,我也许会使用的
    毕竟它是一个敏感数据空件使用起来很别扭