vb.net判断奇数

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

dim sSum as long

for i=1 to 100

sSum=sSum ◆ i

endif

next i

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

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

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

sSum 只是一个变量,晕,可以改成别的.

VB判断奇偶性

做成数组控件,index表示控件号（.net中修改◆=）

伪代码：

select case index

case 0

s1=s1◆1'俩奇数

s1=s1◆1'1个奇数

end select

vb.net怎么同时判定多个数的奇偶性

这个同时判定可以采用多线程做.但是一般都是使用数组循环来统计.

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

Dim A(100) As Integer

Dim n1 As Integer = 0

For i = 1 To 100

Randomize()

A(i) = Int(Rnd() * 1000 ◆ 1)

n1 ◆= 1

Else

End If

Next

End Sub

判断奇偶数的vb程序段

vb程序段如下：

Private Sub Command1_Clicko

Label1.Caption="这是奇数"

Label1.Caption ="这是偶数"

Label1.Caption ="非奇非偶"

扩展资料：

代码格式：

IfA1 Then

语句1

End if

以上就是土嘎嘎小编为大家整理的vb.net判断奇数相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦！！