Attribute VB_Name = "Module1"
Option Explicit
Public conn As New ADODB.Connection

'定義全局變量queryhouse 作為判斷frmHouse 窗體顯示查詢的數據還是全體數據
Public queryhouse As Boolean
'定義全局變量sqlqh 作為查詢房屋信息時的sql語句
Public sqlqh As String

'定義全局變量querycf 作為判斷frmClient 窗體家庭租戶選項卡顯示查詢的數據還是全體數據
Public querycf As Boolean
'定義全局變量sqlqcf 作為查詢家庭租戶信息時的sql語句
Public sqlqcf As String

'定義全局變量querycg 作為判斷frmClient 窗體家公司戶選項卡顯示查詢的數據還是全體數據
Public querycg As Boolean
'定義全局變量sqlqcg 作為查詢公司租戶信息時的sql語句
Public sqlqcg As String

'定義全局變量queryemp 作為判斷frmEmp 窗體顯示查詢的數據還是全體數據
Public queryemp As Boolean
'定義全局變量sqlqe 作為查詢員工信息時的sql語句
Public sqlqe As String

'定義全局變量queryqzc 作為判斷frmQZClient 窗體顯示查詢的數據還是全體數據
Public queryqzc As Boolean
'定義全局變量sqlqzc 作為查詢求租客戶信息時的sql語句
Public sqlqzc As String

'定義全局變量querycon 作為判斷frmAdminContract 窗體顯示查詢的數據還是全體數據
Public querycon As Boolean
'定義全局變量sqlqcon 作為查詢合同信息時的sql語句
Public sqlqcon As String

'定義全局變量sqlqyd 作為查詢預定單信息時的sql語句
Public sqlqyd As String

'定義全局變量fromqzc 作為判斷frmYuDing 窗體是從frmQZClient窗體中單擊下定金預定調用的
'還是直接菜單調用的
Public fromqzc As Boolean

'定義全局變量fromYuding 作為判斷frmPayDingJin 窗體是從frmYuDing窗體中單擊收取定金調用的
'還是直接菜單調用的
Public fromYuding As Boolean

'定義全局變量fromContract 作為判斷frmPayYaJin 窗體是從frmSignContract窗體中單擊收取押金調用的
'還是直接菜單調用的
Public fromContract As Boolean

'定義全局變量ZuJinfromContract 作為判斷frmPayZuJin 窗體是從frmSignContract窗體中單擊收取租金調用的
'還是直接菜單調用的
Public ZuJinfromContract As Boolean

'定義全局變量queryZuJin 作為判斷frmAdminZuJin 窗體顯示查詢的數據還是全體數據
Public queryZuJin As Boolean
'定義全局變量sqlqzj 作為查詢合同信息時的sql語句
Public sqlqzj As String

'定義全局變量sqlqdj 作為查詢定金信息時的sql語句
Public sqlqdj As String

'定義全局變量sqlqyj 作為查詢押金信息時的sql語句
Public sqlqyj As String