单选题在窗体上画一个命令按钮和一个文本框，其名称分别为Commandl和Text1，把文本框的 Text属性设置为空白，然后编写如下事件过程： Private Sub Commandl_click() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示内容是( )。
单选题有如下的程序段，该程序段的执行完后，共执行循环的次数是 Private Sub Command1_Click() total=0 Counter=l Do Print Counter total=total+Counter Print total Counter=Counter+1 If total＞=10 Then Exit Do End If Loop While Counter＜=10 End Sub
单选题VisualBasic6．0集成环境的主窗口中不包括( )。
单选题在窗体上面1个命令按钮和1个文本框，其名称为Command1和Text1，再编写如下程序：
Dim ss As String
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii)＜＞""Then ss=ss+Chr(KeyAscii)
End Sub
Private Sub Command1_Click()
Dim m As String,i As Integer
For i=Len(ss)To 1 Step-1
m=m+Mid(ss,i,1)
Next
Text1.Text=UCase(m)
End Sub
程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的就是______。
单选题执行下面的程序段后，x的值为______。 x=5 For i=3 To 8 Step 2 x=x+1 Next i
单选题下列选项中，不是字符串常量的是________。
A."Visual Basic"
B."等级考试"
C.""
D.//Basic//
单选题在关系数据库中，用来表示实体间联系的是
单选题窗体上有Command1、Command2两个命令按钮。现编写以下程序：
Option Base 0
Dim a()As Integer, m As Integer
Private Sub Command1_Click()
m=InputBox("请输入一个正整数")
ReDim a(in)
End Sub
Private Sub Command2_Click()
in=InputBox("请输入一个正整数")
ReDim a(in)
End Sub
运行程序时，单击Command1后输入整数10，再单击Command2后输入整数5，则数组a中元素的个数是______。
单选题Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即：1，1，2，3，5，8，13，21，34，55，89，…。某人编写了下面的函数，判断大于1的整数X是否是Fibonacci数列中的某个数，若是，则返回True，否则返回False。 Function Isfab(x As Integer)As Boolean Dim a As Integer，b As Integer，c As Integer， flag As Boolean flag=False a=1：b=1 Do While x
单选题假定有如下事件过程： Private Sub Form_Click0 Dim X As Integer，n As Integer x=1：n=0 Do While x<28 x=x*3：n=n+1 loop Print x，n End Sub 程序运行后，单击窗体，输出结果是
单选题在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click( ) Dim i As Integer，x As Integer For i=l To 6 If i=1 Then x=i lf i＜=4 Then x=x+1 Else x=x+2 End lf Next i Print x End Sub 程序运行后，单击命令按钮，其输出结果为
单选题在窗体上画两个单选按钮，名称分别为Option1，Option2，标题分别为“宋体”和“黑体”；一个复选框，名称为Check1，标题为“粗体”；一个文本框，名称为Text1，Text属性为“改变文字字体”。要求程序运行时，“宋体”单选按钮和“粗体”复选框被选中，则能够实现上述要求的语句序列是______。
单选题在窗体上画一个命令按钮，然后编写如下程序： Sub inc(a As Integer) Private Sub Commandl_Click() Static x As Integer inc 2：inc 3：inc 4 x=x+a Print x： End Sub End Sub 程序运行后，第一次单击命令按钮时的输出结果为
单选题可设置文字字体为斜体的属性是( )。
单选题在顺序表(8，11，15，19，25，26，30，33，42，48，50)中，用二分法查找关键码值20，需做的关键码比较次数是( )。
单选题在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labe11，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labe11.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是______。
单选题在窗体上画1个名为Text1的文本框和1个名为Label1的标签，再画4个名为Op1的单选按钮控件数组，其Index属性按季度顺序为0～3，如图1所示。在文件Sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击一个单选按钮，则Text1中显示相应季度的销售总额，并把相应的文字显示在标签上。如图2所示是单击“第二季度”单选按钮所产生的结果。请选择可在空白处填写的合适语句()。OptionBase1Dimsales(12)AsLongPrivateSubForm_Load()open"c:/sales.txt"ForInputAs#1Fork=1To12Input#1,sales(k)NextkClose#1EndSubPrivateSub______(IndexAsInteger)DimsumAsLong,kAsIntegex,monthAsIntegersum=0month=Index*______Fork=1To3month=month+1sum=sum+sales(month)NextkLabel1.Caption=______.Caption&"销售总额:"Text1=sumEndSub
单选题表达式Val(".123E2")的值是( )。 A) 123 B) 12.3 C) 0 D) 123e2CD
单选题为了把文本框Text1中输入的小写字母的大写形式同步显示在文本框Text2中，应该使用的事件过程是______。
单选题双击窗体中的对象后，Visual Basic将显示的窗口是( )。 A) 项目(工程)窗 B) 工具箱 C) 代码窗口 D) 属性窗口