单选题下列关于线性表的叙述中,不正确的是( )。
单选题单击命令按钮时,下列程序代码的执行结果为( )。 Private Function FirProc(x As Integer,y As Integer,z As Integer) FirProc=2*x+y+3*z End Funcfion Private Function SecProc(x As Integer,y As Integer,z As Integer) SecProc=FirProc(z,x,y)+x End Funcfion Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer a=2 b=3 c=4 Printf SecProc(c,b,a) End Sub
单选题能够将组合框Combo1中最后一个数据项删除的语句为
单选题在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Commandl),然后编写如下事件过程:
Private Sub Commandl_Click() x=0 Do
While x<50 x=(x+2)*(x+3) n=n+1
Loop Text1.Text=Str(n)
Text2.Text=Str(x) End Sub
程序运行后,单击命令按钮,在两个文本框中显示的值分别为______。
A.1和0
B.2和72
C.3和50
D.4和168
单选题在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 To 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是
单选题如果要在程序代码中为图片框动态加载和清除图像,可以利用( )函数。
单选题单击命令按钮时,下列程序的运行结果为( )。 Private Sub Command1_Click() Print Fun(23, 18) End Sub Public Function Fun(m As Integer,n As Integer) As Integer Do While m <>n Do While m>n:m=m-n:Loop Do While m < n:n=n-m:Loop Loop Fun=m End Function A) 0 B) 1 C) 3 D) 5
单选题窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Commandl的命令按钮。 运行后的窗体外观如下图所示。 设有如下的类型声明: Type Person name As String*8 major As String*20 End Type 当单击“保存”按钮时,将两个文本框中的内容写入一个随机文件Test290.dat中。设文本框中的数据已正确地赋值给Person类型的变量P。则能够正确地把数据写入文件的程序段是( )。
单选题设有如下程序段: x=2 For i=1 to 10 Step 2 x=x+i Next 运行以上程序后,x的值是______。
单选题结构化程序设计的3种基本控制结构是
A. 过程、子程序和分程序
B. 顺序、选择和重复
C. 递归、堆栈和队列
D. 调用、返回和转移
单选题执行下列程序段后,输出的结果是 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3,k2,k1 Print y
单选题在面向对象方法中,具有相似属性与操作的一组对象称为______。
A. 类
B. 实例
C. 消息
D. 数据
单选题窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是
单选题在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:Private Sub Command1_Click() a=InputBox("Enter an integer") b=Text1.Text Text1.Text=b+a End Sub程序运行后,在文本框中输入456,然后单击命令按钮,在输入对话框中输入123,则文本框中显示的内容是( )。
单选题没有如下程序:
Private Sub Form_Click()
Dim s As Long,f As Long
Dim n As Integer, i As Integer
f=1
n=4
For i=1 To n
f=f*i
s=s+f
Next i
Print s
End Sub
程序运行后,单击窗体,输出结果是______。
单选题若有以下程序,当程序运行后,单击命令按钮,则输出的结果为( )。 Private Sub Command1_Click() Dim a%(1 To 4), b%(3 To 6), i%, s1#, s2# For i= 1 To 4 a(i) = i Next i For i=3 To 6 b(i) = i Next i s1 = Factorial (
单选题在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
Private Sub Command1_Click( )
Dim I As Integer
If Text1.Text <> "Gong" Then
I = MsgBox("密码错误", 5 + vbExclamation, "输入密码")
If I <> 4 Then
End
Else
Text1.Text = ""
Text1.SetFocus
End If
Else
MsgBox "密码帐号正确!"
End If
End Sub
若在text1中输入字符串"Gong",则程序运行结果为( )
单选题为了删除列表框中的一个列表项,应使用的列表框方法是
单选题下面( )属性肯定不是框架控件的属性。 A.Text B.Caption C.Left D.Enabled
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:
Private Sub Commandl_Click( )
Dim x,y,z As Integer
x=5
y=7
z=0
Text1.Text=""
Call Fun1(x,y,z)
Text1.Text=Str(z)
End Sub
Sub Fun1(ByVal a As Integer,ByVal b As Integer,c As Integer)
c=a+b
End Sub
程序运行后,如果单击命令按钮,则在文本框中显示的内容是
