VB 第4章练题.ppt

第4章练习题;牛刀小试----等级考试真题再现;牛刀小试----等级考试真题再现;牛刀小试----课后习题;牛刀小试----等级考试真题再现;牛刀小试----等级考试真题再现;牛刀小试----等级考试真题再现;牛刀小试----等级考试真题再现;牛刀小试;牛刀小试;牛刀小试;;课堂练习：;2、算术运算符的优先级;课堂练习;;b2-4ac,写成VB表达式为: ;课堂练习;;牛刀小试----等级考试真题再现;牛刀小试----等级考试真题再现;牛刀小试----等级考试真题再现;牛刀小试----等级考试真题再现;复习题:;2.“ABC123””666xy”的运算结果是( ) A）666xy B）ABC666123xy C）“ABC123666xy” D）”666xyABC123”;3、设A=2，B=3，C=4，D=5，布尔表达式 AB And C=D Or 3*AD的值是（ ）; 4、表达式2*3^2+2*8/4+3^2的值是（ ）;6、15.5\2的结果是（） 7、19.5 Mod 2*2 的运算结果是（）;;;; 课堂练习： len(This is a book!) 　Left$(ABCDEFG,3) 　Right (ABCDEFG,3) 　Mid$(ABCDEFG,2,3) Ucase(ABcd) Lcase(ABcd) 　Trim( Ab cd ) 　String(5, A ) 　InStr(2, “ABCDEFGEF”, “EF”);牛刀小试----等级考试真题再现;牛刀小试----等级考试真题再现;（５）取整函数 Fix(x):也称截断函数,直接取整.将去掉数值型数据的小数部分. Fix(3.7)= Fix(3.4)= Fix(-4.8)= Fix(-4.3)=;Int(x):也称取整函数,取小于等于x的最大整数 Int(3.5) = Int(3.7) = Int(3.3)= Int(-4.3)= Int(-4.8) =;产生[min,max]之间的随意整数公式:int((max-min+1)*rnd()+min);Cint(x):C族函数.运算规则是:当小数部分0.5,则进位加1,小数部分0.5,则舍去.若小数部分=0.5,则向最靠近的偶数进行取舍. Cint(3.51)= Cint(3.49)= Cint(2.5)= Cint(3.5)= ;例:函数Cint, Int,fix都返回整数值，以下能正确描述它们返回值的大小关系的是（ ）（06春） A: Cint(-4.51)=Int(-4.51)fix(-4.51) B:Int(-4.51)Cint(-4.51)fix(-4.51) C:Cint(-4.51)fix(-4.51)Int(-4.51), D:Int(-4.51)fix(-4.51)= Cint(-4.51);Cstr(x):将x转换成字符串型,若x为数值型,则转换为数字字符串(对于正数,符号位不予保留) Print len(cstr(123)) Print len(str(123));牛刀小试----等级考试真题再现;牛刀小试----等级考试真题再现;复习题;;;;;课后习题;课后习题;1.下面所列四组数据中，全部是正确的VB常数是????? A.32768,1.34D2,ABCDE,O1767 B.3276,123.56,1.2E-2,#True# C.HABCE,02-03-2002,False,D-3??? ????? D.ABCDE,#02-02-2002#,E-2;2.运行下面程序，单击命令按钮Command1,则窗口上显示的结果是???????? 。 Private Sub Command1_Click() Dim A As Integer,B As Boolean,C As Integer,D As Integer ?? A=20/3? :? B=True? :? C=B? :? D=A+C ?? Print A, D,? A=A + C End Sub A. 7?? 6? False????? B. 6.6? 5.6? False???? C. 7?? 6? A=6??????? D. 7??? 8??? A=8 ;3. 表示命题“A是一个带小数的正数，且 B是一个带小数的负数”的逻辑表达式是 ? ??。 4.在窗体模块的通用声明处有如下语句，会产生错误的语句是 ___ (1) Const A As Integer=25 (2) Public St As String