一个关于绑定的问题
数据库包含一个表，表内有两个项目NAME和GENDER，NAME里存放学生姓名（姓名唯一）.GENDER里存放学生性别

操作界面由一个TEXTBOX和一个LABEL组成，当在TEXTBOX里输入姓名之后则LABEL立刻可以显示出该学生的性别。

求教该如何解决？

[解决办法]
Dim cn As ADODB.Connection, rs As ADODB.Recordset

Private Sub Form_Load()
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\somepath\mydb.mdb;"
End Sub

Private Sub Form_Unload()
Set rs = Nothing
cn.Close
Set cn = Nothing
End Sub

Private Sub Text1_Change()
Label1 = ""
Set rs = cn.Execute("SELECT GENDER FROM 表 WHERE [NAME]='" & Text1 & "'")
If Not rs.EOF Then Label1 = rs!GENDER & ""
End Sub