vb中从键盘上输入10个数,判断有几个偶数,有几个奇数?
人气:377 ℃ 时间:2019-10-17 01:36:33
解答
我给你写了,挺简单的.窗体上添加两个label控件 一个command控件Dim a(1 To 10)Dim bDim c As IntegerDim d As IntegerPrivate Sub Command1_Click()For b = 1 To 10a(b) = InputBox("输入数据","","")If a(b) Mod 2 ...
推荐
猜你喜欢
- 形容词的最高级 英文表达
- 两个数相乘,一个因数乘10,另一个因数不变,则积( ).
- 英语翻译
- 方程5X+9=39,它的解是6 对吗
- 两个灯泡,知道了额定电压和额定功率,怎么串联在电路中的实际功率
- 判断:当两个半径为r的金属小球中心相距4r时,对于它们之间的静电力作用大小,只取决于它们各自所带电荷量?
- I hope you happy every day,that I am very happy.
- 如图,在Rt△ABC中,∠ACB=90°,CD⊥AB,求证:BC是△ADC的外接圆的切线.