module1.bas

<Visual Basic 数据库开发实例精粹（第二版）>一书首先介绍了Visual Basic(简称VB)开发的技巧和重点技术

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

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