首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往

如何在access中使用VB从select查询填充组合框?

在Access中使用VB从SELECT查询填充组合框的方法如下:

  1. 创建一个组合框控件,可以通过拖拽方式添加到表单或报表中。
  2. 在表单或报表的VB编辑器中,找到组合框的事件,一般是在"表单/报表"的"事件"选项卡中。
  3. 在组合框的事件中,找到"加载"事件(一般是"Form_Load"事件),双击打开事件处理程序。
  4. 在事件处理程序中,使用VB代码连接到数据库,并执行SELECT查询语句。
  5. 将查询结果填充到组合框中。

下面是一个示例代码:

代码语言:vb
复制
Private Sub Form_Load()
    Dim db As DAO.Database
    Dim rs As DAO.Recordset
    Dim strSQL As String
    
    ' 连接到数据库
    Set db = CurrentDb
    
    ' 构建SELECT查询语句
    strSQL = "SELECT ID, Name FROM TableName"
    
    ' 执行查询
    Set rs = db.OpenRecordset(strSQL)
    
    ' 清空组合框
    Me.ComboBoxName.RowSource = ""
    
    ' 填充组合框
    Me.ComboBoxName.RowSource = rs.Name
    
    ' 关闭记录集和数据库连接
    rs.Close
    db.Close
    
    ' 释放资源
    Set rs = Nothing
    Set db = Nothing
End Sub

在上面的代码中,需要将"TableName"替换为实际的表名,"ComboBoxName"替换为实际的组合框控件名称。

这段代码首先连接到数据库,然后构建SELECT查询语句,执行查询并将结果填充到组合框中。最后关闭记录集和数据库连接,释放资源。

这种方法适用于Access数据库中的表单或报表,可以根据实际需求进行修改和扩展。

腾讯云相关产品和产品介绍链接地址:

页面内容是否对你有帮助?
有帮助
没帮助

相关·内容

VB.NET数据库编程基础教程

Access数据。 (二)ADO.NET的名称空间 ADO.NET是围绕System.Data基本名称空间设计,其他名称空间都是System.Data派生而来。...(1)连接字符串: 连接字符串本身由下表列出的参数构成。( 图) 我们来看一下如何在连接字符串上使用参数来初始化一个连接对象。...这表示用户可以使用ADO.NET绑定到传统的数据存储区(存储在Access或SQL Server表的数据),也可以绑定到文件读取的、包含在其他控件的或存储在阵列的数据结果。...1.绑定前的准备工作 (1)创建一个名为db1的Access数据库,数据表Student的结构 图所示: 并在表增加以下几条记录。 图所示。...(2)打开组合并将各个文本绑定到相应的字段。

4.6K30

Excel实战技巧67:在组合添加不重复值(使用ADO技巧)

很多情况下,我们需要使用工作表的数据来填充组合,但往往这些数据中含有许多重复值。如何去除重复值并得到唯一值,这是一个永恒的话题,大家也会用到各式各样的方法得到结果。...本文讲解一种技巧,使用Recordset(记录集)来获取唯一值并将其填充组合。 示例数据如下图1所示。在工作表中有一个组合,需要包含列A的省份列表,但是列A中有很多重复的省份数据。 ?...单击功能区“开发工具”选项卡“插入”按钮下ActiveX控件的“组合”,在工作表插入一个组合,可以看到Excel将其自动命名为“ComboBox1”,如下图2所示。 ?...可以在任何事件或过程调用它们,例如工作簿打开事件、查询刷新事件或者按下按钮后。 运行或调用过程后,在工作表单击组合右侧下拉按钮,结果如下图3所示。 ?...然而,上面的方法更容易,并且使用记录集允许装载的记录集中快速调整查询来捕获另一个字段或者创建另一个组合

