作业帮 > 综合 > 作业

用VB的do 语句编写 输入一串数字,当为#是停止程序,统计正负数的个数

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/09 03:28:16
用VB的do 语句编写 输入一串数字,当为#是停止程序,统计正负数的个数
VB的do 语句编写 输入一串数字,当为#是停止程序,统计正负数的个数
Dim zs As Integer, fs As Integer, x As String
Do
x = Inputbox("请输入一个整数")
If Val(x) > 0 Then
zs = zs + 1
ElseIf Val(x) < 0 Then
fs = fs + 1
End If
Loop While x "#"
MsgBox "正数" & zs & "个,负数" & fs & "个"