使用 Microsoft 访问，Visual Basic。
我在做这个任务时遇到了很大的问题。我所做的：创建了一个访问表，我在其中放置了测量值（从米开始）：英里 = 10000 米，海里 = 1862 米，英制英里 = 1652，公里 = 1000 米，一直到毫米。
我为输入创建的内容：1 个盒子需要一个要转换的整数和一个用初始单位指定的 1 个盒子。
我为输出创建的内容：1 个框显示结果整数，其中 1 个框指定了输出的所选单位。
任何人都可以请，请帮助我的代码？
问问题
585 次
2 回答
0
对于这两个组合框，将它们绑定到第 2 列faktorTilMeter，并将 ColumnWidths 设置为，例如：2,542cm;0cm。
然后，将此表达式指定为输出文本框的ControlSource ：
=TextboxInput/ComboboxFrom*ComboboxTo
于 2018-09-26T09:21:34.390 回答
0
老实说，直到今天我才真正注意到该CONVERT功能，但这里有一个快速演示，展示了我如何在 Excel 中将“转换工具”拼凑在一起。
如果你想在 Access 中做同样的事情，前提是一样的，但它会做更多的工作，因为你必须从头开始设计表单，而不是使用工作表，这有点用于这种类型的工作。
在 Access 中使用 Excel 函数
在您能够CONVERT在 Access 中使用 Excel 的功能之前，您需要参考Microsoft Excel 对象库。
- 在 Access 中，打开任何 VBA 模块。
- 前往
Tools>References - 选中 旁边的框
Microsoft Excel 16.0 Object Library。（如果您使用的是旧版 Office，版本号会有所不同。）
然后，您可以从 Access VBA 或查询中调用大多数 Excel 函数WorksheetFunction（与在 Excel VBA 中使用它们的方式相同）。
例如：
MsgBox WorksheetFunction.Convert(3.7, "m", "ft")
...显示一个以 3.7 米为单位的英尺数的消息框。
计算将是简单的部分；On Changeor事件中的几行 VBAOn Exit将触发计算。
最耗时的部分可能是完善表单上控件的放置和格式，这绝不是困难（并且有几个在线教程可以在必要时提供基础知识。）
最后，请记住，毫无疑问，通过谷歌搜索可以免费下载大量现有转换工具......（我相信您不是第一个想要使用 MS Office 转换测量值的人。 )
更多信息：
- Microsoft Docs：WorksheetFunction.Convert 方法
- Microsoft Docs：Visual Basic 可用的工作表函数列表
- Office 支持：在 Access 中创建表单
- QuackIt：Microsoft Access 教程
- Blueclaw :访问事件程序
您可以在此处从 JumpShare 下载上面使用的演示 xlsx 。
于 2018-09-25T20:58:38.000 回答