VB 在文本框里输入内容，敲回车，即可按文本框里的内容去查询，这个功能咋实现

Question

谢谢高手指点
比如，两个COMBOX控件，已经选择好“年龄”“>”，最后一个是TXT控件，输入50，敲回车，即可查询数据库里年龄大于50的人员名单，并显示，这个是用TXT控件的哪个属性或方法？

Answer 1

InStr函数

返回 Variant (Long)，指定一字符串在另一字符串中最先出现的位置。

语法

InStr([start, ]string1, string2[, compare])

InStr 函数的语法具有下面的参数：

部分说明start可选参数。为数值表达式，设置每次搜索的起点。如果省略，将从第一个字符的位置开始。如果 start 包含 Null，将发生错误。如果指定了 compare 参数，则一定要有 start 参数。string1必要参数。接受搜索的字符串表达式。string2必要参数。被搜索的字符串表达式。Compare可选参数。指定字符串比较。如果 compare 是 Null，将发生错误。如果省略 compare，Option Compare 的设置将决定比较的类型。

 

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then'按回车键
MsgBox "G"
End If
End Sub

Answer 2

val(text1.text) 把文本控件的内容转换为数字类型。

查找方法：
sql = "select * from 表名 where 年龄 >" & Val(text1.Text)