来源: 最后更新:24-07-01 06:07:05
本代码真正的大数据,大过滤,几百万次的计算可能只有一个号码,甚至一个都没有,可见,通过反复重算,光循环就是百万每次每位,每位进行2次循环,本代码会进入双色球,原理是一样的,几百万计算,只为了找一个号码!甚至一个都找不到,要求非常苛刻!
Sub 按钮877_Click()
Application.ScreenUpdating = False
Application.EnableEvents = False
Dim cs(), cs1(), cs2(), r1 As Range, r2 As Range, r10 As Range, ax&, i&, j&, m&, p&, k&, k1&, y& ‘不写r as range 结果写不出来
Dim a(1 To 10) As Integer, b(1 To 10) As Integer
ax = [a65536].End(xlUp).Row
Cells(3, 18).Resize(ax * 4, 20).ClearContents
cs = Range(Cells(1, 3), Cells(ax + 1, 8))
cs2 = Range(Cells(1, 19), Cells(ax * 9, 252))
Set r2 = Range(Cells(1, 19), Cells(ax, 126))
q = 0
For p = 1 To 500000,代码复杂,计算量非常大,光循环就是50万每次,可能一个都找不出来,要求非常苛刻!
‘cs1 = Range(Cells(1, 18), Cells(ax, 18))
‘Set r1 = Range(Cells(1, 18), Cells(ax, 18))
‘Set r10 = Range(Cells(ax, 10), Cells(ax, 19))
本代码,原理是一样的,几百万计算,只为了找一个号码!
标签: [db:关键词]
生活中的无线网络实例 列出你在生活中接触到的有关无线网络的应用实例
2023第二季度天津南开区公租房接受登记项目房源情况2023第二季度天津南开区公租房接受登记项目房源包括锦润名轩、津
人民网同上一堂卓越追光思政大课嘉宾+直播时间+直播回放入口 “美国非常热心找我们保护登月脚印,这很有意思” 内蒙古今日高速路况实时查询(12328高速路况查询) 徐州市春风行动就业专场招聘会2024年 徐州春风动力电话