• 所有问题

    • 求access VBA代码：运行查询，并将查询结果 输出至 窗体的文本框中

    查询[入库单]的第一条记录（select top 1 * from 入库单）
    并将第一条记录的第一个字段的值输出至当前窗体的文本框 text1中。

    需要的是在VBA中的代码。

    举报该问题
    其他回答
    第1个回答  2017-01-17
    dim rs as new ADODB.Recordset
    rs.open "select top 1 * from 入库单",currentproject.connection,1,1
    me.text1.value=rs(0).value
    rs.close
    set rs=nothing

    本回答被提问者采纳
    相似回答
    vba如何调用Access的查询,并显示查询结果?答：1、首先，在电脑中找到并打开Access数据库，如下图所示。2、然后点击“数据库工具”选项卡中的“Visual Basic”，如下图所示。3、在弹出的VBA界面中，先选择数据库，然后点击右键，选择“插入”，“模块”，不同于Excel中的VBA，Access中的VBA代码需要放置于模块中，如下图所示。4、在模块中输入VBA代...
    用access vba 编写的实时查询数据库并将结果显示在子窗口的程序答：Private Sub Text2_Change() me.Child75.SourceObject="数据表.99规范列表" with me.Child75.form .Filter="规范名称 like '*" & Text2.Value & "*'" .FilterOn = True end withEnd Sub
    在access中用vba如何运行一个已经存在的动作查询?答：ACCESS中用VBA代码运行一个已经定义的动作查询，可以用运行DoCmd对象的OpenQuery方法予以实现。下面例子示范单击ACCESS窗体命令按钮，执行一个预定义的动作查询将表T1中的数据清空。1）预先定义一个动作查询 将SQL语句：delete from T1;保存为查询名 “清空T1"2) 执行该动作查询 Private Sub Command0_Click...
    ...VBA里面插入一个窗口和一个文本框,有一个Access的数据库,如何实现在...答：建立用户窗口，添加有关控件 建立数据库连接；在用户窗口输入查询条件；执行SQL查询，并返回查询结果；对结果进行判断，提示相应内容
    ACCESS怎么能查询在新窗体体现呢答：例如:'使用vba代码将查询语句设置为新窗体(主窗体)的数据源 Forms!新窗体名.Recordsource="select * from t1"'使用vba代码将查询名设置为新窗体的子窗体数据源 Forms!新窗体名!子窗体名.Form.Recordsource="查询1"为了能令窗体正确显示查询结果，新窗体必须预先设计好且能正确显示数据。
    ACCESS+VBA实现查询批量显示: 是否可以用Recordset将查询的结果记录批量...答：dim rst as recordset set rst=currentdb.openrecordset("select * from 表1")set me.子窗体.form.recordset=rst
    Access中要在窗体中实现多条件查询数据答：(班级=Forms![窗体名]![班级文本框名] and Forms![窗体名]![学号文本框名] is Null)如要实现只输入一个文本框（两个中的任何一个）就查那一个筛选条件，两个都输入就同时查两个筛选条件，则代码可以这样写 select * from 表名 where (班级=Forms![窗体名]![班级文本框名] and 学号=...
    怎样用VBA取得Access数据库中的查询结果?答：To rs.RecordCount - 1 arr(i) = rs.Fields("Flux_Amount")rs.MoveNext Next i MsgBox Join(arr, ",")End Sub 应该说这种用法比较主流，复制代码到vbe，然后引用ado 2.8,将access与excel文件放在一个文件夹，将数据库名变动一下，就可以测试了。（要改为同你的access,表名，字段名一致）...
    access中vba的dlookup语句如果查询到多个符合条件的结果怎完全显示出来...答：你不能直接用查询语句吗？一个文本框怎么可能显示四个影响行数据？那就不要让他文本框显示啊，要么用子报表、要么用自窗体或者表格。直接用SQL语句就解决了：表格控件数据源直接指向查询：Me.RecordSource="Select * From 表 where 你要的条件"Me.Refresh Me.DataGrid1.DataSource=Me ...
    大家正在搜
    access窗体代码access打开窗体代码accessVBA代码access和VBA的区别access与excel的区别access的vba与vb的区别accessvba代码access修改表选中数据VBAaccess代码
    相关问题
    求access VBA代码：运行查询，并将查询结果输出至窗体...
    vba如何调用Access的查询,并显示查询结果?
    excel VBA 中怎么能双重条件查询并把结果输出到窗体文...
    用 access vba 编写的实时查询数据库并将结果显示在...
    access窗体里面如何将查询结果赋值给文本框
    关于Access如何将表中某一字段，全部内容显示在窗体文本框...
    Access中如何将输入项的查询运用到窗体的文本框中？
    access中如何将vba代码中生成的recordset结果...