调用画图和游戏程序

Dim N1 As Integer, N2 As Integer

Private Sub command1_click()

N1 = Shell("F:\YDGZ(邮电高职)\VB(例子带知识)\记事本和游戏\mspaint.exe F:\YDGZ(邮电高职)\VB(例子带知识)\素材\邓海文10.jpg", 1)

End Sub

Private Sub command2_click()

N1 = Shell("F:\YDGZ(邮电高职)\VB(例子带知识)\记事本和游戏\winmine.exe", 1)

End Sub

Private Sub command_3click()

End

调用画图和游戏程序

End Sub

调用画图和游戏程序相关文档

最新文档

返回顶部