新网创想网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
是指这个吗?(变量定义我就不写了,都是integer或者long,结果是p)
创新互联公司主营红安网站建设的网络公司,主营网站建设方案,app软件开发,红安h5小程序设计搭建,红安网站营销推广欢迎红安等地区企业咨询
1,for…next结构:
For i=1 to 100
p=p+i
next
2,do…loop结构
第一种:
i=1
do while i=100
p=p+i
i=i+1(如果是.net的话可以改成i+=1)
loop
第二种:
i=1
do
p=p+1
i=i+1(或i+=1)
loop until i100
3,while…wend结构
其实和do while差不多
i=1
While i=100
p=p+1
i=i+1(或i+=1)
wend
完毕
我就能想起这些
运用多线程技术把一个任务分配到几个线程上让它们同时处理,这样会比单线程快很多,不过多线程技术不是一两话能说清的,你可以查一下相关的资料.
'假设数组如下
dim d(10) as integer
dim i as integer
for i=lbound(d) to ubound(d)
d(i) = i
next i
'数组各元素之和
dim S as integer = 0
for i=lbound(d) to ubound(d)
s = s + d(i)
next i
msgbox(s)
会溢出的.后面算到几万的几万次方肯定溢出..
ON ERROR RESUME NEXT
Dim A As Long
Dim B As Long
Dim C As Double
c=0
A = InputBox("type a number", "type","")
For B = 1 To C
c = c + b ^ b
Next b
MsgBox "result" c