单选题执行如下两条语句后,窗体上显示的是 ______。
a=8.4326
Print Format(a,"$00,00.00")
单选题窗体上有文本框Text1和一个菜单,菜单标题、名称见表,结构如图。要求程序执行时单击“保存”菜单项,则把其标题显示在Text1文本框中,下面可实现此功能的事件过程是()。
单选题下列能正确产生[1,30]之间的随机整数的表达式是( )。 A) 1+rnd(30) B) 1+30*rnd() C) rnd(1+30) D) int(rnd()*30)+1
单选题不能作为容器使用的对象是______。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x = -5 If Sgn(x) Then y = Sgn(x ^ 2) Else y = Sgn(x) End If Print y End Sub 程序运行后,单击命令按钮,窗体上显示的是
单选题设窗体上有一个名称为Timer1的计时器控件,其Interval属性被设置为500,Enabled属性被设置为True;还有一个名称为Text1的文本框和下面的事件过程:Private Sub Timer1_Timer()Static x As Longx=x+1:Text1=xEnd Sub程序运行一段时间后,文本框中显示的是100,则表示
单选题下面程序计算并输出的是
Private Sub Comand1_Click()
a=10
s=0
Do
s=s+a*a*a
a=a-1
Loop Until a<=0
Print s
End Sub
单选题以下能够触发文本框Change事件的操作是
单选题在程序中要使用Array函数给数组arr赋初值,则以下数组变量定义语句中错误的是______。
单选题窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。命令按钮的单击事件过程如下:PrivateSubCommandl_Click() CD1.ShowOpen OpenCD1.FileNameForInputAs#1 MsgBoxCD1.FileName LineInput#1.s Text1.Text=s Close#1EndSub单击命令按钮,执行以上事件过程,打开选定的文件,读取文件的内容并显示在文本框中,以下叙述中正确的是______。A.程序没有错误,可以正确完成打开文件、读取文件中内容的操作B.执行Open命令时出错,因为没有指定文件的路径C.Open语句是错误的,应把语句中的ForInput改为ForOutputD.LineInput命令格式错
单选题下列程序段的执行结果是( )。 a=75 Ifa>60 Then i=1 Ifa>70 Then i=2 Ifa>80 Then i=3 Ifa<90 Then i=4 Print"i=";i
单选题在窗体上画一个命令按钮,然后编写如下代码: Private Sub Command1_Click( ) a& = InputBox("请输入第一个数") b& = InputBox("请输入第二个数") Print b&+ a& End Sub 程序运行后,单击命令按钮,在两个输入对话框中先后输入12345和54321,程序的输出结果是________。
单选题在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1, 然后编写如下程序: Private Sub func(L As Label,ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Labell.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Labell,A) Label2.Caption=a End Sub 程序运行后,单击命令按钮,在两个标签Label1和Label2中显示的内容分别是:_______。
单选题在窗体上画一个名称为Command1的命令按钮,并编写如下事件过程:PrivateSubCommand1_Click()x=1s=0Fori=1To5x=x/is=s+yNextPrintsEndSub该事件过程的功能是计算______。A.S=1+2+3+4+5B.C.D.
单选题窗体上有名称为Command1的命令按钮和名称为Text1的文本框( )。Private Sub Command1_Click()Text1.Text="程序设计":Text1.SetFocusEnd SubPrivate Sub Text1_GotFocus()Text1.Text="等级考试"End Sub运行以上程序,单击命令按钮后( )。
单选题关系表中的每一横行称为—个 ______。
单选题在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As String
Private Sub Form_Load()
Show
Text1. Text=" "
Text1. SetFocus
End Sub
Private Sub Command1_Click()
Text1. Text=LCase(SaveAll)+SaveAll
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为______。
单选题不能打开属性窗口的操作是
____
。
单选题有下面事件过程: Private Sub Commandl—Click() Dim a(20)As Integer,n(5)As Integer Dim m As Integer,Bum As Integer Randomize For k=l To 20 a(k)=Int(Rnd*5)+1 Print a(k); n(a(k))=n(a(k))+1 Next k Print m=n(1) num=1 For k=2 To 5 If n(k)>m Then m=n(k) num=k End If Next kPrint m,numEnd Sub此事件过程运行时会出现2行输出,如果第一行输出是:4 2 4 1 4 1 4 5 3 2 5 5 1 4 2 3 4 3 4 2则第2行的输出是( )。
单选题下列表达式的值为2123的是( )。
