不能这样写，双引号内的东西VB认为是字符串，文本框内就显示该条指令字符串了。首先将该条记录找到，取出该字段sno的值，赋于text1.text就可以了。
把双引号去掉，直接写 text1.text=(select sno from student where sname='张三')
用ADO中的RECORDSET
