module1.bas

来自「Visual Basic程序设计视频教程」· BAS 代码 · 共 10 行

Attribute VB_Name = "Module1"
Public Declare Function MessageBox Lib "user32" _
Alias "MessageBoxA" ( _
                     ByVal hwnd As Long, _
                     ByVal lpText As String, _
                     ByVal lpCaption As String, _
                     ByVal wType As Long _
                     ) As Long