我在Access中构建表单,并且我有几个需要整数值的文本框。现在你可以输入字符而不是数字,当按下提交按钮时会弹出一个调试窗口。如何防止用户在整型文本框中输入无效时按下提交按钮。防止用户输入任何东西,但整数到文本框
谢谢!
我在Access中构建表单,并且我有几个需要整数值的文本框。现在你可以输入字符而不是数字,当按下提交按钮时会弹出一个调试窗口。如何防止用户在整型文本框中输入无效时按下提交按钮。防止用户输入任何东西,但整数到文本框
谢谢!
首先,使字段在表格设计中成为数字类型。然后进入“字段属性”并确保“字段大小”设置为“整数”。这会处理十进制数字,因为当文本框失去焦点时它会将它们四舍五入到最接近的整数。
接下来,进入提交按钮属性并设置Enabled = False。这会变灰,并且不允许用户点击它。您可能希望将此代码添加到表单的On Current属性中,以便每当加载记录时,都会根据已存在的值启用或禁用提交按钮。您将需要“和”更多的整数文本框对象以相同的,如果你有你的表格上有多个整数文本框声明:
Private Sub Form_Current()
If Not IsNumeric(Me.IntegerTextBox.Value) Then
Me.SubmitButton.Enabled = False
Else
Me.SubmitButton.Enabled = True
End If
End Sub
最后,该代码添加到文本框的On Change事件。只要输入了一个合适的数字值,这将启用该按钮,并且每次按下某个按键时都会更新该按钮。
Private Sub IntegerTextBox_Change()
If Not IsNumeric(Me.IntegerTextBox.Text) Then
Me.SubmitButton.Enabled = False
Else
Me.SubmitButton.Enabled = True
End If
End Sub
对您窗体上的每个整数字段执行此操作。
在表中设计使数据类型数字(整数)。
抱歉没有正确地阅读你的问题 - 我会回来。 – 2015-03-02 21:38:47
你有没有尝试在文本框的_BeforeUpdate或OnChange事件中放入'check-for-number'代码? – tospig 2015-03-02 22:05:33