如题:在VB中有文本框,里面是输入的地址,比如是:哈尔滨,,但是在Access中的地址列,是:辽宁省哈尔滨市,怎么根据文本框中的哈尔滨查找出Access中的辽宁省哈尔滨市的相关信息,小弟还只是入门阶段,恳请高手们给予帮助,小弟在此谢过了。
oh shit,,,,,你要是不知道,就不要在这里 2 ,ok??
追答2
vb怎么实现从数据库中检索与文本框中有相同字符记录
select * from table1 where 字段1 like '*语文*'如果要逐字检索,需要多个条件:select * from table1 where 字段1 like '*语*' and 字段1 like '*文*'星号是通配符,代表0个或者多个字符,在不同的数据库系统里可能会有不同。SQL语句是传入数据库的命令,如果不清楚如何将命令传入数据库,建...
VB DATAGRID 如何用文本框中输入数据 ,查询数据
方案一:如果您需要导入的数量量不是太大的话,可以每次查询时导入数据.在数据库中,建立了个查询的视图.导入到数据集中,在您的文本框的文本改变的过程中,不断调用数据表的LOAD过程,此过程需要参数,这个参数就是您的文本框的内容.这样做的缺点是需要经常联系数据库,并从数据库导入内容,加大了数据库的负...
vb中如何让文本框和数据库中的数据关联
您好!设置文本框DataField和DataSource属性,DataSource是指定数据控件绑定数据,如Data控件,DataField属性是让文本框显示DataSource是指定数据库文件的字段内容 举例:ta.mdb是C盘下的一个数据库文件,有一个表名Stu,有两个字段名,序号和姓名。在工程窗口中画一个Data控件,和两个文本框,将Data控件的...
vb中如何让文本框和数据库中的数据关联
1.在窗体上添加一个TextBox控件(Text1),一个Data控件(Data1);2.设置Data1的DatabaseName为数据库文件,设置RecordSource为需要关联的表;3.设置Text1的DataSource为Data1,设置DataField为需要关联的列名.注:以上方法仅使用与Access,Excel等,但不能用于连接SQL Server....
VB如何从数据库里将查询符合要求的内容列出来??如A列有10个符合数据,如...
Dim a(1 to 10) As integer使用data控件查找数据:Data1.Recordset.FindFirst "要找的字段名称=" & "'" & Text1.Text & "'"(Text1中是你要找的内容)以上是定位你要找的字段,然后建立一个文本框,与data控件绑定,用于显示查找的数据。利用for循环,将10个数据一一导入数组中 for i = 1 ...
vb里执行时往文本框输入数据,怎么获取这个数据。文本框原来有值在
这才是符合所谓“图形用户界面”精髓的规范做法,否则就回到10多年前DOS时代的字符界面了。如果你非要这么做,那么可以在提示文字与输入数据之间用个符号分隔开来,比如用冒号:需要的时间:5 那么在其他文本框中可以这样来提取5这个数据:Text2.Text = Split(Text1.Text, ":")(1)...
我想用VB的文本框显示access数据库某行某列的一个数据,该怎么做?
最好有查询定位条件,比如这一行的index索引项的值,知道字段名(确定列),用VB连接数据库,sql查询语句查询,将查询出的某行某列的数据显示到文本框就可以了,
VB 在文本框里输入内容,敲回车,即可按文本框里的内容去查询,这个功能咋...
InStr函数 返回 Variant (Long),指定一字符串在另一字符串中最先出现的位置。语法 InStr([start, ]string1, string2[, compare])InStr 函数的语法具有下面的参数:部分说明start可选参数。为数值表达式,设置每次搜索的起点。如果省略,将从第一个字符的位置开始。如果 start 包含 Null,将发生错误。...
...控件选择相应内容,然后在文本框里显示相应的数据
两组数据你要有关联的东西,简单的用二维数组(建议用集合Collection),如果用数据库,后面操作会比较简单。当然,如果数据不是很多,直接在代码里写就行了,比如 '添加数据到Combo,也可以直接在设计界面编辑列表(List属性)Combo1.Clear Combo1.AddItem "操场"Combo1.AddItem "教学楼"...'点击事件...
VB编程 在一个文本框中求符合条件的数字
Private Sub Command1_Click()Dim i%, t1$, t2$(), s t1 = Text1 For i = 1 To Len(t1)If InStr("-.01234566789", Mid(t1, i, 1)) Then s = s & Mid(t1, i, 1) Else s = s & " "Next Do If InStr(s, " ") <> 0 Then s = Replace(s, " ", " ") ...