Sub 对象名_事件过程名[(参数列表)] Handles eventlist
…
… （事件处理程序代码）
…
End Sub

/ 除双目运算符
\ 整除双目运算符
Mod 取余数双目运算符
^ 乘方(求幂) 双目运算符

< 小于双目运算符操作数可以是任何合理的表达式
<= 小于等于双目运算符同上
> 大于双目运算符同小于号
>= 大于等于双目运算符同小于号
= 等于双目运算符同小于号
<> 不等于双目运算符同小于号

MsgBox：
MsgBox(prompt[, buttons] [, title] [, helpfile, context])

vbOKOnly 0 只显示“确定”按钮（缺省值）
VbOKCancel 1 显示“确定”和“取消”按钮
VbAbortRetryIgnore 2 显示“终止”、“重试”和“忽略” 按钮
VbYesNoCancel 3 显示“是”、“否”和“取消”按钮
VbYesNo 4 显示“是”和“否”按钮
VbRetryCancel 5 显示“重试”和“取消”按钮
VbCritical 16 显示“关键信息”图标
VbQuestion 32 显示“错误”图标
VbExclamation 48 显示“警告消息”图标
bInformation 64 显示“通知消息”图标
efaultButton1 0 第一个按钮是缺省值(缺省设置)
vbDefaultButton2 256 第二个按钮是缺省值
vbDefaultButton3 512 第三个按钮是缺省值
vbDefaultButton4 768 第四个按钮是缺省值
vbApplicationModal 0 应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作
vbSystemModal 4096 系统强制返回；全部应用程序都被挂起，直到用户对消息框作出响应才继续工作
vbMsgBoxHelpButt 16384 将Help按钮添加到消息框
on
VbMsgBoxSetFore 65536 指定消息框窗口作为前景窗口
ground
vbMsgBoxRight 524288 文本为右对齐
vbMsgBoxRtlRe 1048576 指定文本应为在希伯来和阿拉伯语系统中的从右到左显示
ading

   GJO1.Text = Format(GJO19, 0)

MsgBox “This is the first line.” & vbNewLine & “Second line.”