[attach]43114[/attach] 作者: koutx 时间: 2010-8-14 12:27
参照此改一下:
Private Sub Form_Current()
If Me.总量.Value >= 10000 Then
Me.Text2 = "I"
Else
Me.Text2 = "II"
End If
End Sub作者: liuyinhe 时间: 2010-8-14 13:29
参照此改一下:
Private Sub Form_Current()
If Me.总量.Value >= 10000 Then
Me.Text2 = "I" ...
koutx 发表于 2010-8-14 12:27