?? module1.bas
字號:
Attribute VB_Name = "Module1"
Public Function ShowMsg()
MsgBox "This is My First Dll ！！"
End Function
Public Function aa(ByVal sHwnd As Long)
SetFlat sHwnd
End Function
Public Function SetLen(ByVal str As String, ByRef kk As Long)
kk = Len(str)
End Function
Public Function t1(ByVal pname As String, ByRef Ret As Integer)
Ret = 2
End Function
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -