module1.bas

一个简单的大学宿舍管理系统环境：vb6.0+acce

Attribute VB_Name = "Module1"
Public nod1 As Node
Public nod2 As Node
Public nod3 As Node
Public nod4 As Node
Public nod5 As Node
Public nod6 As Node
Public provider As String
Public datasource As String
Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long