中石油华东《VB程序设计》2018秋学期在线作业
《VB程序设计》2018秋学期在线作业（一）核对题目下载答案，转载注明 无忧答案网
一、单选题：1.[单选题]??关于滚动条控件,下面说法错误的是: (满分:)
A. 点击滚动条的箭头，可以改变它的value值，从而引发Change事件
B. 拖动滚动框，可以触发Scroll事件
C. 通常，水平滚动条的值从左向右递增，垂直滚动条的值自上而下递增
D. 拖动滚动框，可以触发Change事件，而且是连续触发的]
正确答案:——D——
2.[单选题]通用对话框控件和文件列表框控件中,都能根据文件的类型对要显示的文件进行筛选过滤,后者使用()属性进行该项设置。 (满分:)
A. Pattern B. Path
C. Filter D. FileName]
正确答案:——A——
3.[单选题]一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程,其定义格式为:????Form1中定义的过程:???PrivateSubfrmfunction1()???EndSub???Form2中定义的过程:???PublicSubfrmfunction2()???EndSub???mdlFunc中定义的过程:???PublicSubmdlFunction()???EndSub在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是() (满分:)
A. 上述三个过程都可以在工程中的任何窗体或模块中直接被调用
B. 只有mdlFunction过程能够被工程中各个窗体或模块直接被调用
C. frmfunction1只能在form1中调用，而frmfunction2则可以在所有模块或窗体中被直接调
D. 上述三个过程都只能在各自被定义的模块中直接调用]
正确答案:——B——
4.[单选题]VB中Do……Loop结构既可以构成当型循环,也可以构成直到型循环,根据下面的代码:?Dimi,nasInteger?n=20?i=1?Do\n???Printi;\n???i=i+2?LoopUntili>20?判断循环结构的类型和循环体的执行次数,正确的选项是() (满分:)
A. 当型循环，20次
B. 直到型循环，10次
C. 当型循环，10次
D. 直到型循环，20次]
正确答案:————
5.[单选题]若要暂时关闭定时器,则可通过设置()属性为False来实现。 (满分:)
A. Visible
B. Enabled
C. Interval
D. Timer]
正确答案:————
6.[单选题]当程序运行时,在窗体上单击鼠标,以下哪个事件是窗体不会接收到() (满分:)
A. MouseDown
B. MouseUp
C. Load
D. Click]
正确答案:————
7.[单选题]在VisualBasic中,若要将控制权交给操作系统则通过()的语句。 (满分:)
A. End
B. ExitDo
C. ExitSub
D. DoEvents]
正确答案:————
8.[单选题]组合框的风格可通过()属性来设置。 (满分:)
A. BackStyle
B. BorderStyle
C. Style
D. Sorted]
正确答案:———— 奥鹏作业答案
9.[单选题]在运行时,按TAB键跳过了一个可以获得焦点的控件(如文本框),则可能是因为() (满分:)
A. 该控件的TABSTOP属性值为TRUE
B. 该控件的TABINDEX属性值为FALSE
C. 该控件的ENABLED属性值为TRUE
D. 该控件的ENABLED属性值为FALSE]
正确答案:————
10.[单选题]如果TAB函数的参数小于1,则打印位置在第()列。 (满分:)
A. 0
B. 1
C. 2
D. 3]
正确答案:————
11.[单选题]下面程序运行后输出的结果是(?)\n??DIMC1,C2\n??C1=\CHINA\\n??C2=STRING$(2,C1)\n??PRINTLeft(C1,1)+C2 (满分:)
A. CHI
B. CCC
C. INA
D. AAA]
正确答案:————
12.[单选题]以下叙述中错误的是() (满分:)
A. 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型
B. Sub过程中不能嵌套定义Sub过程
C. Sub过程中可以嵌套调用Sub过程
D. 事件过程可以像通用过程一样由用户定义过程名]
正确答案:————
13.[单选题]一个对象所能做的事情称为对象的() (满分:)
A. 继承
B. 属性
C. 封装
D. 方法]
正确答案:————
14.[单选题]利用下面哪个函数可判定访问文件时是否已到文件尾() (满分:)
A. LOF
B. LOC
C. EOF
D. BOF]
正确答案:————
15.[单选题]假定有以下程序段:\n?Fori=1to3????Forj=5to1Step–1\n??????Printi*j\nNextj,i?则语句Printi*j的执行次数是(?) (满分:)
A. 15
B. 16
C. 17
D. 18]
正确答案:————
16.[单选题]语句DIMAA(3,4,5)中定义的数组有多少个元素() (满分:)
A. 12
B. 60
C. 120
D. 345]
正确答案:————
17.[单选题]用于设置文件列表框控件显示文件类型的属性是() (满分:)
A. Filter
B. Path
C. Partern
D. FileName]
正确答案:————
18.[单选题]以下合法的VisualBasic标识符是() (满分:)
A. ForLoop
B. Const
C. 9abc
D. a#x]
正确答案:————
19.[单选题]假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项失效(变灰),应使用的语句为() (满分:)
A. MenuItem.Enabled=False
B. MenuItem.Enabled=True
C. MenuItem.Visible=True
D. MenuItem.Visible=False]
正确答案:————
20.[单选题]以下能够触发文本框Change事件的操作是() (满分:)
A. 文本框失去焦点
B. 文本框获得焦点
C. 设置文本框的焦点
D. 改变文本框的内容]
正确答案:————
《VB程序设计》2018秋学期在线作业（三）
一、单选题：
1.[单选题]VB中Do……Loop结构既可以构成当型循环,也可以构成直到型循环,根据下面的代码:?Dimi,nasInteger?n=20?i=1?Do\n???Printi;\n???i=i+2?LoopUntili>20?判断循环结构的类型和循环体的执行次数,正确的选项是() (满分:)
A. 当型循环，20次
B. 直到型循环，10次
C. 当型循环，10次
D. 直到型循环，20次]
正确答案:——B——
2.[单选题]可以同时删除字符串前导和尾部空白的函数是() (满分:)
A. Ltrim
B. Rtrim
C. Trim
D. Mid]
正确答案:——C——
3.[单选题]VB支持自定义数据类型,在某程序中我们定义了如下类型:\nTypeStudent???number?Asstring???nameAsString???ageAsIntegerEndType针对上述定义,如下几项用法正确的是:() (满分:)
A. Student.name=\张三\
B. Dims?AsStudent?s.name＝\张红\
C. DimsAsTypeStudents.name=\张三\
D. DimsAsTypes.name=\张三\]
正确答案:——B——
4.[单选题]以下关于VB中窗体(Form)的说法中,不正确的描述为() (满分:)
A. 执行UnloadForm语句后，窗体Form消失，但仍在内存中
B. 当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止
C. 窗体的Height、width属性用于设置窗体的高和宽
D. 窗体的load事件在加载窗体时发生]
正确答案:————
5.[单选题]??在运行阶段,要在文本框TEXT1获得焦点时选中文本框中所有内容,对应的事件过程是() (满分:)
A. PrivateSubText1_GotFocus()Text1.SelStart=0Text1.Sellength=Len(Text1.Text)EndSub
B. PrivateSubText1_LostFocus()Text1.SelStart=0Text1.Sellength=Len(Text1.Text)EndSub
C. PrivateSubText1_Change()Text1.SelStart=0Text1.Sellength=Len(Text1.Text)EndSub
D. PrivateSubText1_SetFocus()Text1.SelStart=0Text1.Sellength=Len(Text1.Text)EndSub]
正确答案:————
6.[单选题]InputBox函数返回值的类型为() (满分:)
A. 数值
B. 字符串
C. 变体
D. 数值或字符串（视输入的数据而定）]
正确答案:————
7.[单选题]组合框的风格可通过()属性来设置。 (满分:)
A. BackStyle
B. BorderStyle
C. Style
D. Sorted]
正确答案:————
8.[单选题]??在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,以下能实现上述操作的程序段是(?) (满分:)
A. PrivateSubHScroll_Change()?Text1.Text=HScroll1.Value?EndSub
B. PrivateSubHScroll_Click()?Text1.Text=HScroll1.Value?EndSub
C. PrivateSubHScroll_Change()?Text1.Text=HScroll.Caption?EndSub
D. PrivateSubHScroll_Click()?Text1.Text=HScroll.Caption?EndSub]
正确答案:————
9.[单选题]从键盘上输入两个字符串,分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是() (满分:)
A. Left
B. Mid
C. String
D. Instr]
正确答案:————
10.[单选题]假设变量BOOLVAR是一个布尔型变量,则下面正确的赋值语句是() (满分:)
A. BOOLVAR=‘TRUE’
B. BOOLVAR=.TRUE
C. BOOLVAR=#TRUE
D. #BOOLVAR=3<4]
正确答案:————
11.[单选题]以下叙述中错误的是() (满分:)
A. 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型
B. Sub过程中不能嵌套定义Sub过程
C. Sub过程中可以嵌套调用Sub过程
D. 事件过程可以像通用过程一样由用户定义过程名]
正确答案:————
12.[单选题]决定标签(Label)显示的属性是() (满分:)
A. Text
B. Name
C. Caption
D. Alignment]
正确答案:————
13.[单选题]变量未赋值时,数值型变量的值为() (满分:)
A. 0
B. 空
C. 1
D. 无任何值]
正确答案:————
14.[单选题]下列说法错误的是() (满分:)
A. 在同一模块不同过程中的变量可以同名
B. 不同模块中定义的全局变量不可以同名
C. 引用另一模块中的全局变量时，必须在变量名前加模块名
D. 同一模块中不同级的变量可以同名]
正确答案:————
15.[单选题]窗体Form1的Name属性是Frm1,它的单击事件过程名是() (满分:)
A. Form1_Click
B. Form_Click
C. Frm1_Click
D. Me_Click]
正确答案:————
16.[单选题]运行时,当用户向文本框输入新的内容,或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时,将触发文本框的()事件。 (满分:)
A. CLICK
B. DBLCLICK
C. GOTFOCUS
D. CHANGE]
正确答案:————
17.[单选题]如果TAB函数的参数小于1,则打印位置在第()列。 (满分:)
A. 0
B. 1
C. 2
D. 3]
正确答案:————
18.[单选题]以下关于多重窗体程序的叙述中,错误的是() (满分:)
A. 用Hide方法不但可以隐藏窗体，而且能清除内存中的窗体
B. 在多重窗体程序中，各窗体的菜单是彼此独立的
C. 在多重窗体程序中，可以根据需要指定启动窗体
D. 对于多重窗体程序中，而且单独保存每个窗体]
正确答案:————
19.[单选题]VisualBasic提供的OnErrorResumenext错误陷阱语句表示() (满分:)
A. 当发生错误时，使程序转跳到语句标号为0的程序块
B. 当发生错误时，不使用错误处理程序块
C. 当发生错误时，忽略错误行，继续执行下一语句
D. 当发生错误时，终止本过程执行，继续执行下一过程]
正确答案:————
20.[单选题]在运行时,若要获得用户在文本框中所选择的文本,可通过访问()属性来实现。 (满分:)
A. SelStart
B. SelLenght
C. Text
D. SelText]
正确答案:————
《VB程序设计》2018秋学期在线作业（二）
一、单选题：
1.[单选题]以下关于VB中窗体(Form)的说法中,不正确的描述为() (满分:)
A. 执行UnloadForm语句后，窗体Form消失，但仍在内存中
B. 当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止
C. 窗体的Height、width属性用于设置窗体的高和宽
D. 窗体的load事件在加载窗体时发生]
正确答案:——A——
2.[单选题]在程序中,使用InputBox函数可以接受用户的输入,如果要把它的返回值转换为数值型的数据,应该使用的函数是() (满分:)
A. Val
B. Len
C. Str
D. Log]
正确答案:——A——
3.[单选题]对于复选框控件chkBoy,如果在程序中设置它为选中状态,下面语句正确的是() (满分:)
A. chkBoy.Checked=true
B. chkBoy.Value=true
C. chkBoy.Selected=true
D. chkBoy.Value=1]
正确答案:——D——
4.[单选题]可以同时删除字符串前导和尾部空白的函数是() (满分:)
A. Ltrim
B. Rtrim
C. Trim
D. Mid]
正确答案:————
5.[单选题]以下叙述中错误的是() (满分:)
A. 事件过程是响应特定事件的一段程序
B. 不同的对象可以具有相同名称的方法
C. 对象的方法是执行指定操作的过程
D. 对象事件的名称可以由编程者指定]
正确答案:————
6.[单选题]从键盘上输入两个字符串,分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是() (满分:)
A. Left
B. Mid
C. String
D. Instr]
正确答案:————
7.[单选题]决定标签(Label)显示的属性是() (满分:)
A. Text
B. Name
C. Caption
D. Alignment]
正确答案:————
8.[单选题]在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是() (满分:)
A. Timer1.InterVal=0.5
B. Timer1.Interval=5
C. Timer.Interval=50
D. Timer1.Interval=500]
正确答案:————
9.[单选题]以下语句的输出结果是()\nPrintFormat$(32548.5,\000,000.00\) (满分:)
A. 32548.5
B. 325，485.00
C. 032，548，50
D. 32，548，50]
正确答案:————
10.[单选题]假定有以下程序段:\n?Fori=1to3????Forj=5to1Step–1\n??????Printi*j\nNextj,i?则语句Printi*j的执行次数是(?) (满分:)
A. 15
B. 16
C. 17
D. 18]
正确答案:————
11.[单选题]VisualBasic提供的OnErrorResumenext错误陷阱语句表示() (满分:)
A. 当发生错误时，使程序转跳到语句标号为0的程序块
B. 当发生错误时，不使用错误处理程序块
C. 当发生错误时，忽略错误行，继续执行下一语句
D. 当发生错误时，终止本过程执行，继续执行下一过程]
正确答案:————
12.[单选题]语句DIMAA(3,4,5)中定义的数组有多少个元素() (满分:)
A. 12
B. 60
C. 120
D. 345]
正确答案:————
13.[单选题]使文本框获得焦点的方法是() (满分:)
A. Change
B. GetFocus
C. SetFocus
D. LostFocus]
正确答案:————
14.[单选题]以下()程序段可以实施X、Y变量值的变换() (满分:)
A. Y=X：X=Y
B. Z=X：Y=Z：X=Y
C. Z=X：X=Y：Y=Z
D. Z=X：W=Y：Y=Z：X=Y]
正确答案:————
15.[单选题]以下关于多重窗体程序的叙述中,错误的是() (满分:)
A. 用Hide方法不但可以隐藏窗体，而且能清除内存中的窗体
B. 在多重窗体程序中，各窗体的菜单是彼此独立的
C. 在多重窗体程序中，可以根据需要指定启动窗体
D. 对于多重窗体程序中，而且单独保存每个窗体]
正确答案:————
16.[单选题]下面程序运行后输出的结果是(?)\n??Str1$=\AMERICA\\n??Str2$=Len(Str1$)\n??PRINTStr2$\n??END (满分:)
A. 5
B. 7
C. 6
D. 9]
正确答案:————
17.[单选题]用于从内存删除窗体的命令是() (满分:)
A. Move
B. Hide
C. Unload
D. Delete]
正确答案:————
18.[单选题]InputBox函数返回值的类型为() (满分:)
A. 数值
B. 字符串
C. 变体
D. 数值或字符串（视输入的数据而定）]
正确答案:————
19.[单选题]??在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,以下能实现上述操作的程序段是(?) (满分:)
A. PrivateSubHScroll_Change()?Text1.Text=HScroll1.Value?EndSub
B. PrivateSubHScroll_Click()?Text1.Text=HScroll1.Value?EndSub
C. PrivateSubHScroll_Change()?Text1.Text=HScroll.Caption?EndSub
D. PrivateSubHScroll_Click()?Text1.Text=HScroll.Caption?EndSub]
正确答案:————
20.[单选题]在VisualBasic中,若要将控制权交给操作系统则通过()的语句。 (满分:)
A. End
B. ExitDo
C. ExitSub
D. DoEvents]
正确答案:————
附件是答案，需要的核对题目下载，辅导联系q761296021
页:
[1]