首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB怎么弹出提示框

2012-09-19 
VB如何弹出提示框用VB弹出提示框,提示框内容如图当用户点击确定按钮时则运行d:\1.exe,当用户点击取消按钮

VB如何弹出提示框
用VB弹出提示框,提示框内容如图

当用户点击确定按钮时则运行d:\1.exe,当用户点击取消按钮时则运行d:\2.exe,VB代码该怎么写?我是菜鸟,希望高手们能够把代码和过程尽可能的写详细点,谢谢!~~~

[解决办法]

VB code
Private Sub Command1_Click()    Dim retValue As Long        retValue = MsgBox("提示:是否立即运行应用程序?", vbQuestion + vbOKCancel, "提示")       If retValue = vbOK Then      Call Shell("d:\1.exe", vbNormalFocus)   Else     If retValue = vbCancel Then        Call Shell("d:\2.exe", vbNormalFocus)     End If   End If            End Sub 

热点排行