module1.bas
来自「vb写的试题库生成系统」· BAS 代码 · 共 6 行
BAS
6 行
Attribute VB_Name = "Module1"
Public ThisDBName As String
Public Sub ShowError(ByVal msg As String)
MsgBox msg, vbCritical + vbOKOnly
End Sub
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?