VBA - 128 位值到 128 个复选框
VBA - 128Bit value to 128 checkboxes
我需要一些帮助如何将一些数据从 Pythonscript 传输到我的 VBA 程序中。
我的系统有 128 个可以打开或关闭的开关（1 或 0）。在我的 python 脚本中，我读取了各个开关的值，现在我想将该数据发送回我的 VBA 程序，其中我有 128 个复选框代表这些开关。
我目前的进展是 python 对这 128 个数字进行位移位，然后使用该 128 位整数打印回 VBA。
现在我在 python 和 VBA 中使用“print”检查 shell 中的打印 - 然后我将该数据读出到一个字符串中。
现在我的字符串将具有我的开关的 ASCII 值（等 170141183460469231733416685972794376193）
如何将此 ASCII 字符串转换为有用的内容以单击这些复选框？
我计划使用一个循环而不是运行 128 次然后运行
Controls("CheckBox" & Counter).value = BINARYVALUE[计数器]
其中counter是循环计数器，BINARYVALUE是存放128bit二进制值的地方
感谢您的帮助！
构建并传递这些位的字符串可能更简单，例如：
Switches = "11111111111111111111101111100000011111111000000000011111111100000011111111111111111111010101111111111111111110000001111111111111"
然后你可以循环这个：
Me.Controls("CheckBox" & Counter).Value = CBool(Mid(Switches, Counter, 1))
我需要一些帮助如何将一些数据从 Pythonscript 传输到我的 VBA 程序中。 我的系统有 128 个可以打开或关闭的开关（1 或 0）。在我的 python 脚本中，我读取了各个开关的值，现在我想将该数据发送回我的 VBA 程序，其中我有 128 个复选框代表这些开关。
我目前的进展是 python 对这 128 个数字进行位移位，然后使用该 128 位整数打印回 VBA。 现在我在 python 和 VBA 中使用“print”检查 shell 中的打印 - 然后我将该数据读出到一个字符串中。
现在我的字符串将具有我的开关的 ASCII 值（等 170141183460469231733416685972794376193）
如何将此 ASCII 字符串转换为有用的内容以单击这些复选框？ 我计划使用一个循环而不是运行 128 次然后运行
Controls("CheckBox" & Counter).value = BINARYVALUE[计数器]
其中counter是循环计数器，BINARYVALUE是存放128bit二进制值的地方
感谢您的帮助！
构建并传递这些位的字符串可能更简单，例如：
Switches = "11111111111111111111101111100000011111111000000000011111111100000011111111111111111111010101111111111111111110000001111111111111"
然后你可以循环这个：
Me.Controls("CheckBox" & Counter).Value = CBool(Mid(Switches, Counter, 1))