Question

Private Sub Form_Load()

Private Sub Form_Load()
Dim SQL As String
Dim rs As New ADODB.Recordset
If flag = 1 Then
SQL = "select SID from StuffInfo order by SID"
Set rs = TransactSQL(SQL)
If rs.EOF = False Then
rs.MoveFirst
firstID = rs(0)
这段代码什么意思啊

Answer 1

这段代码表示在该窗体加载时，连接到数据库
其中：
SQL是定义的连接字符串，Stufflnfo是做好的表，SID是其中的一个字段
rs表示记录集
最后三句意思是：记录集rs不为空时，指针指在第一条记录上。并将第一条记录第一列的值即rs(0)传给变量fristID