把窗体计算结果加入表中相应位置

仇国平　发表于：2011-01-26 16:05:53 　

各位老师：有一个问题，我在窗体上上有三个文本框，现在我要达到：如果文本框2数字大于文本框1数字，则文本框3显示100并且把100填入表中ID为3的政治分值中，谢谢！详见附件

煮江品茶发表于：2011-01-26 16:51:54

Private Sub Cmd_js_Click()
Dim ssql As String
If Me.Txt2.Value > Me.Txt1.Value Then
    Me.Txt3.Value = 100
    ssql = "UPDATE 表1 SET 分值 = '100' where ID='3'"
    DoCmd.SetWarnings False
    DoCmd.RunSQL ssql
End If
End Sub

Top

煮茶论道发表于：2011-01-26 17:17:48

谢谢！

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

把窗体计算结果加入表中相应位置