STRSQL = "select * from dyset_tab"
Set gRS = gDB.OpenResultset(STRSQL, 1, 4)
Dim i As Integer
Dim m As String
If gRS.EOF Then
  gRS.AddNew
  For i = 0 To 16
  m = "zd" & i
  gRS!m = Label1(i).Top & "/" & Label1(i).Left
  Next i
  gRS!bz = "user"
  gRS.Update
Else
  gRS.Edit
  For i = 0 To 16
  m = "zd" & i
  gRS!m = Label1(i).Top & "/" & Label1(i).Left
  Next i
  gRS.Update
 End If
 gRS.Close以上代码始终不能顺利运行,在“grs!m”上费了好大的劲还是不得其解,不知各位大哥
用什么办法实现上述思路?请指点一、二。感谢!