大学计算机基础知识

1、精选优质文档-倾情为你奉上第一套VB 窗体设计器的主要功能是_。A.显示文字B.建立用户界面C.画图 D.编写源程序代码【参考答案】错误B【学生答案】D以下叙述中错误的是_。A.事件过程是响应特定事件的一段程序B.对象的方法是执行指定操作的过程C.对象事件的名称可以由编程者指定D. 不同的对象可以具有相同名称的方法【参考答案】错误C【学生答案】B在默认情况下，InputBox() 函数返回值的类型为_。A.逻辑类型B.变体类型C.数值型D.字符串型【参考答案】错误D【学生答案】B执行语句"For i=1 to 3:i=i+1:Next i"后变量i的值是_。A.6B.4C.

2、5D.3【参考答案】错误C【学生答案】B下列所列中，错误的一维数组说明语句是_。A.Dim b(5 To 5) AS StringB.Dim b(-5 To 0) AS ByteC.Dim b(-10 To -20) AS IntegerD.Dim b(100) AS Double【参考答案】错误C【学生答案】D下列叙述中,错误的说法是_。A.使用Redim语句可以改变数组每维数的大小B.使用Redim语句可以对数组的元素初始化C.使用Redim语句可以改变数组的维数D.使用Redim语句可以改变数组的类型【参考答案】错误D【学生答案】C若 x 为实型变量，要使其输出保留二位小数，应用_函数。

3、A.Mid()B.Format()C.Right()D.InStr()【参考答案】正确B【学生答案】B下面叙述中，错误的是_。A.自定义类型只能在窗体模块的通用声明段进行声明B.在窗体模块中定义自定义类型时必须使用Private关键字C.自定义类型中的元素类型可以是系统提供的基本数据类型或已声明的自定义类型D.自定义类型必须在窗体模块或标准模块的通用声明段进行声明【参考答案】正确A【学生答案】A在过程中定义的变量，若离开该过程后，还能保存过程中的局部变量的值，则应使用_关键字在过程中定义。A.PrivateB.StaticC.DimD.Public【参考答案】错误B【学生答案】D为了装入一个

4、Visual Basic 应用程序，下列说法中，正确的是_。A.分别装入工程文件和标准模块文件(.bas)B.只装入窗体文件(.frm)C.只装入工程文件(.vbp)D.分别装入工程文件、窗体文件和标准模块文件【参考答案】错误C【学生答案】D将数据项 "China" 添加到列表框 List1 中成为第一项应使用_语句。A.List1.AddItem "China", 1B.List1.AddItem 1, "China"C.List1.AddItem "China", 0D.List1.AddItem 0, &qu

5、ot;China"【参考答案】错误C【学生答案】D用户在组合框中输入或选择的数据可以通过_属性获得。A.ListB.TextC.ListIndexD.ListCount【参考答案】错误B【学生答案】C在下列关于菜单的说法中，错误的是_。A.每个菜单项都是一个控件，与其它控件一样也有自己的属性和事件。B.在程序执行时，如果菜单项的Enabled属性为False，则该菜单项变成灰色，不能被用户选择。C.除了Click事件之外，菜单项还能响应其他的如DblClick等事件。D.菜单项的快捷键不能任意设置。【参考答案】错误C【学生答案】D下面所列中，鼠标单击事件名为_。A.DblClickB

6、.MouseUpC.MouseDownD.Click【参考答案】错误D【学生答案】C图片框 Picture1 中装入了一个图形，运行时为了清除该图形，应采用的正确方法是_。A.选择图片框，在属性窗口中选择Picture属性条，然后按回车键B.Picture1.picture = ""C.选择图片框，然后按Del键D.Picture1.picture = LoadPicture("")【参考答案】错误D【学生答案】B下面关于随机文件的描述中，不正确的是_。A.一个文件的记录号不必唯一B.其组织结构比顺序文件复杂C.每条记录的长度必须相同D.数据只能对ASC

