Question

vb编的小程序，关闭窗口时 弹出的窗口提示 如何改变

vb编的小程序，关闭窗口时 弹出的窗口提示 如何改变 ，关闭窗口时提示“ 人事管理系统 是否关闭”相要改变为" 企业人事管理系统 是否关闭“ 如下图 求大虾们帮忙

Answer 1

' 将这些 ctrl+c ，ctrl+v
Private Sub Form_Unload(Cancel As Integer)

If MsgBox("确定要退出吗?(Y/N)", vbInformation + vbYesNo, "企业人事管理系统") = vbYes Then
Cancel = False
End
Else
Cancel = True
End If

End Sub

Answer 2

MsgBox "确认要退出吗?(Y/N)", vbInformation + vbYesNo, "企业人事管理系统"
msgbox第一个参数为窗口中显示的字符串
msgbox第二个参数为窗口的显示的图形信息及按钮
vbOKOnly 0 只显示 OK 按钮。
VbOKCancel 1 显示 OK 及 Cancel 按钮。
VbAbortRetryIgnore 2 显示 Abort、Retry 及 Ignore 按钮。
VbYesNoCancel 3 显示 Yes、No 及 Cancel 按钮。
VbYesNo 4 显示 Yes 及 No 按钮。
VbRetryCancel 5 显示 Retry 及 Cancel 按钮。
VbCritical 16 显示 Critical Message 图标。
VbQuestion 32 显示 Warning Query 图标。
VbExclamation 48 显示 Warning Message 图标。
VbInformation 64 显示 Information Message 图标。
msgbox第三个参数在对话框标题栏中显示的字符串表达式。如果省略，则将应用程序名放在标题栏中