乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
楼主: nivuahc

学习VBA

[复制链接]

14

主题

194

帖子

5

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
250
发表于 2003-10-17 10:25:00 | 显示全部楼层
好吧,Chuck,如果有什么安慰的话,我一直在阅读一本关于VBA for Excel的书。一个朋友给了我。无论如何,前几天我尝试制作一个vba函数,但它失败了。我仍在尝试找出模块、类模块和默认包含此绘图的对象文件夹之间的区别。你怎么知道使用哪个以及何时使用。
回复

使用道具 举报

18

主题

222

帖子

51

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
260
发表于 2003-10-20 04:14:16 | 显示全部楼层

你有什么问题?
我假设你有dim(med)变量?在这种情况下,当按钮被按下或任何事件触发它时,
  1. myVar = theComboBox.value
回复

使用道具 举报

18

主题

222

帖子

51

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
260
发表于 2003-10-20 04:26:41 | 显示全部楼层
我可以提供一个建议吗?
而不是使用文本文件〜Access数据库可能是一个更有用/通用的工具。
您是否对建议的应用程序进行了伪编码,并列出了您希望它执行的所有功能?
界面的模型也很有用
回复

使用道具 举报

0

主题

27

帖子

2

银币

初来乍到

Rank: 1

铜币
27
发表于 2003-10-20 08:56:07 | 显示全部楼层
事实上,这是一个好主意,很容易编辑现有的条目等。等等。
在我的脑海中激发出一大堆新想法
去你的.................
回复

使用道具 举报

3

主题

44

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
58
发表于 2003-10-20 10:22:51 | 显示全部楼层
好吧,我对TXT文件而不是DB的想法是
1。我的公司很便宜。我有Access,但我是唯一一个。
2.如果出于任何原因,其他人想稍后添加到列表中,使用TXT文件是
任何人
做这件事的最简单方法。例如,我在这里停止工作。
我遇到的问题是:
我有TXT文件(如上所述格式化)。
我有一个表单。
如何获取表单中显示的TXT文件中的数据(在组合框或列表框中)?
表单打开,读取DETAILS.TXT的内容,并在组合框中列出描述。
用户选择一个描述,并根据他们选择的描述将变量设置为POWER或COMM。
格式为
POWER|电源详细信息
COMM|通信详细信息
etc...
作为DETAILS.TXT文件中的单行文本。
所以假设用户从列表中选择“通信详细信息”。
这将一个变量(现在我们称之为VAR1)设置为COMM,程序会查找一个名为COMM的文件夹,其中包含一个名为_COMM.TXT
的TXT文件(以这种方式命名,以便在我打开文件夹时它始终位于列表的顶部)

在该TXT文件中是一个详细信息和描述列表,如下所示:
Comm0001|示例声音系统导管时间表
Comm0002|天花板烟雾探测器安装详细信息
Comm0003|壁挂式数据/电话插座详细信息
Comm0004|数据/语音/视频插座详细信息
Comm0005|天线安装详细信息
该程序列出了列表框中的所有描述,而不是“Comm0001”位,用户从列表框中选择“壁挂式数据/电话插座详细信息”。
一个变量(现在我们称之为VAR2)设置为“Comm”绘图'Comm0003'显示在超大预览窗口中。
如果用户选择标有“将详细信息插入AutoCAD”的按钮,绘图将插入当前绘图中。
如果用户改变主意并从列表中选择
不同的
描述,例如“Sample Sound System Conduit时间表”,变量VAR2将更改为“Comm0001”等等。
用户是否应该决定他们想要的实际上是一个POWER细节,并从组合框中选择VAR1的值更改为“POWER”等等。
这有任何意义吗?
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-14 21:20 , Processed in 0.359112 second(s), 60 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表