二级VB题目讲解.pptVIP

计算机等级考试（二级VB） 题目讲解 If X=5 then 试题一、判断题（每小题1分） （1）VB的Double类型数据，可以精确表示其数值范围内的所有实数。 （2）在窗体或模块文件中声明为Private的过程，只能被本窗体或模块中的过程所调用。 （3）在自定义函数过程中，函数名必须被赋值。 （4）在Open语句中用Append方式所打开的文件若不存在，则创建该文件。 √ × √ √ 试题二、单选题（每小题2分） （11）VB算术运算符乘或除、整除、求余的优先级，从高到低依次为 （11） 。 A、乘或除、求余、整除 B、乘或除、整除、求余 C、整除、求余、乘或除 D、整除、乘或除、求余 分析: √ （13）函数 InStr(windowse, Mid(winnt,2,2)) 的返回值是 （13） 。 A、0 B、1 C、2 D、3 （14）将文本框控件的 (14) 属性设置为False，可正常显示文本但不可编辑。 A、Locked B、Enabled C、MultiLine D、Visible √ √ （15）执行下列语句后，列表框中各表项顺序为 （15） 。 List1.Clear： For i = 1 To 4 List1.AddItem i - 1, 0 Next i A、0、0、0、0 B、1、2、3、4 C、0、1、2、3 D、3、2、1、0 √ （16）滚动条控件的 （16） 属性用于指定用户单击滚动箭头时Value属性值的增量。 A、LargeChange B、Change C、SmallChange D、Value （17）下列表达式中， （17） 不是红颜色的值。 A、 vbRed B、Rgb(255,0,0) C、QBColor(1) D、Hff √ √ 试题3：程序填空题（每空2分） 程序1、【程序说明】单击窗体后，用输入对话框输入x、n，按下式计算结果。要求：将计算结果以标签控件显示，且每秒钟随机变换一次颜色。 (21) Private Sub Form_Load() Timer1.Interval = 1000 Timer1.Enabled = False End Sub Private Sub Form_Click() Dim x!, n%, i%, t! s = 0: x = InputBox(x=) n = InputBox(n=) (22) For i = (23) t = t * x / i: s = s + t Next i (24) End Sub Private Sub Timer1_Timer() Label1.ForeColor = RGB(Rnd*255, Rnd*255, Rnd*255) Label1.Caption = s End Sub A、Static s As Single B、Dim s As Single C、Option Base 1 D、Const s As Single A、t = -1 B、t = 0 C、t = 2 D、t = 1 A、2 To n + 1 B、1 To n C、2 To n D、1 To n + 1 A、Timer1.Enabled = False B、Timer1.Enabled = True C、Label1.Enabled = False D、Label1.Enabled = True √ √ √ √ 程序2、【程序说明】Form2的过程Command1_Click如下，输入10个数，根据Form1中全局变量flag的不同取值做不同运算：若flag为True则求10个数的和，否则求10个数的积。 Private Sub Command1_Click() Dim a(10) As Single, s As Single, i As Integer s = 0 If (29) Then s = 1 For i = 1 To 10 a(i) = InputBox(a( i )=)