vb,sql语言又一个狂菜的问题？

Question

Private Sub Form_Load()
 Dim MyNod As Node, MyNod1 As Node
 Dim MySql As String TreeView1.ImageList = ImageList1
 Set db = OpenDatabase(App.Path & "\教工档案")
 Set MyNod = TreeView1.Nodes.Add(, , "node_m", "计算机系", "computer")
 '------
Set newnod = TreeView1.Nodes.Add("node_m", tvwChild, "node_bm", "按科室分类")
 newnod.Image = "close": newnod.ExpandedImage = "open"
 MySql = "select distinct 科室 from 计算机系"
 Set rs = db.OpenRecordset(MySql)
 Do While Not rs.EOF
  Set newnod = TreeView1.Nodes.Add("node_bm", tvwChild, "node_" & rs!科室, rs!科室)
  newnod.Image = "close": newnod.ExpandedImage = "open"
  MySql = "select 姓名,性别 from 计算机系 where 科室=" & Chr(34) & newnod.Text & Chr(34)
  Set rs1 = db.OpenRecordset(MySql)
  Do While Not rs1.EOF
   photo = IIf(rs1!性别 = "男", "man", "woman") 'rs1.Fields("性别").Value
   Set newnod1 = TreeView1.Nodes.Add(newnod.Key, tvwChild, , rs1!姓名, photo)
   rs1.MoveNext
  Loop
  rs.MoveNext
 Loop
'--------------------你们注意这个细节了吗 rs1!姓名  请问这是“！”什么意思.请高手指导？

Answer 1

rs1!姓名就是记录集姓名字段的值
与这个写法一样效果：Rs1.fields("姓名")