呃,msgbox,关闭按钮,是一定要出现的。
你可以自己弄一个窗口,如
Dim frm As New Windows.Forms.Form
frm.Text = "欢迎使用"
frm.Topmost = True
frm.width = 500
frm.height = 500
Dim lbl As new Windows.Forms.Label
lbl.text = "提示提示提示"
lbl.Top = 10
lbl.left = 10
frm.Controls.Add(lbl)
frm.topmost = True
frm.Show
frm.Top = (SysInfo.ScreenHeight - frm.height) / 2
frm.left = (SysInfo.ScreenWidth - frm.width) / 2