-- 作者:狐狸爸爸
-- 发布时间:2012/6/26 13:06:00
--
将保存按钮的代码修改一下,大概如此:
if e.Form.Controls("TextBox1").Value Is Nothing Orelse e.Form.Controls("TextBox2").Value Is Nothing Orelse e.Form.Controls("TextBox3").Value Is Nothing Then
Messagebox.show("请输入完整数据")
return
Else
\'原来保存按钮的代码
End if
|