爱问知识人 爱问教育 医院库

"输入20个数，统计其中正数、负数和0的个数"用vb编程

搜索
我要提问
首页
教育/科学
数学

"输入20个数，统计其中正数、负数和0的个数"用vb编程

"输入20个数，统计其中正数、负数和0的个数"
谁来帮帮我

最***
回答
提交回答

全部答案

    2018-01-24 07:40:54 
  • Private Sub Command1_Click()
    Dim a(20) As Long
    Text1 = 0
    Text2 = 0
    Text3 = 0
    a(1) = 44
    a(2) = 0
    For i = 1 To 20
    x = a(i)
    If x > 0 Then Text1 = Text1   1 '统计整数
    If x = 0 Then Text2 = Text2   1 '统计0
    If x < 0 Then Text3 = Text3   1 '统计负数
    Next i
    End Sub

    只***

    2018-01-24 07:40:54

    58 14 评论
    分享
    提交评论
展开更多答案

类似问题

换一换

  • 数学 相关知识

  • 教育培训
  • 教育科学
  • 教育考试

相关推荐

正在加载...
最新资料 推荐信息 热门专题 热点推荐
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
问题大全
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 0-9
主题大全
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 0-9
关于我们 爱问协议 帮助中心

Copyright © 1996-2019 IASK Corporation, All Rights Reserved

返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选)：

放弃 确定报告