VB程序设计习题

[复制链接]
查看11 | 回复1 | 2010-3-26 20:06:13 | 显示全部楼层 |阅读模式
1x=val(inputbox("输入:"))if x=10 and x20 then y=3*x+2?y2if x 20 Then y = 3 * x + 2Debug.Print y2. x = Val(InputBox("Input X: "))If x20 Then y = 3 * x + 2End IfDebug.Print y3. x = Val(InputBox("Input X: "))select case xcase x < 10
y = Abs(x)case <= 20
y = Sqr(3 * x - 1)case else
y = 3 * x + 2end selectDebug.Print y
回复

使用道具 举报

千问 | 2010-3-26 20:06:13 | 显示全部楼层
(1) if
endif
if
endif
if
endif(2)if else if else endif(3)select case x
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行