以下能够触发文本框Change事件的操作是
A:文本框失去焦点 B:文本框获得焦点 C:设置文本框的焦点 D:改变文本框的内容
以下关系表达式中,其值为False的是
A:"ABC">"AbC" B:"the"<>"they" C:"VISUAL"=UCase("Visual") D:"Integer">"Int"
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Option Base 1
Private Sub Command1_Click( )
Dim a
a=Array(1,2,3,4,5)
For i=1 To UBound(
A:
&n
下列不能打开菜单编辑器的操作是
A:按组合键Ctrl+E B:单击工具栏中的“菜单编辑器”按钮 C:执行“工具”菜单中的“菜单编辑器”命令 D:按组合键Shift+Alt+M
设a=10,b=5,c=1,执行语句Print a>b>c后,窗体上显示的是
A:True B:False C:1 D:出错信息
有如下程序:
Private Sub Command1_Click( )
s = 0
Do
s=(s+1) ( (s+2)
N=N+1
Loop Until s>=10
Print N;s
End Sub
运行后的输出结果是
A:0 1 B:30 30 C:4 30 D:2 12
在数据库管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是
A:数据库系统阶段 B:文件系统阶段 C:人工管理阶段 D:数据项管理
设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程:
Private Sub Commandl Click( )
StatiC b As Variant
b=Array(1,3,5,7,9)
...
End Sub
此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是
A:For i=0 To 5-1/2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next B:For i=0 To 5
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next C:For i-0 To 5/2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next D:For i=1 To 5/2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
在窗体中添加一个命令按钮,名称为Command1;添加一个文本框,名称为Text1,然后编写如下程序:
Private Sub Commandl Click( )
Dim a(5), b(5)
For j = 1 To 4
a(j) = 3 ( j
b(j) = a(j) ( 3
Next j
Text1.Text = b(j/2)
End Sub
程序运行后,单击命令按钮,在文本框中显示
A:25 B:18 C:36 D:35
在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Commandl的命令按钮。然后编写如下事件过程:
Private Command1_Click( )
CommonDialogl.FileName=" "
CommonDialogl.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"
CommonDialoql.Filterlndex=2
CommonDialogl.DialoqTitle="VBTest"
CommonDialoql.Action=1
End Sub
对于这个程序,似下叙述中错误的是
A:该对话框被设置为“打开”对话框 B:在该对话框中指定的默认文件名为空 C:该对话框的标题为VBTest D:在该对话框中指定的默认文件类型为文本文件(*.Txt)