7、II码形式存放在文件中，所以可通过编辑软件显示【参考答案】错误A【学生答案】C程序题（69）在窗体上画一个名称为Command1的命令按钮，编写下列程序： Private Sub Command1_Click() Dim a As Integer Static b As Integer a=a+b b=b+4 Print a,b End Sub程序运行后，单击该命令按钮三次后，屏幕上显示的值是_。A.8 12B.4 8C.0 4D.4 12【参考答案】错误A【学生答案】C判断题：语句If x > 0 Then y=7x-1是正确的。【参考答案】错误错误【学生答案】正确一个名为pic2.g

8、if的图形文件，要在运行期间把该文件装入一个图片框（Picturel），应执行的语句是_。【空 1】错误【学生答案】无【参考答案】Picture1.Picture=LoadPicture("pic2.gif")picture1.picture=loadpicture("pic2.gif")为了使列表框中的项目分为多列显示，需要设置的属性是_。【空 1】错误【学生答案】无【参考答案】COLUMNScolumnsColumns设a="北京"，b="Shanghai"，则表达式LEFT(a，2)+STRING(3，&qu

9、ot;-")+LEFT(b，8)构成的字符串是_。【空 1】错误【学生答案】京-i【参考答案】北京-Shanghai在程序运行中，要想使用按钮变成看得见但不可操作，则应设置_的属性是False。空 1】错误【学生答案】enable【参考答案】ENABLEDEnabledenabledInputBox函数返回值的类型为_。【空 1】错误【学生答案】变体型【参考答案】字符型关闭所有已经打开的文件，应使用语句_。【空 1】错误【学生答案】end【参考答案】CLOSEcloseCloseVB6.0识别对象靠的是对象的_属性。 【空 1】正确【学生答案】name【参考答案】NAMENamena

10、me'题目：编写函数fun，函数的功能是：计算n门课程' 的平均值，计算结果作为函数值返回。' 例如，若有5门课程的成绩是：92，76，69，' 58，88，则函数的值为76.6。'-Private Function fun(a() As Integer, n As Integer) As Double'* Begin * '* End *End FunctionPrivate Sub Form_Load() Show Dim a(5) As Integer, i As Integer a(1) = 92: a(2) = 76: a(3)

11、 = 69: a(4) = 58: a(5) = 88 Print fun(a, 5) TestFuncEnd SubPrivate Sub TestFunc() Dim i As Integer Dim s As String Dim l As Long Dim d As Double Dim a(10) As String Dim b(5) As Integer Dim fIn As Integer Dim fOut As Integer fIn = FreeFile Open App.Path & "in.dat" For Input As #fIn fOut

12、 = FreeFile Open App.Path & "out.dat" For Output As #fOut For i = 1 To 5 Line Input #fIn, a(i) b(i) = Val(a(i) Next Print #fOut, fun(b, 5) Close #fIn Close #fOut End Sub【参考代码】 Dim i As Integer Dim y As Single For i = 1 To n y = y + a(i) Next fun = y / n=【考生代码】Dim a(i) As String, s!, n%

13、, ave!n = InputBox("请输入课程数")ReDim a(1 To n) As Strings = 0For i = 1 To na(i) = InputBox("请输入课程的分数")s = s + a(i)Next iave = s / nPrint ave第二套设某个程序中要用到一个二维数组，要求数组名为A，类型为字符串类型，第一维下标从1到5，第二维下标从-2到6，则相应的数组声明语句为_。【空 1】错误【学生答案】dim A(1 to 5,-2 to 6) as string【参考答案】dim A(1 To 5，-2 To 6) A

14、s StringDim A(1 To 5，-2 To 6) As String日期表达式 #2/24/02# - #2/12/02# 的值为_。【空 1】错误【学生答案】#0/12/0#【参考答案】12已知a=3，b=4，c=5，表达式a>b and Not c>a Or c>b And c<a+b的值是_。表达式c>a And Not b<c的值是_。【空 1】正确【学生答案】true【参考答案】trueTrue=【空 2】正确【学生答案】false【参考答案】falseFalse创建一个VB应用程序三个主要的步骤是_、_和_。【空 1】错误【学生答案】无

15、【参考答案】创建应用程序界面=【空 2】错误【学生答案】无【参考答案】设置属性编写代码=【空 3】错误【学生答案】无【参考答案】编写代码设置属性整型变量X中存放了一个两位数，要将两位数个位与十位交换位置，例如12变为21，实现的表达式是_。【空 1】错误【学生答案】无【参考答案】 x 10+(x mod 10)*10 (x mod 10)*10 + x 10要对文本框中已有的内容进行编辑，按下键盘上的键，就是不起作用，原因是设置了_属性为True。空 1】错误【学生答案】无【参考答案】LockedlockedPictureBox控件可通过设置其_属性为True使之可自动调整大小；而Image控

16、件可通过设置其_属性为True，使其加载的图片能自动调整大小以适应Image。【空 1】错误【学生答案】无【参考答案】autosizeAutoSize=【空 2】错误【学生答案】无【参考答案】stretchStretch题目：编写函数fun，函数的功能是：求从m到n的奇数的乘积并显示，'如：m为2，n为5时，显示"15"'存储连乘的乘积的变量必须为Product'要求使用For语句来实现。'-'注意： 请在指定的事件内编写代码' 代码只能写在两行标识之间' 不得修改已有代码'保存时不得修改窗体和工程文件的名称及

17、路径，否则后果自负。'-Private Function fun(m As Integer, n As Integer) As LongDim Product As Double, t As IntegerIf m > n Then t = m: m = n: n = t'* Begin *'* End *End FunctionPrivate Sub Form_Load() Show Print fun(5, 2) NJIT_VBEnd SubPrivate Sub NJIT_VB() Dim i As Integer Dim a(10) As String D

18、im fIn As Integer Dim fOut As Integer fIn = FreeFile Open App.Path & "in.dat" For Input As #fIn fOut = FreeFile Open App.Path & "out.dat" For Output As #fOut For i = 1 To 10 Step 2 Line Input #fIn, a(i) Line Input #fIn, a(i + 1) Print #fOut, Trim(Str(fun(Val(a(i), Val(a(i

19、 + 1) Next Close #fIn Close #fOutEnd Sub【参考代码】Product = 1For i = m To n If i Mod 2 <> 0 Then Product = Product * iNext ifun = Product=【考生代码】Dim i As Integerproduct = 1For i = m To n If i Mod 2 <> 0 Then product = product = product * i End IfNext iPrint "product=" product第二套组合框有

