int.bas

学生信息管理系统 学生信息管理系统

Attribute VB_Name = "basdim"
Option Explicit
Public loginname As String '登陆名称
Public useradmin As String '用户的权限
Public gridsave As Boolean '当前是否可保存状态
Public gridedit As Boolean '当前是否可修改状态
Public griddelete As Boolean '当前是否可删除状态
Public griddel As Boolean '由表格确定是否可执行删除
Public yuzhi As Boolean '当前是否可以预置行数
Public duixiang As Integer '新增加产品时对象操作窗体
Public dbase As String '当前操作进程
Public hang As String '取值当前表格鼠标所在为多少行
Public servername As String 'SQL服务器名称
Public serverid As String 'SQL服务器登陆帐号
Public serverps As String 'SQL服务器登陆密码