单选题若D1={a1,a2,a3},D2={b1,b2,b3},则集合D1×D2中共有元组( )个。
单选题在窗体上画1个命令按钮,并编写如下事件过程:
Private Sub Command1_Click()
Dim a(3, 3)
For m=1 To 3
For n=1 To 3
Ifn=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
运行程序,单击命令按钮,窗体上显示的内容为
单选题能够产生1到50之间(含1和50)随机整数的表达式是
单选题以下事件过程可以将打开的对话框的标题改为“宇宙大爆炸”的是A) Private Sub Command2_Click( ) CommonDialog1.DialogTitle=“宇宙大爆炸” CommonDialog1.ShowOpen End Sub B) Private Sub Command2_Click( ) CommonDialog1.DialoTitle=“宇宙大爆炸” CommonDialog1.ShowFont End Sub C) Private Sub Command2_Click( ) CommonDialog1.DilogTitle=“宇宙大爆炸” CommonDialog1.Show End Sub D)Private Sub Command2_Click( ) CommonDialog1.DialogTitle=“宇宙大爆炸” CommonDialog1.ShowColor End Sub
单选题下面程序段执行结果为 x=Int(Rnd()+4) Select Case x Case 5 Print"excellent" Case 4 Print"good" Case 3 Print "pass" Case Else Print "fail" End Select
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim i As Integer, j As Integer Dim a(10,10) As Integer For i=1 To 3 For j=1 To 3 a(i,j)=(i-1)*3+j Print a(i,j); Next j Print Next i End Sub 程序运行后,单击命令按钮,窗体上显示的是
单选题在计时器控件中,Interval属性的作用是( )。
单选题在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是______。
单选题已知AS="Welcome",下列语句操作能够正确执行的是( )。
单选题若变量a未事先定义而直接使用(例如:a=0),则变量a的类型是( )。
单选题假定有如下的程序段:Dim intVar As Integer intvar=True Print intVar则输出结果是
单选题在窗体上画一个文本框Text1、一个标签Label1和一个命令按钮Command1,然后编写如下两个事件过程: Private Sub Command1_Click() a=InputBox("请输入一个字符串") Text1.Text=a End Sub Private Sub Textl_Change() Label1.Caption=UCase(Mid(Text1.Text,8)) End Sub 程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“Visual Basic”,则在标签中显示的内容是
单选题下列程序段不正确的是( )。
单选题为了使标签Label1透明且不具有边框,以下正确的属性设置是
单选题确定窗体控件启动位置的属性是( )。
单选题窗体上有名称为Command 1的命令按钮,名称分别为List 1、List2的列表框,其中List 1的MultiSelect属性设置为1(Simple),并有如下事件过程: Private Sub Command 1_Click() For i=0 To List 1.ListCount-1 If List 1.Selected(i)=True Then List2.Addltem Text End If Next End Sub 上述事件过程的功能是将List 1中被选中的列表项添加到List2中。运行程序时,发现不能达到预期目的,应做修改,下列修改中正确的是
单选题设有关键码序列(Q,G,M,Z,A,N,B,P,X,H,Y,S,T,L,K,E),采用堆排序法进行排序,经过初始建堆后关键码值B在序列中的序号是( )。
单选题下列关于控件数组的叙述中,正确的是
单选题有如下程序:
Private Sub Form_Click( )
Dim n As Integer, a As String
Dim L As Integer, C As Integer
n = InputBox("请输入一个整数")
For i = 1 To n
a = InputBox("请输入一个字符串")
L = Len(A)
C = 0
For j = 1 To L
If Mid(a, j, 1) = "D" Then
C = C+1
End If
Next j
Print a; C
Next i
End Sub
以上程序的功能是______。
单选题设有语句 Open"c:/Test.Dat"For Ouput As #1” 则以下叙述错误的是( )。