请问VB中如何不通过data控件来直接访问Access数据库的数据?譬如在TextBox中直接显示某字段?
来源:百度知道 编辑:UC知道 时间:2024/05/26 17:00:49
我想尝试着用VB+access编一个保费计算的程序,通过comboBox选择车型,改变comboBox的值时,TextBox显示数据库中所对应的费率值,再设定计算公式来计算得出保费,要求所有的TEXTBOX控件打开程序显示值为第一条数据记录。书上的例子都是TextBox只有绑定data控件才能获得数值。请VB高手教教我,最好能详细点,因为我是一个超级菜鸟,从来都没有编过程序,各位高手不要见笑,呵呵!
新建一个工程,在窗体上添加您所需要的控件,
点“工程”菜单——》“引用”,选择Micosoft ActiveX Date objects 2.7 library
在Access中建立数据库
这里我假设你的数据库叫“费率”={车型,出保费},只有这一个表。
填写代码如下:
Option Explicit
Private cnnMain As New ADODB.Connection
Private Sub Combo1_Click()
Dim rs As New ADODB.Recordset
If Combo1.Text <> "" Then
rs.Open "select 出保费 from 费率 where 车型='" & Combo1.Text & "'", cnnMain, adOpenKeyset, adLockReadOnly
If rs.RecordCount > 0 Then
Text1.Text = rs!出保费 & ""
Else
Text1.Text = ""
End If
Else
Text1.Text = ""
End If
Set rs = Nothing
End Sub
Private S
请问VB中如何不通过data控件来直接访问Access数据库的数据?譬如在TextBox中直接显示某字段?
VB中不通过菜单编辑器,如何自己添加菜单
在vb中,如何将data控件关联的数据库信息读入数组?
如何在vb中对SQL SERVER进行条件查询并将结果显现在data grid的控件中
在vb中 DataGrid1与数据库(不使用data ,adodc,DataEnvironment 等控件)如何动态连接库?
怎样在vb data控件中实现 多表个显示
请教VB前辈 DATA GRID 中.ActiveConnection 的问题
在VB中data控件怎么换成adodc
请问在vc2005中如何添加ADO Data,DataGrid等控件?谢谢!!
请问在VB中如何调用多线程?