bsdim.bas

来自「奖学金查询系统」· BAS 代码 · 共 13 行

Attribute VB_Name = "bsdim"
Public yxsql As String
Public yxsql1 As String '定义一个用来保存SQL语句的字符串变量
Public yxsql2 As String
Public yxnumber As Integer '表中字段的个数
Public hang As Integer '取值当前表格鼠标所在为多少行
Public yxadmin As String '当前的操作员
Public yxtable As String '指定当前使用的表名
Public server As String '服务器名称
Public loginname As String 'SQL登陆用户名
Public password As String 'SQL密码