5.6K10
  • vb程序设计基础教程视频_web程序设计二级考试考什么

    VB程序设计教程:入门到精通 2015年毕业于青岛大学,精通c语言、C++、VB、JAVA、Python、Office、网络技术等,是以为互联网教育创业者,主要从事全国计算机等级考试培训工作...4.format函数和if then选择语句 5.多种if选择语句和案例 6.select情况语句 7.条件函数和for循环语句 8.do loop循环语句和案例 9.goto语句和判断素数案例 10....三个案例 第5章:数组和自定义类型 1.数组的概念和动态数组 2.动态数组 3.数组的基本操作和案例 4.选择和冒泡排序 5.数组插入和删除元素 6.列表组合的基本属性 7.列表组合案例...(部分讲师考虑到版权问题,暂未上传附件,敬请谅解) 常用开发实战 企业常见开发实战案例,带你掌握Python在工作的不同运用场景。...发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。

    66810

    使用ADO或ADO控件访问数据库

    VB为用户提供了很多访问数据库的方式: 【方法一】使用ADO对象,通过编写代码访问数据库 【方法二】使用ADO Data控件和数据环境设计器创建数据库连接,不编写代码访问数据库 一、首先我还是以Access...一般步骤: 创建Command对象,使用?作为Select语句中的查询参数 objcmd.commandtext="SELECT * FROM 系统用户 WHERE 用户名 LIKE ?"...("用户名")="admin" 执行Command对象的Execute方法完成查询 Recordset对象——记录集对象 使用ADO Recordset 对象用于保存数据源获得记录集...Control 6.0(OLEDB)添加到工具箱,添加到窗体,下面详细介绍“属性页”对话。...(数据源包含多个数据集,则需要设置该属性,在设置该属性时,vb可自动列出源可用的数据集;数据源只包含一个数据集,则不需要设置该属性) *DataField属性:用于返回或设置绑定控件使用的特定字段

    1.7K10

    Visual Basic 初体验与介绍

    用户可以微软官网上下载适合自己操作系统的版本进行安装。安装完成后,就可以在Visual Studio创建VB项目了。...接下来,就可以通过拖拽控件、编写代码等方式来构建自己的VB程序了。三、VB语法基础数据类型与变量VB支持多种数据类型,整数、浮点数、字符串等。在使用变量之前,需要先声明变量的类型和名称。...例如:Dim number As Integer = 10Dim name As String = "张三"条件语句与循环VB的条件语句主要有If...Then...Else和Select Case两种形式...四、控件与窗体设计控件简介VB提供了丰富的控件供开发者使用,如按钮、文本、标签等。这些控件可以方便地添加到窗体上,并通过编写代码来实现各种功能。窗体设计在VB,窗体是承载各种控件的容器。...通过使用FileOpen、FileClose、PrintLine等函数,可以实现文件的打开、关闭以及数据的读写操作。数据库连接VB支持与多种数据库进行连接,SQL Server、Access等。

    19500

    vbadodc连接sql(如何用vb打印Access数据)

    本文实例讲述了使用ADODB.Connection连接access数据库的方法,驱动类型版本为:Microsoft.Jet.OLEDB.4.0。...在VB的数据库操作,连接数据库是第一步,也是最基本的,本文所述的这个例子,对于初学者学习如何在VB连接Access数据库有着很好的借鉴参考价值。...= “操作数据库” Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId...If 数据库.Close Set 数据库 = Nothing End Sub 这个实例建立了一个名为“数据库”的New ADODB.Connection对象,用此对象增连接数据库,在连接成功后,弹出消息告之连接结果...,在大多数情况下,VBAccess2003之前版本的数据库连接,基本都这样。

    2K10

    WinCC V7.5 制作设备运行报表

    这里使用 Access 数据库存储数据。因此需要首先创建 Access 数据库。...5 <报表查询的实现过程是通过脚本查询数据库,把查询结果填充到 excel 模板并另存为 htm 文件,在 WinCC 画面添加 web 控件显示 htm 报表文件。...第三步,添加组合控件 在画面上添加组合控件,用来选择设备。可以智能对象下拖拽组合控件直接添加到画面,并设置属性。步骤如图 19 所示。...也可以直接 excel 拖拽文本到 WinCC 直接生成组合。如图 20 所示。 首先在 excel 输入需要的文本,选择所有文本,移动鼠标到选中区域的右下角, 直到鼠标变成十字光标形状。...然后按着鼠标右键拖拽文本到 WinCC 画面,松开鼠标,在弹出对话中选择“插入组合”。最后,具有三项文本的组合被插入到 WinCC 画面。

    7.5K73

    MySQL数据库案例实战教程:数据类型、语法与高级查询详解

    select * from websites select id,name,url,alexa from websites 实际开发尽量不要使用 * 原因: 在实际开发尽量不要使用*通配符查询语句的原因有几个方面...limit 2,3 -- 第二条开始查,查三条 distinct去重 select distinct country from websites 查询结果去除表重复重复国家的数据项 where语句...- DESC 表示降序(大到小),使用 DESC 关键词可以让查询结果按指定列以降序排列。...子查询是指在 SQL 查询嵌套使用查询,将内部查询的结果作为外部查询的数据源之一。...具体解释如下: `select name, ifnull(count,0), ifnull(a.date,'无日期')`: 左表 websites 中选择 name 列,并从右表 access_log

    21610

    【续坑】如何心平气和地填坑之拿RSViewSE的报表说事(2)

    读取数据库内数据,实现查询,存储,打印,显示等功能我们可以使用一些高级语言编程实现,VB、C#、C++等。这部分我们最后再做扩展介绍。...4)、使用RSViewSE软件的事件功能触发Datalog记录历史数据 启动事件:事件配置完成后,需要在RSViewSE项目的(HMI 服务器属性)对话,点击 Components(组件)选项卡,...在放个按钮用于触发查询的过程 2、编写脚本,Access数据库读取数据 因为AccessSQL Server里读取数据时SQL 语句会稍有差异,我们需要单独分开说。...先建一个带输入参数和返回值的子函数,其输入参数是一条SQL查询语句,输出参数是一个二维数组 3、调用数据库读取函数,填充到下拉里面去 思路:下拉框内应该显示数据库内现有的泵站编号,并且可以选择单独查询一个和查询全部...使用SQL语句查询是需要注意日期格式,在查询Access的日期时间时在两边加上#符号,#2020/03/22 12:00:00#。另外,在Access通配符需要注意。

    2.9K10

    WinCC V7.5 制作 设备运行报表3

    5 <报表查询的实现过程是通过脚本查询数据库,把查询结果填充到 excel 模板并另存为 htm 文件,在 WinCC 画面添加 web 控件显示 htm 报表文件。...第三步,添加组合控件 在画面上添加组合控件,用来选择设备。可以智能对象下拖拽组合控件直接添加到画面,并设置属性。步骤如图 19 所示。...也可以直接 excel 拖拽文本到 WinCC 直接生成组合。如图 20 所示。 首先在 excel 输入需要的文本,选择所有文本,移动鼠标到选中区域的右下角, 直到鼠标变成十字光标形状。...然后按着鼠标右键拖拽文本到 WinCC 画面,松开鼠标,在弹出对话中选择“插入组合”。最后,具有三项文本的组合被插入到 WinCC 画面。...组合 2"为组合名称 Set timepicker = ScreenItems("控件 2")'获取报表日期。"

    5.3K11

    Vba菜鸟教程

    GetOpenFilename打开文件 Dialogs(对话) 使用ADO操作外部数据 使用ADO连接外部Excel数据源 常用sql语句 使用ADO连接外部Access数据源 附表 对齐方式...arr() '定义数组,不能单独给每个变量赋值,用区域赋值 dim arr(10) '下标0开始' ReDim [Preserve] arr(1 To j) '数组不能直接定义变量。...SQL对数据进行操作 '抓取数据:CopyFromRecordse数据集中拷贝 'conn.Execute执行sql语句 'data是sheet名称,表使用[sheet名称$] Range(“a1...HDR=YES是有表头,取数据表头忽略 常用sql语句 查询数据 select * from [data$] 查询某几个字段 select 姓名,年龄 from [data$] 带条件的查询 select...conn.Execute("select * from [data$]").GetRows) 使用ADO连接外部Access数据源 1 在VBE界面 工具—引用 勾选Microsoft ActiveX

    17K40

    表单控件的副产品——查询控件

    1、自己描绘控件,比如能够自己添加文本、下拉列表这一类的控件。          2、可以自己获取用户输入的信息,根据查询方式组合where 后面的 SQL语句 。     ...然后根据这个属性,我们就可以来组合SQL语句了,准确的说是where 后面的SQL语句。目前的方法还是需要使用case 。...vb.net来写的,这个是用Reflector反编译的,不知道为什么还给弄出来goto了。...我是习惯使用DataTable来装载数据,而填充 DataTable 需要SQL语句,那么我只需要得到 where 后面的部分,查询的功能就可以实现了,所以对于我来说,查询控件能够输出像 "myName...可能有些人喜欢使用存储过程来返回记录,查询条件也会写在存储过程里面,那么在调用存储过程的时候需要传递存储过程的参数,这种情况,查询控件也可以帮上点忙吧。

    1.1K80

    Excel实战技巧68:创建级联列表使用ADO技巧)

    在《Excel实战技巧67:在组合添加不重复值(使用ADO技巧)》,我们使用记录集技巧给组合添加了不重复值,并概要讲述了ADO记录集基础知识。本文利用记录集技巧,创建级联列表。...同样,选择列表Market的某项,列表State仅显示与Market项与该项关联的值。 解决方法 使用ADO记录集为子列表提取记录,使用父列表的值作为条件。...在本示例,创建一个函数,接受子列表作为其参数,然后使用该列表判断提取什么数据以及填充哪个列表。..._ "ExtendedProperties=Excel 8.0;" & _ "Persist SecurityInfo=False" '确定正确的SQL语句,在父列表使用该值作为查询的参数...'装载查询到记录集中 Myrecordset.Open strSQL,Myconnection, adOpenStatic '填充目标子列表 With TargetChild.Object

    1.3K20

    winform能做出漂亮的界面吗_winform界面美化第三方控件

    在这里,框架将属性值 Int32 转换为 String 并返回。...fluent.SetBinding(label, Function(l) l.Text, Function(x) x.Price, "Price: {0:C2}") 将多个属性绑定到同一个控件 要在同一控件组合多个属性的值...此方法接受以下参数: 控件名称; 应该绑定的控件属性; 一个字符串数组,填充了可绑定的 ViewModel 属性的名称,这些属性的值应该组合在一起; 一个格式字符串(对于不可编辑控件)或一对转换器(如果允许用户编辑绑定控件...DevExpress 演示中心提供了两个模块,它们将 FirstName 和 LastName 属性的值组合到一个 TextEdit 编辑器。...使用格式字符串的模块将属性绑定到禁用(不可编辑)的编辑器,在使用转换器的模块,您可以更改 TextEdit 值并将更新后的字符串传递回 ViewModel 属性。

    3.2K20
    领券