Visual Basic 6代码如下:
Dim n1 As Long
Dim n2 As Long
Dim n3 As Long
Dim n4 As LongFor n1 = 0 To 100000
n4 = 0
Do While n2 > 1000
n3 = n4 + n3
n2 = n2 + 1
n4 = n4 + n2
Loop
NextVisual C++ 代码如下:
int n1 = 0, n2 = 0, n3 = 0, n4 = 0;for (n1 = 0; n1 < 100000; n1++)
{
n4 = 0;
while (n2 > 1000)
{
n3 += n4;
n2++;
n4 += n2;
}
C++ 比 Basic 快 10 倍以上!而且同样VC程序 Pentium 4 2.53B 比 Athlon64 3200+ 快!
Dim n1 As Long
Dim n2 As Long
Dim n3 As Long
Dim n4 As LongFor n1 = 0 To 100000
n4 = 0
Do While n2 > 1000
n3 = n4 + n3
n2 = n2 + 1
n4 = n4 + n2
Loop
NextVisual C++ 代码如下:
int n1 = 0, n2 = 0, n3 = 0, n4 = 0;for (n1 = 0; n1 < 100000; n1++)
{
n4 = 0;
while (n2 > 1000)
{
n3 += n4;
n2++;
n4 += n2;
}
C++ 比 Basic 快 10 倍以上!而且同样VC程序 Pentium 4 2.53B 比 Athlon64 3200+ 快!
用VB做MIS还可以的,进行算法优化,速度还可以接受。
qbasic是解释型的,vb是内码编译的。
虽然vb6编译后有些罗嗦,比c/c++或delphi慢1%左右,但相对于节省的开发时间,基本不用考虑。现在的电脑比10年前快多少?现在的内存比以前大多少?浪费点没啥。
如果你搞桌面开发 vb delphi都一样 想想看 vb delphi是什么语言写的?
VB的运行效率没那么夸张的慢。
VC是用C++写的,C++用C实现。
Dim n2 As Long
Dim n3 As Long
Dim n4 As LongFor n1 = 0 To 100000 {a}
n4 = 0
Do While n2 > 1000 {b}
n3 = n4 + n3
n2 = n2 + 1
n4 = n4 + n2
Loop
NextVisual C++ 代码如下:
int n1 = 0, n2 = 0, n3 = 0, n4 = 0;for (n1 = 0; n1 < 100000; n1++)
{
n4 = 0;
while (n2 > 1000)
{
n3 += n4;
n2++;
n4 += n2;
}你的代码问题多多呀!1.For n1 = 0 To 100000 循环 100001 遍;0 - 100000
而for (n1 = 0; n1 < 100000; n1++) 循环 100000 遍,差了一遍呀。 0 - 999992.while循环前没有给 n2 清零,那么第二次的for循环 n2 不就已经大于 1000 了吗?3. VB里,按F5 是解释执行,只有编译成exe文件后,才是编译执行,不知道楼主是否注意到了这一点。