20、3种不同的类型，这3种类型是下拉式列表框、简单组合框和_。【空 1】错误【学生答案】混合组合框 【参考答案】下拉式组合框print format(32548.5,"#,#.#")的输出结果是_。【空 1】错误【学生答案】无【参考答案】32,548.5为了使列表框中的项目分为多列显示，需要设置的属性是_。【空 1】错误【学生答案】无【参考答案】COLUMNScolumnsColumns标签控件的默认属性是_。【空 1】错误【学生答案】label【参考答案】CAPTIONCaptioncaption如果要将变量a在过程中定义为静态的整型变量，应使用的语句是_。【空 1】错误【学

21、生答案】dim a as string【参考答案】static a%static a as integerStatic a%Static a As Integer判断题：语句：If a=c-b Then Print # Else Print *是正确的。【参考答案】错误正确【学生答案】错误如果文本框的 Enabled 属性设为 False，则_。A.文本框的文本将变成灰色，用户仍然能改变文本框中的内容。B.文本框的文本将变成灰色，并且此时用户不能将光标置于文本框上C.文本框的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容。D.文本框的文本正常显示，用户能将光标置于文本

22、框上，但是不能改变文本框中的内容。【参考答案】错误B【学生答案】C执行语句"For i=1 to 3:i=i+1:Next i"后变量i的值是_。A.6B.4C.5D.3【参考答案】错误C【学生答案】B若有数组说明语句：Dim t(1 To 10)，则 t 被定义为_。A.字符串型数组B.变体类型数组C.动态数组D.整型数组【参考答案】错误B【学生答案】C通用过程可以通过执行"工具"菜单中的_命令来建立。A.通用过程B.添加过程C.添加窗体D.添加模块【参考答案】正确B【学生答案】B有如下的程序： Private Sub Command1_Click()

