VBA 控件学习笔记(按钮点击事件)


本节说的是使用VBA实现点击按钮时,触发的事件过程。

比如,这里点击打包完成按钮时候,会触发一些过程,先判断装箱尺寸、毛重等信息是否填写,否则弹出提示框。

CommandButton1_Click()是按钮点击触发事件,点击CommandButton1按钮时,触发该过程。

'完成打包事件
Private Sub CommandButton1_Click()
If TextBox1.Text = "" Then
MsgBox "装箱尺寸不能为空!", vbOKOnly
ElseIf TextBox2.Text = "" Then
MsgBox "重量不能为空!", vbOKOnly
ElseIf Cells(10, 2) = "" Then
MsgBox "本箱打包明细为空!", vbOKOnly
Else
'其他代码
End If
End Sub



评论

支持上传图片(拖动图片或者截图粘贴)

0 评论