题库
题库
A．程序运行时会出错
B．单击图片框，在图片框中显示一幅图片
C．过程中的X是控件变量
D．单击标签，在标签中显示一串文字
| 单选题 | 在软件开发中，需求分析阶段产生的主要文档是 | 查看答案 |
| 单选题 | 现有如下程序： Private Sub Command1_ Click() S=0 For i=1 to 5 S=S+f(5+i)  Next Print S End Sub Public Function f(x As Integer) If x>=10 Then t=x+1 Else t=x+2 End If f=t End Function 运行程序，则窗体上显示的是 |
查看答案 |
| 单选题 | 窗体上有一个用菜单编辑器设计的菜单（见上图）。运行程序，并在窗体上单击鼠标右键，则弹出一个快捷菜单，如图所示。以下叙述中错误的 | 查看答案 |
| 单选题 | 窗体上有一个名称Text1的文本框，一个名称为Command1的命令按钮。窗体文件的程序如下： Private Type x a As Integer b AS Integer End Type Private Sub Command1_Click() Dim y As x y.a = InputBox(“”) If y.a\2=y.a/2 Then y.b=y.a*y.a Else y.b = Fix(y.a/2) End If Text1.Text=y.b End Sub 对以上程序，下列叙述中错误的是 |
查看答案 |
| 单选题 | 为了使文本框同时具有垂直和水平滚动条，应先把MultiLine属性设置为True，然后再把Scrollbars属性设置为 | 查看答案 |
| 单选题 | 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp的事件过程如下： Private Sub Text1_KeyUp(KeyCode As Integer , shift AS Integer) Dim C AS string Tcxt2.Text=Chr(Asc(c)+2) End Sub 当向文本框Text1中输入小写字母a时，文本框Text2中显示的是 |
查看答案 |
| 单选题 | 窗体上有一个名称为Picture1图片框控件，一个名称Label1的标签控件。如图所示。 现有如下程序： Public Sub display (x As Control) If TypeOf x is Label Then x.Caption=“计算机等级考试” Else x.Picture = Loadpicture(“pic.jpg”) EndIf End Sub Private Sub Label1_Click() Call display(Label1) End Sub Private Sub Picture1_Click() Call display(Picture1) End Sub 对以上程序，下列叙述中错误的是 |
查看答案 |
| 单选题 | 已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩（均为整数）。现需要计算每个学生的总分，某人编写程序如下： Option Base 1 Private Sub Command1_Click() Dim sum As Integer Sum=0 For i=1 To 4 For j=1 To 3 Sum = sum + score(i,j) Next j Print“第”&i&”个学生的总分是:”;sum Next i End Sub 运行此程序时发现，除第1个人的总分计算正确外，其他人的总分是错误的。程序需要修改。以下修改方案中正确的是 |
查看答案 |
| 单选题 | 以下数组定义语句中，错误的是 | 查看答案 |
| 单选题 | 窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为“计算”的命令按钮Command1，并编写了以下程序： Private Sub Command1_ClickO Call Cale (HV.Value, HT.Value) End Sub  Public Sub Cale(x AS Integer , y AS Integer) Text1.Text = x* y End Sub 运行程序，单击“计算”按钮，可根据速度与时间计算出距离，并显示计算结果。对以上程序，下列叙述中正确的是 |
查看答案 |
| 单选题 | 结构化程序设计的基本原则不包括 | 查看答案 |
| 单选题 | 软件设计中模块划分应遵循的准则是 | 查看答案 |
| 单选题 | 文本框Text1的KeyDown事件过程如下： Private SubText1_ KeyDown(KeyCode As Integer, Shift As Integer) End Sub 其中参数KeyCode的值表示的是发生此事件时 |
查看答案 |
| 单选题 | 设窗体上有一个文体框Text1和一个命令按钮Command1,并有以下事件过程： Private Sub Command1_Click() Dim S As String , ch As String S=“” For k=1 TO Len(Text1) ch = Mid(Text1,k,l) S=ch+S Next k Text1.Text=S End Sub 程序执行时，在文本框中输入“Basic”,然后单击命令按钮，则Text1中显示的是 |
查看答案 |
| 单选题 | 设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas，两个窗体上分别只有一个名称Command1的命令按钮。 Form1的代码如下： Public X As Integer Private Sub Form_load() x=1 y=5 End Sub Private Sub Command1_Click() Form2.Show End Sub Form2的代码如下： Private Sub Command1_Ciick() Print Form1.x,y End Sub Module1的代码如下： Public y As Integer 运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是 |
查看答案 |
| 单选题 | 程序流程图中带有箭头的线段表示的是 | 查看答案 |
| 单选题 | 设窗体上有一个标签Labell和一个计时器Timer1，Timer1的Interval属性被设置为1000，Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是 | 查看答案 |
| 单选题 | 以下选项中，不合法的Visual Basic变量名是 | 查看答案 |
| 单选题 | 对长度为n的线性表排序，在最坏的情况下，比较次数不是n(n-1)/2的排序方法是 | 查看答案 |
| 单选题 | 若已把一个命令按钮的Default属性设置为True，则下面可导致按钮的Click事件过程被调用的操作是 | 查看答案 |