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

来源：学生作业帮助网 编辑：作业帮 时间：2024/09/17 07:29:15
xJ@_eªHj -cgj D]KM5Uzjxn.23mL•p7s?0L0ucN2;1hxbI CC$:4G$@tZz?}`Г2g M*EXH"yz@LO_j4g&۹EQ@?|= pQİ0}x#ކafo=>oQeYT`lIC.^!C&4 FDSS0ijjJԝ7qL%钸VN$֦{ع{r;6l{8k]]h;UrxNbdڥvI[ PuW#'.l>vVtAjaDqM(s&IἛ4nZWgعwcV,)H~ Γzl=BD%rzL