西安微信群号大全:我的vb程序中的这个shell命令怎么实现不了？

来源：百度文库编辑：神马品牌网时间：2024/05/03 11:55:01

Function retnum() As Integer
Dim nl, msg As String
nl = Chr(13) + Chr(10)
msg = "1.运行QuickTime"
msg = msg + nl + "2.计算器"
msg = msg + nl + nl + "请输入数字选择："
renum = InputBox(msg, "输入", 1)
End Function

Private Sub Command1_Click()
Dim r, proid As Integer
r = retnum()
If r = 1 Then
proid = Shell("F:\下载\万能播放器\Storm Codec\QuickTimePlayer.exe", 3)
ElseIf r = 2 Then
proid = Shell("calc.exe", 3)
End If
End Sub

Private Sub Command2_Click()
End
End Sub

用shell文件打不开命令

Function retnum() As Integer
renum = InputBox(msg, "输入", 1)

单词拼错！少t

我的vb程序中的这个shell命令怎么实现不了？关于vb的shell命令 VB中的shell函数是干什么的？怎么用啊？ LINUX 中的shell命令在哪儿 linux在shell输入命令是具体怎么搞的? VB中shell的用法 VB中shell的用法 vb中的dir命令具体是咋用的？ shell命令 vb中的print命令