第次上机习题.docVIP

一．选择题: 1.以下关于窗体的描述中，错误的是( ) A 执行Unload Form1语句后，窗体Form1消失，但仍在内存中 B 窗体的Load事件在加载窗体时发生 C 当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止 D 窗体的Height、Width属性用于设置窗体的高和宽 2.设有如下的记录类型 Type Student number As String name As String age As Integer End Type 则正确引用该记录类型变量的代码是( ) A Student.name=张红 B Dim s As Student : s.name=张红 C Dim s As Type Students.name=张红 D Dim s As Type : s.name=张红 3 函数String(n,str)的功能是( ) A 把数值型数据转换为字符串 B 返回由n个字符组成的字符串 C 从字符串 中取出n个字符 D 从字符串中第n个字符的位置开始取子字符串 4 执行如下语句： a = InputBox(Today, Tomorrow, Yesterday) 将显示一个输入对话框，在对话框的输入区中显示的信息是( ) A Today B Tomorrow C Yesterday D Day before yesterday 5 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer, n As Integer, i As Integer Dim j As Integer x=0 n=InputBox() For i=1 To n For j=1 To i x=x+1 Next j Next Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是（ ） A 3 B 4 C 5 D 6 6. 为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是( ) A)Value B)Default C)Cancel D)Enabled 7 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array(北京,上海,天津,重庆) Print city(1) End Sub 程序运行后，如果单击命令按钮则在窗体上显示的内容是( ) A ) 空白 B)错误信息 C )北京 D)上海 8. VB算术运算符：乘或除、整除、求余的优先级，从高到低依次为（ ）。 A、乘或除、求余、整除 B、乘或除、整除、求余 C、整除、求余、乘或除 D、整除、乘或除、求余 9. 表达式 （ ）可以计算整型变量x 的位数。 A、Len(Trim(Str(Abs(x)))) B、Len(Abs(x))-1 C、Len(Abs(x)) D、Len(Trim(Int(x))) 10. 函数 InStr(windowse, Mid(winnt,2,2)) 的返回值是( )。 A、0 B、1 C、2 D、3 11. 将文本框控件的( )属性设置为true，可正常显示文本但不可编辑。 A、Locked B、Enabled C、MultiLine D、Visible 二 程序填空题 【1】Form1的过程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 Then s = 1 For i = 1 To 10 a(i) = InputBox(a( i )=) If