查看: 360  |  回复: 0
  VB6 Byte数组比较子程序f_CompareArr ,If arrC = arrB Then是错误的,给Byte数组赋值 子程序f_Str2ArrB
楼主
发表于 2024年3月13日 20:44

新建From1(窗体),新建Command1(按钮CommandButton),代码:

具体代码只能由VIP查看,请升级

运行结果:

True
数组一样。
方法1: 32毫秒
字符串一样。
方法2: 16毫秒
arrB(0) = 1
arrB(1) = 2
arrB(2) = 3
arrB(3) = 4
arrB(4) = 5
arrB(5) = 6
-----------------
arrB(0) = 1
arrB(1) = 2
arrB(2) = 3
arrB(3) = 4
arrB(4) = 5
arrB(5) = 6

如果 strW = "1a 2 3 4 5 6 7 8 9 6" 就显示False

比较数组If arrC = arrB Then是错误的,需要子程序f_CompareArr。看来还是:

Byte数组->字符串,然后比较

f_CompareArr的方法比较快。

您需要登录后才可以回帖 登录 | 立即注册
【本版规则】请勿发表违反国家法律的内容,否则会被冻结账号和删贴。
用户名: 立即注册
密码:
2020-2024 MaNongKu.com