添加按钮代码(如果不这次设置,添加信息有空格出现,如果这么设置了添加信息时 当清空内容时,还添不上)
If e.Form.Controls("TextBox3").Text = "" Then MessageBox.Show("物品名称为空,不允许再此添加新的记录.")Else Tables("入库").AddNew()End If