正文
vb.netfor用法 vbnet foreach
提示：扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
用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.net中如何用for语句判断出8个复选框是否被选中
For i As Integer = 1 To 8
Dim TC As CheckBox = Me.Controls("ComboBox" i)
If TC.Checked Then
TextBox1.Text = TextBox1.Text "," TC.Checked.ToString()
End If
Next
Q2: vb.net for循环
dim i
for i=2 to 1
msgbox("*")
next
语法没问题vb.netfor用法，这应该在winform里面能够调试成功，显示运行框，但是在web application里面就不能出现弹出信息框vb.netfor用法了，在网页上要出现，建议用response.write("scriptalert（'***'）/script").
for i=100 to 1 这样vb.netfor用法的语句在VB9.0后是支持的。楼下的，不要天天抱着VB6啃。
Q3: vb.net for循环到最大后，再循环到最小。求教
//C# code
private void worker(int i)
{
if(i==1){
for(i;i=1000;i++){
//do something......
}
worker(i);
}else{
i=1000;
for(i;i=1;i--){
//do something......
}
worker(i);
}
}
worker(1);
逻辑是这样 ，楼主自己用vb写一下就行了
Q4: vb.net 求个for循环的写法
vb.netfor用法你先新建一个控制台应用程序vb.netfor用法，然后全部复制就行vb.netfor用法了vb.netfor用法，用 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
其实vb.netfor用法你这样不就好了
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
多方便
Q5: 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
vb.netfor用法的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet foreach、vb.netfor用法的信息别忘了在本站进行查找喔。
