如何用VB做一个小提示

来源:百度知道 编辑:UC知道 时间:2024/05/09 04:48:02
我做了一个RPG游戏
想在运行游戏时
先弹出一个窗口~ 内容是"欢迎使用"(不来引号)~ 标题是"友情提示"
再运行游戏(同一个文件夹下)
最好是能写出每一句的含义
谢谢

'这样?
Private Sub Form_Load()
MsgBox "欢迎使用", vbOKOnly, "友情提示"
Shell "RPG.EXE"
End Sub

Private Sub Form_Paint()
'Me.BorderStyle = 1
Me.Show
Me.Caption = "友情提示"
Me.Print
Me.Font.Size = 20
Me.CurrentX = Me.ScaleWidth / 3

Me.Print "欢迎使用"

Shell "RPG.EXE"
End Sub