国防教育专职人员:用VB语言编写程序（3）：

来源：百度文库编辑：查人人中国名人网时间：2024/05/13 04:22:08

输入20个数字，显示其中奇数的个数和偶数的个数．

考试帮助啊！

Dim numInput As Long
Dim count1 As Integer, count2 As Integer
Dim i As Long

For i = 0 To 20
numInput = Val(InputBox("正在输入第" & i + 1 & "个数："))
If numInput Mod 2 = 0 Then
count2 = count2 + 1
Else
count1 = count1 + 1
End If
Next i

Print "输入的奇数有" & count1 & "个"
Print "输入的偶数有" & count2 & "个"

。。这么简单的问题，你的问题4 我回答了，使用c的
你看得明白，就告诉我，这些都简单

用VB语言编写程序（3）：用VB语言编写程序（1）：用VB语言编写程序（2）：用VB语言编写程序（4）：用VB编写程序用VB编写数据库程序用C语言编写程序用编程语言编写程序 vb语言怎样编写用VB编写个“记事本”程序