小学数学微型课面试:跪求详细每一句的解释
来源:百度文库 编辑:杭州交通信息网 时间:2024/05/06 01:26:34
Dim strsql As String
strsql = "select 密码 from 权限设置 where 姓名='" & Strxm & "'"
Data1.RecordSource = strsql
Data1.Refresh
Data1.Recordset.MoveFirst
strsql = "select 密码 from 权限设置 where 姓名='" & Strxm & "'"
Data1.RecordSource = strsql
Data1.Refresh
Data1.Recordset.MoveFirst