module1.bas

来自「用keil c和vb开发的单片机通用usb键盘」· BAS 代码 · 共 11 行

Attribute VB_Name = "Module1"
Public fMainForm As frmMain
Public Declare Function ReadPort1 Lib "EasyD12" (ByRef Data As Byte, ByVal iLen As Byte) As Long


Sub Main()
    Set fMainForm = New frmMain
    fMainForm.Show
End Sub