单选题以下关于过程的叙述中，错误的是
单选题有下面程序代码：
Private Sub Command1_Click()
i = 1
Do While i 10
Print
i = i + 2
Loop
End Sub
程序运行时输出字符"*"的个数是
单选题有以下程序段，当在消息框中输入8后，y的值为______。
x=InputBox("Enter an Integer")
x=CInt(x)
Select Case x
Case Is＜=0
y=0
Case Is＜=10
y=5+2*x
Case Is＜=15
y=x-5
Case Is＞15
y=0
End Select
单选题下列叙述中错误的是( )。
单选题下列关于控件焦点的叙述中正确的是( )。
单选题设在工程中有一个标准模块，并定义了如下类型： Type Stutype ino As Integer strname As String*20 strsex As String*2 smark As Single End Type 在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1 Click时，在C盘根目录下的随机文件Student.dat中写入一条记录。下列能够完成该操作的是( )。
单选题窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序：PrivateSubCommand1Click()DimnIfText1．Text<>”123456”Thenn=n+1Print”口令输入错误”&n&”次”EndIfEndSub希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是
单选题某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下： Function MaxValue(a()As integer)As Integer Dim max% max=1 For k=2 To 10 If a(k)＞a(max)Then max=k End If Next k MaxValue=max End Function 程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是 ( )。 A) 语句max=1应改为max=a(1) B) 语句For k=2 To 10应改为For k=1 To 10 C) If语句中的条件a(k)＞a(max)应改为a(k)＞max D) 语句MaxValue=max应改为MaxValue=a(max)
单选题若要使文本框能够输入多行文本，应该设置的属性是
单选题Print Right(”VB Programming”，2)语句的输出结果是
单选题编写如下程序： Private Sub Form_Click() Print"Welcome!" End Sub Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Print"欢迎!" End Sub Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，Y As Single) Print"热烈欢迎!" End Sub 程序运行后，单击窗体，输出结果为
单选题数据库系统在其内部具有3级模式，用来描述数据库中全体数据的全局逻辑结构和特性的是( )。
单选题以下能从字符串“VisualBasic”中直接取出子字符串“Basic”的函数是( )。
单选题定义有5个整数型元素的数组，正确的语句是______。
A. Dim a(4)As Integer
B. Option Base 1：Dim a(5)
C. Dim a&(5)
D. Dime a(5)As Integer
单选题单击命令按钮时，下列程序的执行结果为 Private Sub
Command1_Click( ) Dim x As Integer，y
As Integer x=50：y=78
Call PPP(x，y) Print
x；y End Sub Public
Sub PPP(ByVM n As Integer，ByVal m As Integer)
n=n/l0 m=m/l0
End Sub
A.08
B.50 78
C.450
D.78 50
单选题设窗体上有一个水平滚动条HScroll1和一个命令按钮Command1，及下面的事件过程：PrivateSubForm_Load()HScroll1.Min=0HScroll1.Max=100EndSubPrivateSubCommand1_Click()HScroll1.Value=70EndSub程序运行时单击命令按钮，则滚动条上滚动块位置的图示是______。A．B．C．D．
单选题在窗体上画一个名称为Command1的命令按钮，并编写以下程序： Private Sub Command1_Click() Dim n%,b,t t=1:b=1:n=2 Do b=b*n:t=t+b:n=n+1 Loop Until n＞9 Print t End Sub 此程序计算并输出一个表达式的值，该表达式是
单选题设有如下数组定义语句： Dim a(-1 To 4，3)As Integer 以下叙述中正确的是
单选题判断单选按钮是否被选中的属性为
单选题假定有如下的Sub过程：Sub S(x As Single，y As Single)t=x：x=t／yy=t Mod YEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Privme Sub Command1 Click()Dim a As Single，Dim b As Singlea=5：b=4：S a，bPrint a，bEnd Sub程序运行后，单击命令按钮，输出结果为( )。