VB写ACCESS数据库判断条件的问题。。。 5
711，713,715,717是字段名，我想实现在一个文本框中输入数字，判断是在哪2个字段名中间。比如我输入714他们在713跟715之间。...
711，713,715,717是字段名，我想实现 在一个文本框中输入数字，判断是在哪2个字段名中间。比如我输入714 他们在713 跟715之间。
展开
2个回答
展开全部
'思路：
'一 读取数据库到datatable。
'二遍历数据表，依次比对，符合条件终止。
dim tb as datatable=new accesshelper.gettable("select 711,713,715,717 from [tablename]")
'建议做个accesshelper类，处理access数据库的读写更新删除等操作。需要的话我传个给你
dim r =tb.rows.count '数据行数
dim c=tb.colums.count‘数据列数
dim a as single=textbox1.text
dim i,j as integer
dim c,d as integer 'C\D用来返回就是所在的栏索引
while i<r
while j<c
if tb(i)(j)<=a and j<c-1 then
if tb(i)(j+)>=a then
c=i
d=j
exit while
end if
end if
j+=1
end while
i+=1
end while
if c >0 and d>0 then
返回tb.cloums(c).value和b.cloums(d).value。
两个数值范围应该是td(i-1)(c),td(i-1)(d)
'一 读取数据库到datatable。
'二遍历数据表，依次比对，符合条件终止。
dim tb as datatable=new accesshelper.gettable("select 711,713,715,717 from [tablename]")
'建议做个accesshelper类，处理access数据库的读写更新删除等操作。需要的话我传个给你
dim r =tb.rows.count '数据行数
dim c=tb.colums.count‘数据列数
dim a as single=textbox1.text
dim i,j as integer
dim c,d as integer 'C\D用来返回就是所在的栏索引
while i<r
while j<c
if tb(i)(j)<=a and j<c-1 then
if tb(i)(j+)>=a then
c=i
d=j
exit while
end if
end if
j+=1
end while
i+=1
end while
if c >0 and d>0 then
返回tb.cloums(c).value和b.cloums(d).value。
两个数值范围应该是td(i-1)(c),td(i-1)(d)
追问
看不懂。。本人比较菜。可以传给你你给写下ma
追答
我用的是VB.net.传给我吧zuckham@qq.com，希望能帮到你。
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
看上去似乎在滥用数据库哦……
字段名字 尽量不要用 数字 ！这样在后续 会遇到很多的麻烦……
另外不知道 你要判断什么……应该详细描述一下 才可以哦
字段名字 尽量不要用 数字 ！这样在后续 会遇到很多的麻烦……
另外不知道 你要判断什么……应该详细描述一下 才可以哦
更多追问追答
追问
不用数字，哪就第一行做判断依据，就是在文本框里输入数字（比如输入712）我想让程序判断这个输入的712在这4个字段的哪2个之间（输入712就在字段7111跟713之间）
追答
不知道 你具体要做什么哦，能说详细一下或许有其他解决问题的方法……
但就你目前的诉求来说 只以第一行来找到两个字段？你的这表数据 从左往右一次增加？没有跳跃？即 不会 第三个字段比第二个字段数值小 而第四个又比第三个大？这样的情况？
解决一个 具体问题 有很多的办法 千万不要一开始 就把自己限定在某个方法里边哦……
你再 补充说明一下 然后给你建议 判断条件 要用来作甚？你要做查询？懵圈ing……
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
