怎么样为变量赋于当前记录的值

请老师多多指点

我用查询作为数据源形成一个窗体

我想在窗体中定义一个变量

个这个变量附于当前记录的一个字段的字

（之后这个变量我要做SQL更新的查询条件       

SQL = " update tab Set tab.UseD1 = tab.UseD1 + Sin WHERE tab.FUserName = Str1"
DoCmd.RunSQL SQL

）

例如

Dim Str1 As String

DoCmd.RunCommand acCmdSelectRecord

Str1 = Me.Text1

这样为什么不对呢？

多谢了！！！！！！！！！！！