您所在的当前位置： 计算机等级考试题库   >  
BASIC题库  
  >  [填空题] 下列程序的功能是：弹出一个对话框询问用户是否输出，如果是，则输出：否则结束。请填空。 Sub PrintOut() Dim a As Integer a=MsgBox("输出结果",vblnformation+vbYesNo，"提示：") If a=______Then Print "Myresult" End If End Sub
问题：
发布时间：2022-07-01

[填空题] 下列程序的功能是：弹出一个对话框询问用户是否输出，如果是，则输出：否则结束。请填空。
Sub PrintOut()
Dim a As Integer
a=MsgBox("输出结果",vblnformation+vbYesNo，"提示：")
If a=______Then
Print "Myresult"
End If
End Sub

参考答案：
题目声明 提问用户：pJ***quD
可能感兴趣的题目：

1

[单项选择题] 在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，
然后编写如下程序：
Private Sub func(L As Label，ByVal a As Integer)
L.Caption="1234"
a=a*a
End Sub
Private Sub Form_Load()
Labell.Caption="ABCD"
Label2.Caption=10
End Sub
Private Sub Command1_Click()
a=Val(Label2.Caption)
Call func(Labell，


A．
Label2.Caption=a
End Sub
程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是：_______。A) ABCD和10
B．1234和100
C．ABCD和100
D．1234和10

2

[问答题] 注意：下面出现的“考生文件夹”均为C：wexam25160002。 在考生文件夹下有一个工程文件sjt5.vbp，相应的窗体文件为sjt5.frm，此外还有一个名为datain.txt的文本文件，其内容如下： 86 97 13 24 35 46 57 68 79 80 59 37 32 43 76 58 28 12 98 57 31 42 53 64 75 程序运行后，单击窗体，将把文件datain.txt中的数据输入到二维数组Mat中，在窗体上按5行5列的矩阵形式显示出来，然后计算矩阵第三行各项的和，并在窗体上显示出来，如图25-5所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。 要求：去掉程序中的注释符，把程序中的改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

3

[填空题] 软件定义时期主要包括 【4】 和需求分析两个阶段。

4

[填空题] 下面程序的功能是产生10个小于100(不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。
SubPR()
　Randomize
　Dim a(10)
　For j=1 To 10
　a(i)=Int( (14) )
　If (15) Then k=k+1
　Print a(j)
　Next j
　Print
　Print k/10
Fnd Sub

5

[单项选择题] 在学生管理的关系数据库中，存取一个学生信息的数据单位是


A．文件
B．数据库
C．字段
D．记录

6

[填空题] 程序是一个窗体双击事件代码，窗体的名称是Mywindow。窗体上有一个名为text1的文本框，用来显示文本。
程序段首先在文本框中显示“窗体能够触发双击事件”然后将该文本清除；重复上述过程5次。
Option Explicit
Private ______
Dim k As Integer
For k=1 To 100
If k Mod 20 Then
_______
Else
Text1.Text=" "
End If
Print“程序运行完毕，可再双击窗体”
End Sub

7

[填空题] 【7】 布局管理器将组件一排一排地依次放置，它是Panel和Applet容器地默认布局管理器。

8

[填空题] 在窗体上设计如下两个事件过程：
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在程序运行后，按“a”键(不按住Shift键)，则窗体上输出的结果是______。

9

[单项选择题] 算法的主要运算如下，其中i的初值为0，s初值为0，“=”为赋值号。 While i＜n do { s=0； While s＜n do {s=s+1； } i=i+1； } 该算法的时间复杂度为()


A．O(2
B．O(n+log 2 n)
C．O(nlog 2 n)
D．O(n 2)

10

[问答题] 在考生文件夹下有一个工程文件sjt5.vbp，相应的窗体文件为sjt5.frm。窗体中已经给出了所有控件(框架中的3个单选按钮构成了一个控件数组)，如图3—1所示，请编写适当的事件过程。程序运行后，如果选中某个单选按钮，然后单击“计算”命令按钮，则计算出数列1，1，2，3，5，8，13，21，…的第n项的值，并在文本框中显示出来，其中n是选中的单选按钮标题所指定的数值。要计算的数列的变化规律是：从第3个数开始，每个数是它前面两个数之和 (提示：由于计算结果较大，存放结果的变量应使用长整型)。 注意：①不得修改已经给出的程序和已有的控件的属性；②在结束程序运行之前，必须选中一个单选按钮，并单击“计算”命令按钮获得一个结果；③必须通过单击窗体右上角的“关闭”按钮结束程序，否则无成绩。试题所提供的事件过程如下： Private Sub Form_Unload(Cancel As Integer) Open"out5.dat"For Output As #1 Print #1,Op1(0).Value,Op1(1).Value,Op1(2).Value,Va1(Text1.Text) Close #1 End Sub