23、 a=1:b=2:c=3 Call test(a,b+3,(c) Print "main:"a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print"Sub:"p;m;n End Function当运行程序后，单击命令按钮 Command1 ，显示的结果是_。A.sub:2 6 4 main:1 6 4B.sub:2 6 4 main:2 6 4C.sub:2 6 4 main:1 2 3D.sub:2 4 6 main:2 2 3【参考答案】错误D【学生答案】B在过程中定义的变

24、量，若离开该过程后，还能保存过程中的局部变量的值，则应使用_关键字在过程中定义。A.PrivateB.StaticC.DimD.Public【参考答案】错误B【学生答案】D事件内编程，要停止触发 Timer 事件，可通过以下_属性。A.Enabled = False且Interval = 0B.Enabled = False或Visible = FalseC.Enabled = False或Interval = 0D.Visible= False或Interval = 0【参考答案】错误C【学生答案】A下面关于列表框正确的是_。A.列表框中的内容可以直接修改B.列表框控件实质是一维字符数组C.

25、列表框的AddItem方法是把项目从列表框中删除D.列表框的Clear方法是删除列表框中由索引值指定的项目【参考答案】正确B【学生答案】B在下列关于菜单的说法中，错误的是_。A.每个菜单项都是一个控件，与其它控件一样也有自己的属性和事件。B.在程序执行时，如果菜单项的Enabled属性为False，则该菜单项变成灰色，不能被用户选择。C.除了Click事件之外，菜单项还能响应其他的如DblClick等事件。D.菜单项的快捷键不能任意设置。【参考答案】错误C【学生答案】D在 VB 中用来画弧、圆和椭圆的属性或者方法是_。A.PsetB.LineC.CircleD.三者都不是【参考答案】错误C【学

26、生答案】D数组题目：(事件)单击窗体。' (响应)利用控件数组产生如图所示的1-9的9个按钮。'要求： 用For语句来实现'-'注意： 请在指定的事件内编写代码,代码只能写在' * Begin *' * End *' 的内部，不得修改已有代码保存时不得修改' 窗体和工程文件的名称及路径，否则后果自负。'-Private Sub Form_click() Dim i As Integer'* Begin * '* End *End Sub【参考代码】 For i = 1 To 9 Load Command1(

27、i) Command1(i).Visible = True Command1(i).Left = Command1(0).Left + Command1(0).Width * i Command1(i).Caption = i Next i'【程序设计】'-'题目：(事件)单击命令按钮。' (响应)利用随机函数产生10-99的10个整数存入数组x中，然后在窗体上输出这10个数，' 再用冒泡排序法对这10整数由小到大排序，并将排序后的结果输出在窗体上'要求： 用For语句来实现'-'注意： 请在指定的事件内编写代码,代码只能写在&#

28、39; * Begin *' * End *' 的内部，不得修改已有代码保存时不得修改' 窗体和工程文件的名称及路径，否则后果自负。'-Option Base 1Private Sub Command1_Click() Randomize Cls Dim x(10) As Integer, t As Integer Dim i As Integer, j As Integer'* Begin *'* End *End Sub【参考代码】 For i = 1 To 10 x(i) = Int(Rnd * 90) + 10 Print x(i); N

29、ext i Print For i = 1 To 10 For j = 1 To 10 - i If x(j) > x(j + 1) Then t = x(j) x(j) = x(j + 1) x(j + 1) = t End If Next Next For i = 1 To 10 Print x(i); Next i'【程序设计】'-'题目：(事件)单击命令按钮。' (响应)利用随机函数生成0,9的数字组成的5行5列的矩阵，' 并在窗体上按5行5列显示该矩阵,然后求它的两条对角线上' 的元素之和s ,最后在窗体上显示出s的值。'

