单选题窗体上有一个名称为Text1的文本框，一个名称为CD1的通用对话框，一个标题为“打开文件”的命令按钮，如图所示。命令按钮的单击事件过程如下：PrivateSubCommand1_Click()CD1.showOpenOpenCD1.FileNameForInputAs#1MsgBoxCD1.FileNameLineInput#1,sText1.Text=sClose#1EndSub单击命令按钮，执行以上事件过程，打开选定的文件，读取文件的内容并显示在文本框中，以下叙述中正确的是______。
单选题现有如下程序： Private Sub Commandl_Click()
S=0 For i=1 To 5 s=s+f(5+i)
Next Print s End Sub Public
Function f(x As Integer) If x＞=10 Then
t=x+1 Else t=x+2 End
If f=t End Function
运行程序，则窗体上显示的是______。
A.38
B.49
C.61
D.70
单选题对手某些控件，只要将其Style属性设置为1，则可以在该控件上使用Picture属性显示图片。以下不具备这一使用规则的控件是
单选题以下______是Visual Basic合法的数组元素。
单选题在Visual Basic中，组合框是文本框和下列哪一项的特性的组合
单选题下列叙述中正确的是
单选题设工程中有2个窗体：Form1和Form2，每个窗体上都有一个名称为Text1的文本框。若希望把Form1上文本框中的内容复制到Form2上的文本框中，应进行的操作是
单选题以下能对正实数d的第3位小数四舍五入的表达式是
单选题设a=2，b=3，c=4，d=5，下列表达式的值是______。
a＞b And c＜=d Or 2*a＞c
单选题单击窗体时，下列程序的执行结果是( )。
Private Sub Invert(By Val xstr As String，ystr As String)
Dim tempstr AS String
Dim I AS Integer
I=Len(xstr)
Do While I＞=1
tempstr=tempstr + Mid(xstr，I，1)
I=I - 1
Loop
yStr=tempStr
End Sub
Private Sub Form_Click( )
Dim s1 As String，s2 As String
S1="abcdef"
Invert S1，S2
Print S2
End Sub
单选题设窗体文件中有下面的事件过程： Private Sub Command1_Click() Dim s a％=100 Print a End Sub 其中变量a和s的数据类型分别是( )。
单选题某人编写了如下程序，用来求10个整数(整数从键盘输入)中的最大值：Private Sub Commandl_Click() Dim a(10)As Integer,max As Integer For k=1 To 10 a(k)=InputBox("输入一个整数") Nextk max=0 For k=1 To 10 Ifa(k)＞max Then max=a(k) End If Next k Print maxEnd Sub运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的，程序需要修改。下面的修改中可以得到正确运行结果的是
单选题以下关于数组的叙述中，错误的是
单选题窗体上有2个名称分别为Text1和Text2的文本框。编写如下程序： Private Sub Form_Load() Private Sub Command 1_Click() Text1．Text="" Print Text1．Text+Text2．Text Text2．Text="" End Sub End Sub 程序运行后，在Text1和Text2中依次输入100和200，单击Command 1，则输出结果为
单选题设R是一个2元关系，有3个元组，S是一个3元关系，有3个元组。如T=R×S，则T的元组的个数为( )。
单选题要使标签中的文本靠右显示，应将其Aligraent属性设置为
单选题在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Private Sub Command1_Click() Dim a(5,5) For i=1 To 3 For j=1 To 4 a(i,j)=i*j Next Next For n=1 To 2 For m=1 To 3 Print a(m,n)； Next Next End Sub 程序运行后，单击命令按钮，输出结果是
单选题在窗体上绘制一个名称为Commandl的命令按钮，然后编写如下程序： Option Base 1 Private Sub Commandl_Click() Dim c As Integer,d As Integer d=0 c=6 x=Array(2，4，6，8，10，12) Fori=1 To 6 1fx(i)＞c Then d=d+x(i) c=x(i) Else d=d-c End If Nexti Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为( )。
单选题有如下数据定义语句：
Dim X,Y As Integer
以上语句表明______。
单选题在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程：
Private Sub TxtA_KeyPress(KeyAscii As Integer)
…
End Sub
假定焦点已经位于文本框中，则能够触发KeyPress事件的操作是______。