单选题若在窗体模块的声明部分声明了如下自定义类型和数组 Private Type Tem Score As Integer StrName As String End Type Dim Student(5)As Tem 则下面的输出语句中正确的是( )。
单选题为了用键盘打开菜单和执行菜单命令,第一步应按的键是{{U}} {{/U}}。
A.功能键F10或Alt键
B.Shift+功能键F4
C.Ctrl或功能键F8
D.Ctrl+Alt键
单选题在窗体(名称为Forml)上绘制一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是( )。
单选题在软件开发中,需求分析阶段产生的主要文档是
单选题下列数据结构中,能用二分法进行查找的是( )。
单选题把窗体的Key Preview属性设置为True,然后编写如下过程: Private Sub
Form_KeyDown(KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode) End Sub Private Sub
Form_KeyUp(KeyVode As Integer, ShiftAs Integer)
Print Chr(KeyCode+2) End Sub
程序运行后,如果按“A”键,则输出结果______。
A. A
B. A
C. A
D. A A B C D
单选题栈的基本运算有( )。
单选题结构化程序设计的3种基本结构是
____
。
单选题VisualFoxPro中打开数据库的命令是()
单选题语句:Print Asc(ChrS(Mid$("98765432",4,2)))的输出是
单选题有下面事件过程: Private Sub Command1_Click() Dim a(20)As Integer,n(5)As Integer Dim m As Integer,Bum As Integer Randomize For k=1 To 20 a(k)=Int(Rnd*5)+1 Print a(k); n(a(k))=n(a(k))+1 Next k Print m=n(1) num=1 For k=2 To 5 If n(k)>m Fhen m=n(k) num=k End If Next k Print m.num End Sub 此事件过程运行时会出现2行输出,如果第一行输出是: 4 2 4 1 4 1 4 5 3 2 5 5 1 4 2 3 4 3 4 2 则第2行的输出是( )。
单选题下列叙述中,正确的是( )。
单选题窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程: Private Sub Text1_Change(Index As Integer) Select Case Index Case 0 Text1(1).FontSize=Text1(0).FontSize*2 Text1(1).Text=Text1(0).Text Case 1 Text1(0).FontSize=Text1(1).FontSize/2 TextI(0).Text=Text1(1).Text Case Else MsgBox"执行Else分支" End Select End Sub 关于上述程序,以下叙述中错误的是( )。
单选题单击命令按钮时,下列程序的执行结果是______。
Private Sub Command1_Click()
Call BT 4
End Sub
Private Sub BT(x As Integer)
x=x*2+1
If x<6 Then
Call BT(x)
End If
x=x*2
Print x;
End Sub
单选题为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把ScrollBars属性设置为______。
单选题窗体上有一个名称为Command1的命令按钮,并有如下程序:
Private Sub Command1Click()
Dim m As Integer,n As Integer
m=InputBox("输入第一个数")
nzInputBox("输入第二个数")
Do While m<>n
Do While m>n
m= m-n
Loop
Do While n>m
n=n-m
Loop
Loop
Print m
End Sub
该程序的功能是( )。
单选题在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load() Show Text1. Text = " " Text1. SetFocus End Sub Private Sub Command1_Click() Text1. Text = LCase(SaveAll) + SaveAll End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll = SaveAll + Chr(KeyAscii) End Sub 程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为( )。 A) vbVB B) 不显示任何信息 C) VB D) 出错
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
a$="VisualBasic"
Print String(3,a$)
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是______。
单选题文本框控件最多能处理 ______个字节。
A. 32K
B. 64K
C. 128K
D. 16K
单选题在窗体上添加一命令按钮,其名为Command1,然后编写代码如下: private Sub Command1_Click() Dim arr(5)As Integer,arr1(5)AS Integer n=3 For i=1 To 5 arr(i)=i arr1(n)=2*n+i Next Print arr1(n);art(n) End Sub 程序的运行结果为 A) 3 11 B) 11 3 C) 13 3 D) 3 13
