单选题在窗体上画两个单选按钮,名称分别为Option1和Option2,标题分别为“宋体”和“黑体”;一个复选框,名称为Check1,标题为“粗体”;一个文本框,名称为Text1,Text属性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被选中,则能够实现上述要求的语句序列是______。
单选题在窗体上面一个名称为List1的列表框,列表框中显示若干城市的名称。当单击列表框中的某个城市名时,该城市名消失。下列在List1_Click事件过程中能正确实现上述功能的语句是______。
单选题阅读下面程序段:
a=0
For i=1 To 3
For j=1 To i
For k=j To 3
a=a+1
next k
next j
next i
执行上述程序段后,a的值为______。
单选题存储在计算机内有结构的数据集合是
单选题在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则横线处合适的语句是( )。 Private Sub Form_Click() Open"C:/SDat.txt"For Output As I For i=1 To 5 StuNo=InputBox("请输入学号") StuName=InputBox("请输入姓名") StuEndg=Val(InputBox("请输入英语成绩")) Next i Close #1 End Sub A)Input#1,StuNo,StuName,StuEndg B)Put#1,StuNo,StuName,StuEndg C)Write#1,StuNo,StuName,StuEndg D)Get#1,StuNo,SmName,StuEndg
单选题假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
Model1代码如下:
Public x As Integer
Public y As Integer
Sub S1()
x=1
S2
End Sub
Sub S2()
y=10
Form1.Show
End Sub
Model2的代码如下:
Sub Main()
S1
End Sub
其中Sub Main被设置为启动过程。程序运行后,各模块的执行顺序是______。
单选题下列程序段的执行结果为( )。 Dim A(3,3) For M=1 To 3 For N=1 To 3 If N=M Or N=3-M+1 Then A(M,N)=1 Else A(M,N)=0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M,N) Next N Print Next M
单选题下列程序段的执行结果是______。 i=4 j:5 Do i=i+1 j=j+2 Loop Until i >= 7 Print “j=”; j
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程。 Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>O Then m=m+n/3 Next Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是( )。 A) 15 B) 18 C) 21 D) 24
单选题在窗体上画一个命令令按钮和一个标签,其名称分别为Commabd1和Label1,然后编写如下代码:
Sub S(x As Integer, y As Integer)
Static z As Integer
y=x*x+z
z=y
End Sub
Private Sub Command1_Click()
Dirn i As Integer, z As Integer
m=0
z=0
For i=1 To 3
S i,z
m=m+z
Next i
Label1.Caption=Str(m)
End Sub
程序运行后,单击命令按钮,在标签中显示的内容是______。
单选题下面关于Visual Basic语言的几种说法中,正确的是 ______。
单选题以下数组定义语句中,错误的是______。 A) Dim arr(-5) As Integer B) Static arr(5) C) Dim arr(2,1 To 3) D) Dim arr(0 To 2,1 To 3)As Integer
单选题以下关于多重窗体程序的叙述中,错误的是
单选题假定有以下通用过程: Function Fun(n As Integer)As
Integer x=n*n Fun=x-11
End Function
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub
Command1_Click() Dim i As Integer
For i=1 To 2 y=Fun(i)
Print y; Next i End
Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。
A.1 3
B.10 8
C.-10 -7
D.0 5
单选题以下程序运行后的窗体如图所示。其中组合框的名称是Combo1,已有列表框如图所示;命令按钮的名称是Command1。PrivateSubCommand1_Click()IfNotCheck(Combo1.Text)ThenMsgBox("输入错误")ExitSubEndIfFork=0ToCombo1.ListCount-1IfCombo1.Text=Combo1.List(k)ThenMsgBox("添加项目失败")ExitSubEndIfNextkCombo1.AddItemCombo1.TextMsgBox("添加项目成功")EndSubPrivateFunctionCheck(chAsString)AsBooleann=Len(ch)Fork=1Tonc$=UCase(Mid(ch,k,1))Ifc<"A"Orc>"Z"ThenCheck=FalseExitFunctionEndIfNextkCheck=TrueEndFunction程序运行时。如果在组合框的编辑区中输入“Java”,则单击命令按钮后产生的结果是()。A显示“输入错误”B显示“添加项目失败”C显示“添加项目成功”D没有任何显示
单选题Visual Basic集成开发环境可以 A) 编辑、调试、运行程序,但不能生成执行程序 B) 编辑、生成可执行程序、运行程序,但不能调试程序 C) 编辑、调试、生成可执行程序,但不能运行程序 D) 编辑、调试、运行程序,也能生成执行程序
单选题开发软件所需要的高成本和产品的低质量之间有着尖锐的矛盾,这种现象称作______。
单选题为了暂时关闭计时器,应把它的一个属性设置为False,这个属性是( )。
单选题在窗体上画一个命令按钮,并编写如下事件过程: Private Sub Command1_Click() Dim a(3, 3) For m=1 To 3 For n=1 To 3 If n=m Or n=4-m Then a(m,n)=m+n Else a(m,n)=0 End If Print a(m,n); Next n Print Next m End Sub 运行程序,单击命令按钮,窗体上显示的内容为
单选题阅读程序: Option Base l Sub P(b()As Integer) For i=l To 4 b(i)=2*i Next iEnd SubPrivate Sub Form-Click() Dim a(4)As Integer For i=1 To 4 a(i)=i+4 Next i P a For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序,单击窗体,输出结果为( )。
