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 评论