ask_word.Text = name.dt.Rows[0][ psnel_retakepwd ].ToString().Trim();中的Rows[0][ psnel_retakepwd

ask_word.Text = name.dt.Rows[0][ psnel_retakepwd ].ToString().Trim();中的Rows[0][ psnel_retakepwd name.text.trim() tr.Text = dr[j][Name].ToString();是什么意思 还是不明白哪里出错了,可以帮我看看吗?Private Sub Command1_Click()Dim strsql As StringIf Text1.Text ThenAdodc1.Recordset.CloseIf Val(Text1.Text) > 0 Thenstrsql = select * from name where name=' & Trim(Text1.Text) & 'End IfAdodc1 <input name=prod1 type=text value=> dim strsql as stringIf Text1.Text ThenAdodc1.Recordset.CloseIf Val(Text1.Text) 0 Thenstrsql = select * from name where name= & Trim(Text1.Text) 'Trim去掉前后空格Elsestrsql = select * from name where name=' & Trim(Text1.Text) & 'End IfA dd.Connection = OleDbConnection1 dd.CommandText = insert into qingjia (name,reason,reasoncont,bgtime,overtime,tianshu,zhuangtai,sqtime) values ( & ' & Lbname.Text & ',' & Dpreason.SelectedValue & ',' & Txcont.Text & ',' & DateVal 英语翻译input as #1do while not lint.input #1,stratext1.text=text1.text+stra+chr(13)+chr(10)下面还有open commondialog1.file name for out put as #2write #2.text1.text style=text-decoration: =text(a1,aaaa) text 在窗体(Name属性为Form1)上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name 属性为Command1）,然后编写如下两个事件过程：Private Sub Command1_Click()a = Text1.Text + Text2.Textb = Text1.Text You have an error in your SQL syntax; check the manual that corresponds to your MySQL server versio$sql=insert into 'test1'('name','date','text') values('$name','$date','$liuyanneirong');if(mysql_query($sql)){if(mysql_affected_rows() >= 1 )echo 'in if（txtUserid.Text ==“”）里面.Text是什么意思 Text1.Text = Text1.Text + CStr(a(i)) + if (textBox1.Text == 0) textBox1.Text = ; this.textBox1.Text += 1; sle_1.text是怎么意思sle_1.text=string(dec(sle_1.text)*add1) 求教：大神看看是哪里出错了 Private Sub Command1_Click()If Trim(txtName.Text) = ThenMsgBox 请输入单位名称txtName.SetFocusExit SubEnd IfAdodc1.Recordset.AddNewAdodc1.Recordset.Fields(name) = txtName.TextAdodc1.Recordset.Field