单选题下列叙述中正确的是
单选题在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim m As Integer,n As Integer,p As Integer
m=3:n=5:p=0
Call Y(m,n,p)
Print Str(p)
End Sub
Sub Y(ByVal i As Integer,ByVal j As Integer,k As Integer)
k=i+j
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是______。
单选题对于能够获得焦点的控件,若要使其不能接收焦点,应该
单选题下列Sub 过程中描述错误的是______ 。
单选题阅读程序: Private Sub Form_Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print a End Sub 程序运行后,单击窗体,输出结果是( )。 A) 105 B) 1 C) 120 D) 15
单选题栈和队列______。 A) 共同之处在于二者都是先进先出的特殊的线性表 B) 共同之处在于二者都是先进后出的特殊的线性表 C) 共同之处在于二者都只允许在顶端执行删除操作 D) 没有共同之处
单选题产生100以内(不含100)2位随机整数的Visual Basic表达式是
单选题假定有一个菜单,名为Menultem,为了运行时使该菜单项失效,应使用的语句为( )
单选题在文本框Textl中输入一个键盘键,将会发生4个事件,这4个事件的顺序是( )。
单选题窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
单选题设有如下通用过程:
Public Function Fun(xStr As String)
Dim tStr As String, srtL As Integer
tStr""
strL=Len(xStr)
i=1
Do While i<=strL/2
tStr=tStr & Mid(xStr,i,1)&Mid
(xStr,strL-i+1,1)
i=i+1
Loop
Fun=tStr
End Function
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程:
Private Sub Command1_Click()
Dim S1 As String
S1="abcdef"
Text1.Text=UCase(Fun(S1))
End Sub
程序运行后,单击命令按钮,则Text1中显示的是______。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是( )。
单选题设有下列二叉树:对此二叉树前序遍历的结果为______。
单选题下面的语句用Array函数为数组变量a的各元素赋整数值:
a=Array(1,2,3,4,5,6,7,8,9) 针对a的声明语句应该是{{U}} {{/U}}。
A. Dim a
B. Dim a As Integer
C. Dim a(9) As Integer
D. Dim a() As Integer
单选题以下控件不是标准控件的是______。
单选题需求分析阶段的任务是确定
A.软件开发方法
B.软件开发工具
C.软件开发费用
D.软件系统功能
单选题在使用打印直接输出信息时,下列哪个属性或方法实现了使文件结束打印( )。 A) Print方法 B) Page属性 C) NewPage方法 D) EndDoc方法
单选题设窗体上有一个水平滚动条HScroll1和一个命令按钮Command1,及下面的事件过程:Private Sub Form_Load() HScroll1.Min=0 HScroll1.Max=100End SubPrivate Sub Command1_Click() HScroll1.Value=70End Sub程序运行时单击命令按钮,则滚动条上滚动块位置的图示是( )。
单选题在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下: Sub Command1_Click() Dim student As studtype Dim record_no As Integer record_no=1 With student .ino=12 .strname="smith" .strsex="男" .smark=89 End With ______ Put # 1,record_no,student Close # 1 End Sub 要求在c:/的随机文件student.dat写入一条记录。应在程序中空行处填入以下哪条语句使该功能完整
单选题下列程序段的执行结果为( )。 X=Int(Rnd+3) Select Case x Case 5 Print"A Row" Case 4 Print"B Row" Case 3 Print"C Row" Case Else Print "D Row" End Select