30、要求： 用For语句来实现'-'注意： 请在指定的事件内编写代码,代码只能写在' * Begin *' * End *' 的内部，不得修改已有代码保存时不得修改' 窗体和工程文件的名称及路径，否则后果自负。'-Option Base 1Private Sub Command1_Click() Dim a(5, 5), s As Integer Dim i%, j% Randomize'* Begin *'* End * End Sub【参考代码】 For i = 1 To 5 For j = 1 To 5 a(i, j)

31、= Int(Rnd * 10) Print a(i, j); Next j Print Next i s = 0 For i = 1 To 5 For j = 1 To 5 If i = j Or i + j = 6 Then s = s + a(i, j) Next j Next i Print s'-'【程序设计】'-'题目：(事件)单击命令按钮。' (响应)求已知数组A的所有元素的平均值存入变量Aver,并在窗体上输出结果。'要求： 用For语句来实现'-'注意： 请在指定的事件内编写代码,代码只能写在' * Beg

32、in *' * End *' 的内部，不得修改已有代码保存时不得修改' 窗体和工程文件的名称及路径，否则后果自负。'-Option Base 1Private Sub Command1_Click() Dim A(), Aver As Single A = Array(10, 20, 34, 54, 26, 89, 12, 34)'* Begin *Dim i As Integer Aver = 0 For i = 1 To 8 Aver = Aver + A(i) Next i Aver = Aver / 8 Print Aver='【程序设计

33、】'-'题目：(事件)单击命令按钮。' (响应)求数列1，1，2，3，5，8，,的前40项，并以每行5个数的形式在窗体上输出结果。'要求： 用For语句来实现'-'注意： 请在指定的事件内编写代码,代码只能写在' * Begin *' * End *' 的内部，不得修改已有代码保存时不得修改' 窗体和工程文件的名称及路径，否则后果自负。'-Option Base 1Private Sub Command1_Click() Dim f(1 To 40) As Long, i As Integer f(1) =

34、 1: f(2) = 1'* Begin * '* End *End Sub【参考代码】 For i = 3 To 40 f(i) = f(i - 1) + f(i - 2) Next i For i = 1 To 40 Print f(i), If i Mod 5 = 0 Then Print Next i第三套英文缩写“OOP”的含义是_。A.事件驱动的编程机制B.结构化程序设计语言C.面向对象程序设计D.可视化程序设计【参考答案】错误C【学生答案】未答此题以下叙述中错误的是_。A.事件过程是响应特定事件的一段程序B.对象的方法是执行指定操作的过程C.对象事件的名称可以由编

35、程者指定D. 不同的对象可以具有相同名称的方法【参考答案】错误C【学生答案】B执行语句 receive = MsgBox("AAAA", , "BBBB", "", 5) 后，所产生的信息框的标题是_。A.AAAAB.BBBBC.空D.出错，不能产生信息框【参考答案】错误B【学生答案】A下面所列中，正确的数组声明语句是_。A.Dim a(n,n) AS IntegerB.Dim a(0 To 8,5 To -1) AS SingleC.Dim a(10,-10) AS DoubleD.Dim a(-1 To 5,8) AS Strin

36、g【参考答案】错误D【学生答案】A下列叙述中，正确的是_。A.在调用过程时，所有局部变量被系统初始化为0或空字符串B.在窗体的Form_Load事件过程中定义的变量是全局变量C.在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于该过程D.局部变量的作用域可以超出所定义的过程【参考答案】正确C【学生答案】C当要用字符串 "VB考试" 修改列表框 List1 所选中的数据项时，正确的表示方法是_。A.List(List1.ListIndex) = "VB考试"B.List1.List(ListIndex) = "VB考试"C.List1.AddItem "VB考试"D.List1.List(List1.ListIndex)="VB考试"【参考答案】正确D【学生答案】D滚动条的默认属性是_。A.NameB.MinC.ValueD.Max【参考答案】错误C【学生答