1、本网站免费注册后即可以下载，点击开通VIP会员可无限免费下载！
2、资料一般为word或PPT文档。建议使用IE9以上浏览器或360、谷歌、火狐浏览器浏览本站。
3、有任何下载问题，请联系微信客服。
扫描下方二维码，添加微信客服
《2.3.3多重选择语句》PPT课件优质课下载
×100%
1、n>59% 穷困
2、50%≤n≤59% 温饱
3、40%≤n<50% 小康
4、30%≤n<40% 富裕
5、n<30% 特别富裕
Dim x As Single
Dim y As Single
Dim n As Single
x = InputBox("请输入人均食品消费总额")
y = InputBox("请输入人均个人消费支出总额")
n = x / y
Print "恩格尔系数："; n
If n > 0.59 Then Print "贫困！"
If 0.5 <= n And n <= 0.59 Then Print "温饱"
If 0.4 <= n And n < 0.5 Then Print "小康"
If 0.3 <= n And n < 0.4 Then Print "富裕"
If n < 0.3 Then Print "特别富裕"
Select case 表达式
Case 表达式列表1
语句组1
case表达式列表2
……
［Case else
语句组N+1］