单选题下面程序段的执行结果为______。 I=4 A=5 Do I=I+1 A=A+2 Loop Until I>=7 Print"I=":I Print"A=":A
单选题当一个复选框被选中时,它的Value属性的值是{{U}} {{/U}}。
A.3
B.2
C.1
D.0
单选题要强制显式声明变量,可在窗体模块或标准模块的声明段中加入语句______。
单选题在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Labell,然后编写如下事件过程: Private Sub Command1_Click() Counter=0 For i=1 To 4 For j=8 To 1 Step-2 Counter=Counter+1 Next i Next i Labell.Caption=Str(Counter) End Sub 程序运行后,单击命令按钮,标签中显示的内容是
单选题下列叙述中,正确的是( )。
单选题在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:Private Sub Command1_Click() Dim arr(10) For i=6 To 10 arr(i)=i-5 Next i Label1.Caption=arr(0)+arr(arr(10)/ arr(6))End Sub运行程序,单击命令按钮,则在标签中显示的是( )。
单选题当窗体大小改变时,要使其中的控件也按比例发生变化,应使用窗体的( )。
单选题在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a(10) As Integer Dim x As Integer For i=1 To 10 a(i)=8+i Next x=2 Print a(f(x)+x) End Sub Function r(x As Integer) x=x+3:f=x End Function 程序运行后,单击命令按钮,输出结果为
单选题下列关于软件工程的描述中正确的是
单选题假定已经在菜单编辑器中建立了窗体的弹出式菜单,其顶级菜单的名称为a1,其“可见”属性为False。程序运行后,单击鼠标左键或右键都能弹出菜单的事件过程是______。
单选题如图所示,两个关系R1和R2:则由关系R1和R2得到关系R3的操作是______。A)笛卡尔积B)联接C)交D)除
单选题从窗体form1生成到该窗体显示出来,最后发生的事件是______。
单选题把窗体设置为不可见的,应该将( )属性设置为False。
单选题数据的存储结构是指
单选题在窗体上画一个名称为Commandl的命令按钮和两个名称分别为Textl、Text2的文本框,然后编写如下事件过程: PrivateSubCommandl_Click() n=Textl.Text Select Case n Case 1 To 20 x=10 Case2,4,6 x=20 Case Is<10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是______。
单选题下列程序段的执行结果为______ 。 Dim A(10,10) For I = 2 To 4 For J = 4 To 5 A(I, J) = I * J Next J Next I Print A(2, 5) + A(3, 4) + A(4, 5)
单选题下列四个关于DoEvents语句的叙述中,正确的是______。
单选题设在窗体上有一个文本框,然后编写如下的事件过程: PriVate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)>0 f2down%=(KevCode=Kev_F2) If altdown% And f2down% Then Text1.Text="abl" End If End Sub 程序运行后,清除文本框中原有内容,如果按<Shift+F2>组合键,则在文本框中显示的是( )。
单选题在窗体中添加一个通用对话框,其名称为CommonDialog1,然后添加一个命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为“打开”,在文件类型框中显示的是Text Files(*.txt)。则能够满足上述要求的程序是
单选题下列程序执行后,在Ctrl和Alt这两个键都被按下的同时,再在文本框中输入"a",输出结果为________。 Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If Shift > 0 And KeyCode >= Asc("A")Then Print KeyCode + Shift End If End Sub
