VB msgbox窗口怎么设置没有按钮,定时几秒后关闭。
展开全部
msgbox有点难度,建议用这个函数:Private Declare Function MessageBoxTimeout Lib "user32" Alias "MessageBoxTimeoutA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long, ByVal wlange As Long, ByVal dwTimeout As Long) As Long 举个例子:Private Sub Command1_Click()
MessageBoxTimeout Me.hwnd, "test", "Tips", vbInformation, 0, 3000
End Sub
MessageBoxTimeout Me.hwnd, "test", "Tips", vbInformation, 0, 3000
End Sub
追问
只能用函数?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询