vb中从键盘上输入10个数,判断有几个偶数,有几个奇数?

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/10/01 22:20:14

我给你写了,挺简单的.窗体上添加两个label控件一个command控件
Dim a(1 To 10)
Dim b
Dim c As Integer
Dim d As Integer
Private Sub Command1_Click()
For b = 1 To 10
a(b) = InputBox("输入数据","","")
If a(b) Mod 2 = 0 Then
c = c + 1
Label1.Caption = "你输入了" & c & "偶数"
ElseIf a(b) Mod 2 0 Then
d = d + 1
Label2.Caption = "你输入了" & d & "奇数"
End If
Next b
End Sub
Private Sub Form_Load()
Label1.Caption = ""
Label2.Caption = ""
End Su

vb中从键盘上输入10个数,判断有几个偶数,有几个奇数? 一道C语言作业：从键盘上任意输入10个数求奇数平均值偶数平均值 vb中编写简单程序编写简单程序,随机输入几个数,判断其是偶数还是奇数,然后最后是计算出你所输入的数奇偶数分别的个数从键盘上输入10个整数,并求出这10个数中所有奇数的和与所有偶数之和要求：分别用while,do ...while VB 先有一个框让我输入10个整数,分别计算出奇数个数和,偶数个数和. vb 输入10个整数,计算偶数个数 ,奇数和. c语言从键盘上输入一个数,判断是否为偶数,如果是偶数的话输出是偶数,如果是奇数输出是奇数! PASCAL 从键盘上输入一个英文句子,找出里面有几个字母A. VB 先有一个框让我输入10个整数,分别计算出奇数个数和,偶数个数和.请测试好后发上来 18的因数中有几个质数,合数,奇数,偶数 99中偶数和奇数各有几个 VF程序设计编程问题1,从键盘上任意输入10个数,分别求出其中的奇数的积和偶数的和.2.,从键盘任意给定一串字符,分别统