1

我需要一些帮助如何将一些数据从 Pythonscript 传输到我的 VBA 程序中。我有一个带有 128 个开关的系统，可以打开或关闭（1 或 0）。在我的 python 脚本中，我读取了各个开关的值，现在我想将该数据发送回我的 VBA 程序，其中有 128 个代表这些开关的复选框。

我目前的进展是在 python 中对这 128 个数字进行位移，然后使用该 128 位整数打印回 VBA。现在我在 python 中使用“print”，并在 VBA 中检查 shell 中的打印 - 然后我将该数据读出到一个字符串中。

现在我的字符串将具有我的开关的 ASCII 值（等 170141183460469231733416685972794376193）

如何将此 ASCII 字符串转换为有用的内容以单击这些复选框？我计划使用一个循环，然后运行 ​​128 次

Controls("CheckBox" & Counter).value = BINARYVALUE[Counter]

其中 counter 是循环计数器，BINARYVALUE 是存储 128 位二进制值的位置

谢谢您的帮助！

4

1 回答 1

3

构建和传递这些位的字符串可能更简单，例如：

Switches = "11111111111111111111101111100000011111111000000000011111111100000011111111111111111111010101111111111111111110000001111111111111"

然后你可以循环这个：

Me.Controls("CheckBox" & Counter).Value = CBool(Mid(Switches, Counter, 1))
于 2021-01-07T15:20:07.990 回答