满意回答
2020/04/16 15:16
程序很简单的，只是VB输入多个数据有点问题，以下是参考Private Sub Command1_Click()s = InputBox("输入苹果高度")a = Split(s)b = Val(InputBox("陶陶高度"))c = 0For i = 0 To 9 If b + 30 >= Val(a(i)) Then c = c + 1NextPrint cEnd Sub程序运行：输入1输入2：结果
评论(0)
加载中...
匿名
其他回答(0)
0人关注该问题