我想用VB的文本框显示access数据库某行某列的一个数据，该怎么做？

Posted 2023-04-22

最好有查询定位条件，比如这一行的index索引项的值，知道字段名（确定列），用VB连接数据库，sql查询语句查询，将查询出的某行某列的数据显示到文本框就可以了，追问

我用combox控件通过adodc控件绑定数据库，显示第一字段的内容，所以当选定后就会有combox.index，我要文本框显示该行相对应的第二字段的内容，你说用sql的where如何编，这我没想出来，还得请教一下

追答

你如果不急于这个程序的制作，我有如下建议：
1.你现在写的程序按分类来讲属于VB操作数据库类；

2.想用VB操作数据库，你必须在数据库“连接”和数据库“查询”做足功课；

3.用简单的数据类控件来绑定数据表显示内容对编程的者的束缚很大，成熟的程序均不是这样完成的。

4.也许你感觉我达非所问，但如果你看看VB开发数据库的例子，会同意我的看法。

追问

急，我是做自动化的，这是属于半路出家

参考技术A 把这段代码录入到某个按钮中,text0是某个文本框。
Dim db As DataBase
dim rst As DAO.Recordset
Set db=OpenDataBase("C:\test.mdb")
Set rst=db.OpenRecordset("表A")
rst.MoveFirst '用rst.Move xx可以表示将记录集移动到第某行。
Me.text0.text=rst(k) 'k为目标列，范围为0至【字段总数-1】之间，即0表示第1列。
rst.Close

python怎么实现修改文本中某行某列的数值为固定值

具体就是一个由两列数组成的文件bowl_profile_1，我想把第一行的第一列数字改为固定值0，这个怎么用python实现

如果你两列数据中间是用tab键来分割,两个数据都是str类型的

with open("bowl_profile_1") as f:
    data = f.readlines()            # 读入数据
out = ["%d\\t%s"%(0,data[i].split('\\t')[-1]) for i in range(len(data))]   # 修改数据
with oepn(path) as f: # 写入数据，path是新文件的路径
    for i in out:
        f.write(i)

参考技术A

简单，只需要三行代码

import numpy as np
a=np.loadtxt('bowl_profile_1')
a[:,0]=0

欢迎加入我的课程用python做些事，和大家一起学吧。