单选题某人为计算n!(0
单选题设在窗体上有1个名称为Combo1的组合框，含有5个项目，要删除最后一项，正确的语句是______。
单选题在Visual Basic中最基本的对象是______，它是应用程序的基石，也是其他控件的容器。 A) 文本框 B) 命令按钮 C) 窗体 D) 标签
单选题通用对话框MsgBox作为函数的返回值一般为______。
单选题( )属性用于设置组合框的风格。
单选题如果准备读文件，打开顺序文件"text.dat"的正确语句是
单选题某人编写了一个能够返回数组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 程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是 ( )。
单选题下列工具中不是需求解析常用工具的是______。
单选题有如下的程序：Private Sub Command1_Click( ) Dim k As Integer，m As Integer Dim P As Integer k=4：m=1 P=Pid(k，m) ：Print P； P=Pid(k，m) ：Print PEnd SubPrivate Function Pid(a As Integer，b As Integer) Static m As Integer，i As Integer m=5：i=2 i=i + m + 1 m=i + a + b Pid=m/2End Function单击命令按钮后，输出结果为
单选题下列关于菜单项的描述中，错误的是
单选题使用Public Const语句声明一个全局的符号常量时，该语句应放在 ______。
单选题设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下： Public x As Integer Private Sub Command1_Click() Form2.Show End Sub Private Sub Form_Load() x=1 y=5 End Sub Form2的代码如下： Private Sub Command1_Click() Print Form1.x,y End Sub Module1的代码如下： Public y As Integer 运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是
单选题假定一个工程由一个窗体文件Forml和两个标准模块文件Model1及Model2组成。 Model1代码如下： Public x As Integer Public y As Integer Sub S1() x=1 S2 End Sub Sub S20 y=10 Form1.Show End Sub Model2的代码如下： Sub Main() S1 End Sub 其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是( )。
单选题下列程序代码段中，在单击命令按钮调用SelMid函数时，其运行结果为( )。Private Function SelMid(aStr As String)As StringDim temp As String，sLen As Integertemp=""：sLen=Len(aStr)i=1Do While i＜=sLen／2temp=temp+Mid(aStr，i，1)+Mid(aStr，sLen-i+1，1)i=i+1LoopSelMid=tempEnd FunctionPfivate Sub Command1_Click()Dim StrAs StringStr="abcdef"：Print SelMid(Str)End Sub
单选题下面的语句用Array函数为数组变量a的各元素赋整数值： a=Array(1，2，3，4，5，6，7，8，9) 针对a的声明语句应该是( )。 A) Dim a B) Dim a As Integer C) Dim a(9) As Integer D) Dim a() As Integer
单选题运行下面的程序，单击命令按钮，输出结果为( )。 FunctionF(aAs Integer) b＝0：Static c b＝b＋1：c＝c＋1：F＝a＋b＋c End Function Private sub Command1_Click() Dim a As Integer a＝2 For i＝1 To 3 PrintF(a) Next i End Sub
单选题窗体上有一个名称为Label1的标签控件，其Caption属性的初始值为0，还有一个计时器。为了在程序运行时，标签上的数字每秒加1，应该把语句：Label1.Caption = Label1.Caption + 1 写在一个事件过程中，这个事件过程是
单选题在窗体上添加一个文本框，其名称为text1，然后编写如下的Load事件过程，则该程序的运行结果是______。
Private Sub form_ load
Text1. Text = " "
t = 1
for k = 10 To 6 Step -2
t= t* k
Next k
Text1. Text = t
End Sub
单选题窗体上有一个名为Command1的命令按钮，并有如下程序：
Private Command1_Click()
Dim m As Integer , n As Integer
m=InputBox(“输入第一个数”)
n=InputBox(“输入第二个数”)
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
该程序的功能是
单选题以下程序运行后，输出结果是( )。 For i=1 To 3 Print Tab(3*j);2*(j-1) Next j Print A) 1 3 25 B) 19 25 C) 0 2 4 D) 1 3 5