如下的内容，是在Excel的VBA环境下，用来修改窗体的代码的总结，希望对你有帮助。
一、用户窗体类
显示用户窗体
UserForm1.Show
加载一个用户窗体,但该窗体处于隐藏状态
Load UserForm1
隐藏用户窗体
UserForm1.Hide
卸载用户窗体
Unload UserForm1 或Unload Me
在用户窗体中显示图形
Picture1.Picture = LoadPicture("D:\DZWEBS.JPG")
将窗体设置为无模式状态
UserForm1.Show 0或UserForm1.Show vbModeless
窗体高度为当前活动窗口高度的0.99
Me.Height = Int(0.99 * ActiveWindow.Height)
窗体宽度为当前活动窗口高度的0.66
Me.Width = Int(0.66 * ActiveWindow.Width)
二、消息框、对话框类
消息框中显示消息dzwebs
MsgBox "dzwebs"
在消息框中点击"是"按钮，则Ans值为vbYes；点击"否"按钮，则Ans值为vbNo
Ans = MsgBox("Continue?", vbYesNo)
返回值不为"是"，则退出
If MsgBox("Continue?", vbYesNo) <> vbYes Then Exit Sub
使用常量的组合，赋值组Config变量，并设置第二个按钮为缺省按钮
Config = vbYesNo + vbQuestion + vbDefaultButton2
在消息框中强制换行，可用vbCrLf代替vbNewLine
MsgBox "This is the first line." & vbNewLine & "Second line."
应用工作表函数返回所选区域的平均值并按指定格式显示
MsgBox "the average is :" & Format(Application.WorksheetFunction.Average(Selection), "#,##0.00"), vbInformation, "selection count average" & Chr(13)
