[ű]
=MessageBoxA
[ȼ]
=F6
ֹͣ=F11
ͣ=F10
[]
Sub Main()
	MessageBoxA 0,"Ǻ,Եñ׼̬!","̬ñ׼DLL",0
End Sub
Function MessageBoxA(Hwnd,Text,Caption,TypeS)
    'User32
    HDLL.LoadDLL("User32")
    'MessageBoxA
    HDLL.LoadFunc "MessageBoxA",vbLong, vbLong, vbString, vbString, vbLong
    MessageBoxA = HDLL.Run(Hwnd,Text,Caption,TypeS)
End Function
[]
