题目是这样的:输入一个a值.当70>=a>60时,i=1;当80>=a>70时,i=2;当90>=a>80时,i=3;当a>90时,i=4.我编的程序代码如下:Private Sub Command1_Click()'End Sub可是无论我输入怎样的a值,在窗体上显示的结果都是
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/02 05:25:38
![题目是这样的:输入一个a值.当70>=a>60时,i=1;当80>=a>70时,i=2;当90>=a>80时,i=3;当a>90时,i=4.我编的程序代码如下:Private Sub Command1_Click()'End Sub可是无论我输入怎样的a值,在窗体上显示的结果都是](/uploads/image/z/8542417-49-7.jpg?t=%E9%A2%98%E7%9B%AE%E6%98%AF%E8%BF%99%E6%A0%B7%E7%9A%84%EF%BC%9A%E8%BE%93%E5%85%A5%E4%B8%80%E4%B8%AAa%E5%80%BC.%E5%BD%9370%3E%3Da%3E60%E6%97%B6%2Ci%3D1%EF%BC%9B%E5%BD%9380%3E%3Da%3E70%E6%97%B6%2Ci%3D2%EF%BC%9B%E5%BD%9390%3E%3Da%3E80%E6%97%B6%2Ci%3D3%EF%BC%9B%E5%BD%93a%3E90%E6%97%B6%2Ci%3D4.%E6%88%91%E7%BC%96%E7%9A%84%E7%A8%8B%E5%BA%8F%E4%BB%A3%E7%A0%81%E5%A6%82%E4%B8%8B%EF%BC%9APrivate+Sub+Command1_Click%28%29%27End+Sub%E5%8F%AF%E6%98%AF%E6%97%A0%E8%AE%BA%E6%88%91%E8%BE%93%E5%85%A5%E6%80%8E%E6%A0%B7%E7%9A%84a%E5%80%BC%2C%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E6%98%BE%E7%A4%BA%E7%9A%84%E7%BB%93%E6%9E%9C%E9%83%BD%E6%98%AF)
题目是这样的:输入一个a值.当70>=a>60时,i=1;当80>=a>70时,i=2;当90>=a>80时,i=3;当a>90时,i=4.我编的程序代码如下:Private Sub Command1_Click()'End Sub可是无论我输入怎样的a值,在窗体上显示的结果都是
题目是这样的:
输入一个a值.当70>=a>60时,i=1;当80>=a>70时,i=2;当90>=a>80时,i=3;当a>90时,i=4.
我编的程序代码如下:
Private Sub Command1_Click()
'
End Sub
可是无论我输入怎样的a值,在窗体上显示的结果都是:
a= 我输入的a
i=0
我觉得是在Case语句上写得有问题,其实我是想用Is加上判断条件的,但是Is后只能加一个条件,所以我才那样写的.
请问要怎么改这段代码(仍然使用Select Case语句),才能使i值符合题意.
题目是这样的:输入一个a值.当70>=a>60时,i=1;当80>=a>70时,i=2;当90>=a>80时,i=3;当a>90时,i=4.我编的程序代码如下:Private Sub Command1_Click()'End Sub可是无论我输入怎样的a值,在窗体上显示的结果都是
你的case a>70这样的错的,本来select case a就是表示a与你case后面的语句进行比较,如果这样的就是 a=(a>70) 这个结果你就不是你的原来意思了.
你要表示范围,可以写成以下:
Select Case a
Case Is > 90 'a>90
i = 4
Case Is > 80 'a>80 a90不成立才执行这步,所以a在这里一定 70
i = 2
Case Is > 60
i = 1
End Select
如若还不明白, H i我