使用VB中If块结构语句
VB:使用IF块结构语句，写出如图程序
答案:2 悬赏:50 手机版
解决时间 2021-02-20 16:40
- 提问者网友：玫瑰园
- 2021-02-19 21:57
最佳答案
- 五星知识达人网友：野味小生
- 2021-02-19 22:48
private sub command1_click() label1.caption = "符合条件的自然数已显示在列表框中" dim i as integer for i = 1 to 500 if i mod 4 = 0 and i mod 7 = 0 then list1.additem str(i) end if next 哗肠糕段蕹灯革犬宫华 end sub 其他的你要不会我也没办法了
全部回答
- 1楼网友：不想翻身的咸鱼
- 2021-02-20 00:20
x=val(inputbox(""))
if x>0 and x<=10 then
y=10+2*x
elseif x>10 and x<=20 then
y=50-x
elseif x>20 and x<=30 then
y=30
elseif x>30 and x<=50 then
y=60-x
end if
msgbox y
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