📄 module1.bas
字号:
Attribute VB_Name = "Module1"
Public PntArray As New Collection
Public LineArray As New Collection
Public RecArray As New Collection
Public CircleArray As New Collection
Public nSelectType As Long
Public nselectid As Long
Public nselectidl As Long
Public nselectidr As Long
Public nselectidc As Long
Public UserName As String
Sub Main()
Dim flogin As New FormLogin
flogin.Show
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -