vb.netfor写法 vbnet wcf

用VB.NET的FOR语句怎么编写1到100所有奇数的和啊 ！！！马上要考试了 急！！！

dim sSum as long

for i=1 to 100

if i mod 2 =1 then

sSum=sSum + i

endif

next i

msgbox "1、100的奇数和为：" sSum,"提示"

==========================================

Sum 是关键字，是个系统函数

sSum 只是一个变量，晕，可以改成别的。

相关问答

Q1: VB的for循环该怎么写?

1、首先，我们输入For关键字。

2、然后我们定义一个循环变量。

3、然后我们写入【1 to 10】。

4、然后我峨眉呢输入【Next i】结束。

5、然后我们就可以在这里输入每次执行的语句。

6、最后运行就可以看到这个结果了。

Q2: vb.net for循环

dim i

for i=2 to 1

msgbox("*")

next

语法没问题，这应该在winform里面能够调试成功，显示运行框，但是在web application里面就不能出现弹出信息框了，在网页上要出现，建议用response.write("scriptalert（'***'）/script").

for i=100 to 1 这样的语句在VB9.0后是支持的。楼下的，不要天天抱着VB6啃。

Q3: vb.net在for语句中怎么不用goto来直接跳转到next i？

从你的例子来看你要实现的功能是

在

i=0

到

10

中

如果

i=3

就跳过

msgbox

("ok")

指令，否则执行该指令。

你可从另一方面来考虑。程序可以这样写:

dim

i

as

integer

for

i=0

to

10

if

i3

then

msgbox

("ok")

end

if

next

i

Q4: vb.net 求个for循环的写法

你先新建一个控制台应用程序，然后全部复制就行了，用 Ctrl + F5 调试

Module Module1

Sub Main()

Dim temp As String = "*"

Dim i, j As Short

For i = 1 To 5 Step +2

For j = 1 To i

Console.Write("{0} ", temp)

Next j

Console.WriteLine("")

Next i

Console.ReadLine()

End Sub

End Module

其实你这样不就好了

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim a As String = "*" vbCrLf "* * *" vbCrLf "* * * * *"

MessageBox.Show(a)

End Sub

多方便

vb.netfor写法的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet wcf、vb.netfor写法的信息别忘了在本站进行查找喔。