VB送分题目,3月16日有效

来源:百度知道 编辑:UC知道 时间:2024/05/31 10:46:51
(1) 产生一个 “ C ” ~ “ L ”范围内的大写字母。
(2) 产生一个100 ~ 200(包括100和200)范围内的正整数。
(3) 已知直角坐标系中任意一个点(x,y),表示该点在第1象限或第3象限。
(4) 表示x是5或7的倍数。
(5) 将任意一个两位数x的个位数与十位数对换。例如,x=78,则表达式的值应为87。
(6) 将变量x的值按四舍五入保留小数点后两位。例如,x的值为123.2389,则表达式的值为123.24。
(7) 表示字符变量C是字母字符(大小写不区分)。
(8) 取字符变量S中的第5个字符起6个字符。
(9) 表示10≤x≤20的关系表达式。
(10) x、y中有一个小于z。
(11) x、y都大于z。

1.Chr(Int((Asc("L") - Asc("C") + 1) * Rnd + Asc("C")))
2.Int(101 * Rnd + 100)
3.x * y > 0
4.x mod 5=0 or x mod 7 =0
5.(x mod 10)*10 + x\10
6.x=int(x*100+0.5)/100
7.LCase(C) >= "a" And LCase(C) <= "z"
8.Mid(s, 5, 6)
9.x>=10 and x<=20
10.(x<z and y>=z) or (y<z and x>=z)
11.x>z and y>z

1、Chr(Int((asc("L")-asc("C")+1)*Rnd) + asc("C"))
2、Int((200-100+1)*Rnd) + 100)
3、(x>0 and y>0) or (x<0 and y<0)
4、(x mod 5) =0 or(x mod 7 =0)
5、(x mod 10)*10 + int(x /10)
6、x=Round(x,2) 或者Format(x, "0.00")
7、asc(c)>=asc("A") and asc(c)<=asc("z")
8、mid(s,5,6)
9、x>=10 and x<=20
10、x<z or y<z
11、x>z and y>z

====================
有不懂的可以HI我

1.Chr(Int((Asc("L") - Asc("C