VB vb for循环语句组合求教

来源：蜘蛛抓取(WebSpider) 时间：2015-10-05 07:14 标签： vb跳出for循环
访问本页面，您的浏览器需要支持JavaScript求教一个VB问题:_百度知道
求教一个VB问题:
数据量很大(达到上亿)我写的程序要运行几个小时,都说VB很强大我不知道为何这样慢.如福彩中 1---33的所有组合需用什么算法和方法,涉及哪些VB方面的知识,还有哪位师兄有VB高级视频,因我是看的是二级视频学的VB,请不吝赐教，谢谢！
提问者采纳
这个有很多原因，比如设置的问题，如果你用来计算的东西都在硬盘上，那每次都读盘的话，肯定慢，一般如果数据量大的话，都是放在内存里，这样量大的话，速度的差别就显示出来了，有一些属性你要去工程属性里去设置。 我原先也设计一个类似的程序，运行完要大概八九个小时，后来对速度进行了优化，运行完只要20多分钟了，还是可以的。一个是数据存在数组里，这样比存在文件里，再读取要快很多。二是在工程的属性里，有个编译的选项，选编译为本机代码，速度优化，还有一个是高级优化，这个要小心，除非你能保证你的程序不出错，全对，不然不要去选它，因为它会判断每个数组原素有没超出边界，判断所以整数有没溢出，这样当然很还花时间，但如果你的程序出错，而程序又没进行判断，那么就会导致计算出错误的结果。
提问者评价
其他类似问题
为您推荐：
其他6条回答
不强大你去找个强大的，比如输出1到E的E次方 看能不能10分钟
你用超级计算机 运行你的程序估计就几分钟的事情了 呵呵
用数学算法33*32*31*30*29*28/(6*5*4*3*2*1)=1107568如果用循环，那就是dim s as long for i1= 1 to 28 for i2 = i1+1 to 29
for i3=i2+1 to 30
for i4=i3+1 to 31
for i5=i4+1 to 32
for i6=i5+1 to 33
s=s+1next i6,i5,i4,i3,i2,i1print s
你手工算一下就知道 36C7 （36选7） 总答案数8347680你用Visual Basic算？不太可能吧！
运行速度慢可能是你的算法有问题，我用VB做了一个类似福彩先号程序，可以机选和手选，速度很快。如果需要，可以发源程序给你参考一下。
当数据量很大的时候,就要看程序编译的水平了,既要精简,又要稳定,比如&=&要比“and”符号运行要快好几倍，数据量小的时候看不出来，数据量大的时候就横明显了另外，象你说的这种程序，主要还是看你设定的方法，最好用数组来设计
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁VB求教：先按钮A，再按钮B。这时触发一个事件。怎么做到？？_百度知道
VB求教：先按钮A，再按钮B。这时触发一个事件。怎么做到？？
大概意思是：我先按一个按钮，再按另外一个按钮。这是要触发串口发送一个代码。但是程序里不光是两个按钮。许多种组合存在。
提问者采纳
Dim i As IntegerPrivate Sub a_Click()
i = 1End SubPrivate Sub b_Click()
If i = 1 Then
MsgBox &触发事件&
i = 0End Sub如果是多按钮，可使用不同的数作为变量i在各个按钮中的值；如按a后，再按b，最后按c:Dim i As IntegerPrivate Sub a_Click()
i = 2End SubPrivate Sub b_Click()
If i = 2 Then
End SubPrivate Sub c_Click()
If i = 3 Then
MsgBox &触发事件&
i = 7End Sub如果没有顺序，有组合，可用素数求和，对和进行判断，但需注意：其他素数和不等于该素数。
提问者评价
来自团队：
其他类似问题
为您推荐：
其他1条回答
'每个按钮下都调用子程序CmdRotate(CmdStr as String)Private CmdIndex(1) As StringPrivate Sub CmdRotate(CmdStr As String)Dim TempString As StringCmdIndex(0) = CmdIndex(1)CmdIndex(1) = CmdStrEnd SubPrivate Sub A_Click()Call CmdRotate(&A&)End SubPrivate Sub B_Click()Call CmdRotate(&B&)If CmdIndex(0) = &A& Then'这里触发串口发送一个代码End IfEnd SubPrivate Sub C_Click()Call CmdRotate(&C&)End Sub
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁循环结构、列表框和组合框_图文_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
文档贡献者
评价文档：
循环结构、列表框和组合框
大小：944.50KB
登录百度文库，专享文档复制特权，财富值每天免费拿！
你可能喜欢

我要回帖

更多关于 vb跳出for循环 的文章

 

随机推荐