VB中datagrid问题

提问：VB中datagrid问题

在增加班级信息的form中
Private Sub DataGrid1_Click()
Add_Class_Info.Adodc1.RecordSource = "select * from 班级信息表 where 班级 = '" & Trim(DataGrid1.Row) & "'"
Text1.Text = Add_Class_Info.Adodc1.Recordset.Fields("班级")
Text2.Text = Add_Class_Info.Adodc1.Recordset.Fields("年级")
Text3.Text = Add_Class_Info.Adodc1.Recordset.Fields("专业")
Text4.Text = Add_Class_Info.Adodc1.Recordset.Fields("人数")
Text5.Text = Add_Class_Info.Adodc1.Recordset.Fields("辅导员")
Text6.Text = Add_Class_Info.Adodc1.Recordset.Fields("备注")
'Command1.Enabled = False
'Command2.Enabled = True
End Sub

编译出现问题,就在Add_Class_Info.Adodc1.Recordset.Fields上

求助 应该怎么改正

回答：

如果用Adodc1（不推荐用）的话，就直接绑定文本框就行了，不用写代码

转贴于：立珊网络计算机专业网站