access中能不能实现类似于图片中的一些功能？

王仁海　发表于：2014-01-21 14:24:19 　

复制

截了一个管理软件的图片！

我想在ACCESS中做出一个窗体，类似于上面的功能，每次打开窗体的时候，上面没有数据！

然后在每行添加需要的数据，添加完成后，点保存，那之前添加的数据自动添加到某一个表格中去了！

能不能做这样的？需要什么技术？

Top

chinasa 发表于：2014-01-21 14:47:17

你这个需求就是普通的非绑定数据源窗体，给你两个其它人的例子吧。

其原理就是先在窗体输入，点保存时才通过代码写入到表中。

http://www.accessoft.com/article-show.asp?id=7873

http://www.accessoft.com/article-show.asp?id=6600

Top

chinasa 发表于：2014-01-21 14:53:53

'其实就是这段代码，你根据自己的需求改改就可以用了

    Dim rst As DAO.Recordset    '定义rst变量为DAO类型的记录集
    If MsgBox("都填写好了吗？" & vbNewLine & "您确认要保存吗？", vbYesNo + vbInformation, "提示") = vbYes Then
        Set rst = CurrentDb.OpenRecordset("产品", dbOpenDynaset)    '以动态集方式打开表,赋给变量rst
        rst.AddNew    '新加记录
        rst("库存量") = Me.库存量
        rst("订货量") = Me.订货量
        rst.Update    '记录集更新
        rst.Close    '关闭记录集
        Set rst = Nothing    '释放rst变量
        MsgBox "保存成功！", vbInformation, "提示"
        Me.库存量 = Null
        Me.订货量 = Null
    End If

Top

王仁海发表于：2014-01-21 15:44:50

您这是单条记录的录入、保存，这个我知道！

我想要的是，上面图中那样的，在每一行都填入记录，不管是录入两行还是三行，然后点保存，将每一行的数据再一起保存到某个表中，而不是单行的字段保存！

Top

chinasa 发表于：2014-01-21 16:33:18

方法有两个：

方法一：建立一个临时表，结构与你的目标表完全一致。临时表与窗体绑定，录入完数据点保存的时候把临时表数据追加到目标表，同时清空临时表。这个方法看起来很笨，但却简单有效。

方法二：判断窗体中“品名规格”对应的N个文本框是否为空，做个循环往目标表添加多条记录，当读到“品名规格”为空时则停止。这个方法有个问题，如果窗体中文本框很多的话，那么写起来太累。那么你可以考虑把文本框命名的有规则些，比如：品名规格1、品名规格2、品名规格3.....，然后文本框的名字用变量。关于如何使用变量的问题查查看论坛中是否例子。

Top

落尘_小新发表于：2014-01-21 21:20:17

你还可以选择使用其它控件的方法来实现.

如 MSFlexGrid 控件可以显示网格数据，也可以对其进行操作。它提供了高度灵活的网格排序、合并和格式设置功能，网格中可以包含字符串和图片。

Top

总记录：5篇页次：1/1 9 1 :

Access交流中心

access中能不能实现类似于图片中的一些功能？