单选题在窗体上画三个标签、三个文本框(名称分别为Text1、Text2、Text3)和一个命令按钮(名称为Command1)，外观如下图所示。编写如下程序：PrivateSubForm_Load()Text1.Text=""Text2.Text=""Text3.Text=""EndSubPrivateSubCommand1_Click()x=Val(Text1.Text)y=Val(Text2.Text)Text3.Text=f(x,y)EndSubFunctionf(ByValxAsInteger,ByValyAsInteger)DoWhiley＜＞0tmp=xModyx=yy=tmpLoopf=xEndFunction运行程序，在Text1文本框中输入36,在Text2文本框中输入24，然后单击命令按钮，则在Text3中显示的内容是______。A)4B)6C)8D)12
单选题下窗体上有名称为Command1的命令按钮和名称为Text1的文本框
Private Sub Command1_Click()
Text1.Text="程序设计"
Text1.SetFocus
End Sub
Private Sub Text1_GotFocus()
Text1.Text="等级考试"
End sub
运行以上程序，单击命令按钮后______。
单选题窗体上有一个列表框和一个文本框，编写如下两个事件过程： Private Sub Form_Load() List1.AddItem"北京" List1.AddItem"天津" List1.AddItem"上海" Text1.Text=" " End Sub Private Sub List1_Click() Print Text1.Text+List1.Text End Sub 程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果为( )。
单选题窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是{{U}} {{/U}}。
Private Sub Commandl_Click()
Picturel.Picture=LoadPicture("c：/picture.jpg")
Picmrel.Cls Picturel.Print "picture"
End Sub
A. 窗体无显示，图片框显示图片和文字picture
B. 窗体上出现picture文本，图片框无显示
C. 窗体上出现picture文本，图片框显示图片picture.jpg
D. 窗体无显示，图片框只显示picture文字
单选题在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。 For i= 1 To4 For j = 1 To 3 x=3 Fork= 1 To 2 x=x+3 Next k Next j Next i Text1.Text=Str(x)
单选题下列描述中，不符合良好程序设计风格要求的是
单选题窗体上有一个名称为CDl的通用对话框，一个名称为。rextl的文本框，窗体的单击事件过程如下： Private Sub Form—Click() CDI．DialogTitle=“改变颜色” CDl．Color=Forml．BackColor CDI．Action=3 Text1．BackColor=CDl．Color End Sub 运行程序时，单击窗体，则以下叙述中错误的是( )。
单选题在窗体上画1个名称为Command1的命令按钮，并编写如下事件过程：
Private Sub Command1_Click()
x=1:s=0
For i=1 To 5
x=x/i:s=s+x
Next
Print s
End Sub
该事件过程的功能是计算
单选题以下语句的输出结果是______。 Print Format(12345.6，"000,000.00")
单选题在Visual Basic中，表达式3*2＼5 Mod 3的值是
单选题下列是一个循环结构的程序，循环体内的语句将执行的次数是 k=0 For
i=1 to 100 For j=1 to 10
k=k+1 Next Next
A. 0
B. 10
C. 100
D. 1000
单选题关于随机文件，下列说法错误的是( )。
单选题下列关于利用通用对话框产生的文件对话框的相关属性的描述中，错误的是
单选题下列程序的功能是调用字体对话框来设置文本框字体，单击按钮弹出对话框后，按Cancel 键退出对话框，则（ ）。
Private Sub Command1_Click( )
CommonDialogl．CancelError=True
CommonDialogl．Flags=cdlCFEffects Or cdlDFBotb
CommonDialogl．Action=4
CommonDialogl．ShowFont
Text1.Font.Name=CommonDialogl．FontName
Text1．Font．Size=CommonDialogl．FontSize
Text1．Font．Bold=CommonDialog1．FontBold
Text1．Font．Italic=CommonDialog1．FontItalic
Text1．Font．Underline=CommonDialog1．FontUnderline
Text1．FontStrikethru=CommonDialog1．FontStrikethru
Text1．ForeColor=CommonDialog1．Color
End Sub
单选题在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dim i As Integer Dim num As Integer Dim n As Integer n=0 Randomize For i=1 To 10 num=Int(Rnd*10)+1 Select Case hum Mod 2 Case 1 Exit For Case 0 Print num n=n+1 End Select Next i Print”n=”：n End Sub 下面有关描述中正确的是( )。
单选题下列描述中正确的是
单选题窗体上有一个名称为Combol的组合框，一个名称为、Command1的命令按钮。要求编写程序：在组合框中输入一个字符串，当单击命令按钮时，将该字符串逐项与组合框中原有列表项进行比较，若有相同列表项，则将其删除；若没有相同列表项，则将其添加到组合框中。现有人编写如下程序，以期实现上述功能： Combol．RemoveItem i：Combol．Text=""：flag=1 End If Ifflag=1 Then 程序中存在问题，以下关于程序问题的叙述中，正确的是
单选题设窗体上有一个Picturel图片框，要求在图片框中的指定位置(坐标为(500，300))输出“OK”，下面可以实现这一功能的事件过程是
单选题若看到程序中有以下事件过程，则可以肯定的是，当程序运行时Private Sub Click_MouseDown(Button As Integer,_Shift As Integer,X As Single，Y As Single) Print"VB Program"End Sub
单选题设有如下语句：
Dim a,b As Integer
c="Visual Basic"
d=#7/20/2005#
以下关于这段代码的叙述中，错误的是______。