Attribute VB_Name = "bsdim"
Public gridaddnew As Boolean '測試是否添加狀態
Public gridsave As Boolean '當前是否可保存狀態
Public gridedit As Boolean '當前是否可修改狀態
Public griddelete As Boolean '當前是否可刪除狀態
Public tkbase As String '當前操作表名稱
Public fnumber As Integer '表中字段的個數
Public nnum As Integer '數據總頁數
Public numpage As Integer '數據當前頁數
Public hang As Integer '取值當前表格鼠標所在為多少行