1、作业解答,4.1 下列可作为Visual Basic的变量名的是 BE . A)4*Delta B)Alpha C)4ABC D)Ab E)Filename F)A(A+B) G)254D H)Print,理由：变量名必须遵守如下规则 首字符必须是字母 长度不超过255个字符 在作用域内必须唯一 作为变量名的字符串内不得包括标点符号和用于类型说明的字符%、&、!、#、$ 不能使用系统关键字(如:方法名、语句等),作业解答,4.2 下列可作为Visual Basic中所允许的形式的数是 BCDEH 。 A)25.74 B)3.457E-100 C)368 D)1.87E+50 E)10(1.25
2、6) F)D32 G)2.5E H)12E3,理由： 用指数形式表示实数，必须在D或E前有数字，在D或E后有整数表示指数。,作业解答,4.3 将下面的数写成普通的十进制数： (1)2.65358979335278D-006 (2)1.21576654590569D+019 (3)8.6787E+8 (4)2.567E-12 4.4 设a=2，b=3，c=4，d=5，分别写出下列表达式的值： (1) ab AND cc False (2) 32*b OR a=c AND bc OR cd False (3) NOT aa+c False,2.6535897933527810-6 1.215766
3、545905691019 8.6787108 2.56710-12,作业解答,4.5 写出下列数学式子对应的Visual Basic 表达式 (1) cos2(c+d) (2) 5+(a+b)2 (3) cos(x)(sin(x)+1) (4) e2+2 (5) 2a(7+b) (6) 8e3ln2,Cos(c+d)2 5+(a+b)2 cos(x)*(sin(x)+1) Exp(2)+2 2*a*(7+b) 8*exp(3)*log(2),作业解答,4.6 在窗体的Click事件过程中分别添加如下的程序段，写出其输出结果。 (1) Print Chr$(65) (2) Print Sgn(2
4、) (3) a$=“Good” b$=“Morning” Print a+b Print a & b (4) s$=“ABCDEFGHIJK” Print left(s,4) Print right(s,4) (5) s$=“ABCDEFGHIJK” Print mid(s,3,4) Print len(s),A 1 GoodMorning GoodMorning ABCD HIJK CDEF11,作业解答,4.6 在窗体的Click事件过程中分别添加如下的程序段，写出其输出结果。 (6) s$= “ABCDEFGHIJK” Print instr(s, “EFG”) Print lcase(
5、s) (7)假定当前日期为2004年9月25日，星期六 print day(now) print month(now) print year(now) print weekday(now) 4.7 在Visual Basic 中，字符串常量要用 一对“” 括起来，日期/时间型常量要用 一对# 括起来。,5 abcdefghijk25920047,作业解答,4.8 根据条件写一个VB表达式： (1)产生一个“C”到“L”范围内的大写字符； Chr(Int(Rnd*(ASC(“L”)-ASC(“C”)+1)+ Asc(“C”) (2)产生一个100200（包括100和200）范围内的正整数； In
6、t(Rnd*(200-100+1)+100) (3)已知直角坐标中任意一个点（x，y），表示该点在第一或第三象限； x*y0 或 sgn(x*y)=1 或 sgn(x)=sgn(y) and x0 (4)表示x是5或7的倍数； (x Mod 5=0 Or x Mod 7=0) And Int(x)=x,作业解答,4.8 根据条件写一个VB表达式： (5)将任意一个两位数x的个位数和十位数对换。 例如：x78，则表达式的值应为87； (x mod 10)*10+x10 或 Val(Right(Cstr(x),1) &Left(Cstr(x),1) (6)将变量x的值按四舍五入保留小数点后两位。
7、例如：x的值为123.2389，表达式的值为123.24； Round(x*100)/100 或者 Round(x,2) 或者val(Format(x,“0.00”) 或者Int(x * 100 + 0.5) / 100 (7)表示字符变量C是个字母字符（大小写不区分）； Lcase(c)=“a” and Lcase(c)=“A” and Ucase(c)=“Z” and len(c) =1,4.8 根据条件写一个VB表达式： (8)取字符变量S中第5个字符起的6个字符； Mid(S,5,6) (9)表示10s20的关系表达式； s=10 and sz and yz,作业解答,4.9 求下列表达式的值： (1)123 + 23 Mod 10 7 + Asc(“A“) 188 (2)100 + “100“ & 100 “200100“ (3)Int(68.555 * 100 + 0.5) / 100 68.56,作业解答,4.9 求下列表达式的值： (4)Val(Left$(A$, 4) + Mid(A$, 4, 2) （已知A$ = “87654321“） 876554 (5)DateAdd(“m“, 1, #1/30/2000#) #2/29/2000# (6)Len(“VB程序设计”) 6,
