题目内容

下面程序的功能是对统计所输入的10个数据中奇数和偶数的个数，为了实现相应功能请将如下代码补充完整。Private Sub P9()Dim num As Integer，a As Integer，b As Integer，i As IntegerFor i＝1 To 10num ＝ InputBox("请输入数据："，"输入")If ThenElseb ＝ b ＋ 1End IfNext iMsgBox("运行结果：偶数个数＝"& Str(a) & "，奇数个数＝" & Str(b))End Sub

查看答案

搜索结果不匹配？点我反馈

更多问题

在c语言中算术运算符的结合性是( )

关于狂犬病的治疗,下列哪项是错误的?

A. 发病后严格隔离患者,防止唾液污染
B. 减少光、风、声等刺激
C. 狂躁时用镇静剂
D. 维护心血管和呼吸功能
E. 立即注射狂犬疫苗

下列含狂犬病毒最多的是( )

A. 唾液
B. 粪
C. 血液
D. 呕吐物
E. 伤口渗出液

狂犬病不出现的症状是( )

A. 流涎
B. 出汗
C. 牙关紧闭
D. 清醒、兴奋
E. 痉挛性抽搐