单选题下列对对象的概念描述不正确的是______。
单选题用树型结构表示实体之间联系的模型是( )。
单选题假定窗体上有一个标签,名为Label。为了使该标签透明并且没有边框,则正确的属性设置为______。
单选题设a=5,b=6,c=7,d=8,则执行下列语句后,x的值为:_______。 x=IIF((a>B) And(c<D) ,10,20)
单选题设菜单中有一个菜单项为“Open”。若要为该菜单命令设置访问键,即按下Alt及字母O 时,能够执行“Open”命令,则在菜单编辑器中设置“Open”命令的方式是( )。
单选题设有如下程序: Option Base1 Dim a(3,4)As Integer,b(4,3)As Integer Private Sub Command1_Click() '循环1 For i=1 To 3 Forj=l To 4 b(j,i)=a(i,j) Next j Next i '循环2 x=b(1,1) For i=1 To 4 Forj=1 To 3 Print b(i,j); IfX
单选题在窗体上画一个列表框、一个文本框及一个按钮,然后编写如下两个事件过程: Private Sub Form_Load() For i=1 To 10 List1.AddItem i * 10 Next i Text1.Text=" " End Sub Private Sub List1_Click() Print List1.Text + Text1.Text End Sub 程序运行后,在文本框中输入“123”,然后双击列表框中的第四行,则在窗体上输出的结果为
单选题工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:Public x As Integer Private y As Integer窗体文件的程序代码是: Dim a As Integer Private Sub Command 1 Click() Private Sub Form_Load1a=a+5:b=b+5:x=x+5:y=y+5 Dim b As Integer Print a;b;x;y a=2:b=3:x=10:y=20 End Sub End Sub 运行程序,单击窗体上的命令按钮,则在窗体上显示的是
单选题设有如下程序: Option Base 1 Dim a(3,4)As Integer,b(4,3)As Integer Private Sub Command1_Click() 循环1 For i=1 To 3 For j=1 To 4 b(j,i)=a(i,j) Next j Next i 循环2 X=b(1,1) For i=1 To 4 For j=1 To 3 Print b(i,j); If x
单选题在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Pfivme Sub Command1_Click( ) score=Iht(Rnd*10)+70 Select Case score Case ls<60 a$=“F” Case 60 T069 a$=“D” Case 70 To 79 a$=“C” Case 80 To 89 a$=“B” Case Else a$=“A” End Select Print aS End Sub 程序运行后,单击命令按钮,输出结果是
单选题下面关于菜单的叙述中正确的是
单选题下列描述中,错误的是
单选题单击命令按钮时,下列程序的执行结果为 Private Sub Command1_Click( ) Dim x As Integer, y As Integer x=12:y=32 Call PCS(x, y) Print x; y End Sub Public Sub PCS( ByVal n As Integer, ByVal m As Integer) n = n Mod 10 m=m Mod 10 End Sub
单选题设窗体上有一个图片框Picture1,要在程序运行期间装入当前文件夹下的图形文件File1.jpg,能实现此功能的语句是
单选题下列关于数据结构的基本概念的叙述中,错误的是 ______。
单选题在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Text1),然后编写如下事件过程:
Private Sub Commandl_Click() x=Val(Text1.Text)
SelectCaseX Case 1,3
y=X*X
CaseIS>=10,IS<=-10 y=X
Case-10 To 10 y=-X
End Select End Sub
程序运行后,在文本框中输入3,然后单击命令按钮,则以下叙述中正确的是{{U}} {{/U}}。
A.执行y=x*x
B.执行y=-x
C.先执行y=x*x,再执行y=-x
D.程序出错
单选题下列选项中不属于面向对象程序设计特征的是
单选题编写如下程序:Private Sub Form_Click() Dim a a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10) n = InputBox("请输入一个小于10的正整数") i = UBound(a) For k = n To (i - n) / 2 + n x = a(k) a(k) = a(i) a(i) = x i = i - 1 Next k For k = 0 To UBound(a) Print a(k); Next kEnd Sub程序运行后,单击窗体,并输入4,则输出结果是
单选题以下( )程序段可以实施X、Y变量值的交换。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer Dim sum As Integer Dim sum1 As Integer Dim a(1 To 20),x For i = 1 To 10 a(i)=i Next i For Each x In a If x Mod 2 = 0 Then sum1=sum1+x Else sum = sum+x End If Next x Print sum;sum1 End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是