module1.bas

来自「VB6.0编写,网络版,可升级,源码,适用,运行良好.共大家参考!」· BAS 代码 · 共 11 行

Attribute VB_Name = "Module1"
'定义全局变量UserNow为UserType类型
Public UserNow As UserType

'自定义用户类型
Type UserType
    ID As String    '用户ID
    Pwd As String   '用户密码
End Type