UC知道谁能帮我解释一下这段代码？
来源：百度知道 编辑：UC知道 时间：2024/06/07 16:49:29
dim Questr As String
dim rsQuery As New ADODB.Recordset
dim Drivername as string
dim remark as string
dim LtItm as ListItem
dim i as integer
drivername=Replace(trim(Me.txtQueName.Text), "'"," ' '")
dim rsQuery As New ADODB.Recordset
dim Drivername as string
dim remark as string
dim LtItm as ListItem
dim i as integer
drivername=Replace(trim(Me.txtQueName.Text), "'"," ' '")
都是定义变量,
String是字符串变量,
integer是数字型变量,
New ADODB.Recordset 是数据库记录,
ListItem 单选框的控件.
drivername=Replace(trim(Me.txtQueName.Text), "'"," ' '")用空格替换Me.txtQueName.Text文本框中的值.