单选题数据库系统的核心是( )。
单选题在利用菜单编辑器设计菜单时，为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键，可以将该菜单项的标题设置为______。
A.退出(X&)
B.退出(&X)
C.退出(X#)
D.退出(#X)
单选题在窗体上有一个名称为List1的列表框和一个名称为Command1的命令按钮，并编写有如下事件过程： Private Sub Form_Load() List1．Addltem"Item1"：List1．Addltem "Item2"：List1．Addltem”Item3” End Sub Private Sub Command1_Click() List1．List(List1．ListCount)="New Item" End Sub 程序执行时，单击命令按钮，其结果为( )。
单选题在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程： Private Sub Command1_Click() Move 500，500 End Sub 程序执行时，单击命令按钮，实现的功能是( )。
单选题下列关于栈的叙述中，正确的是
单选题在窗体上面1个名称为Command1的命令按钮，然后编写下列事件过程。
Option Base 1
Private Sub Command1_Click()
Dim a(5,5) As Integer
For i=1 To 5
For j=1 To 5
a(i,j)=(i+j)*5/10
Next j
Next i
s=0
For i=1 To 5
s=s+a(i, i)
Next i
print s
End Sub
程序运行后，单击命令按钮，输出结果是______。
单选题编写如下程序代码： Option Explicit Private Sub Form—Click() Dim x As Variant Dim i As Variant x=Array(50，27，69，80，45) For Each i In x If i Mod 2=0 Then Print i End If Next i End Sub以下叙述中正确的是( )。
单选题窗体的左右两端各有1条直线，名称分别为Line1、Line2；名称为Shapel的圆靠在左边的Line1直线上(见图)；另有1个名称为Timer1的计时器控件，其Enabled属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：PrivateSubTimer1_Timer()Fork=Line1.X1ToLine2.X1Step100IfShapel.Left+Shapel.Width＜Line2.XIThenShapel.Left=Shapel.Left+100EndIfNextkEndSub运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是______。A.把计时器的Interval属性设置为1B.把Fork=Line1.X1ToLine2.X1Step100各Nextk两行删除C.把Fork=Line1.X1ToLine2.X1Step100改为Fork=Line2.X1ToLine1.X1Step100D.把IfShapel.Left+Shapel.Width＜Line2.X1Then改为IfShapel.Left＜Line2.X1Then
单选题设有以下函数过程
Private Function Fun(a()As Integer, b As String)As Integer
End Function
若已有变量声明：
Dim x(5) As Integer, n As Integer, ch As String
则下面正确的过程调用语句是______。
单选题以下不能用Print方法输出数据的对象或窗口是( )。
单选题下列不能扫开菜单编辑器的操作是( )。
单选题设有如下程序段： Dim a(10) ... For Each x ln a Print x; Next x 在上面的程序段中，变量x必须是( )。
单选题执行如下语句：a＝inputBox("Today","Tomorrow","Yesterday",,,"Day before yesterday",5)将显示一个输入对话框，在对话框的输入区中显示的信息是（ ）
单选题在对象引用中，ActiveControl表示( )
单选题假定有下列函数过程： Function Fun(S As String)As String Dim sl As String For i=1 To Len(S) S1=LCass(Mid(S,i,1))+s1 Next i Fun=s1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Strl As String,Str2 As String Str1=InputBox("请输入一个字符串") Str2=Fun(Str1) Print Srt2 End sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后在窗体上的输出结果为( ) A．ABCDEFG B．abcdefg C．GFEDCBA D．gfedcba
单选题有一个名称为Form1的窗体，上面没有控件，设有以下程序(其中方法Pset(X，Y)的功能是在坐标X、Y处画一个点)： Dim cmdMave AS Boolean Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) cmdmave=True End Sub Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If cmdmave Then Form1.Pset(X,Y) End If End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) cmdmave=False End Sub 此程序的功能是
单选题在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序： Option Base 1 Dim e As Integer，d As Integer d=0 c=6 X=Array(2，4，6，8，10，12) For i=1 To 6 If X(i)＞c Then d=d+X(i) c=X(i) Else d=d-c Eles If Next i Print d End Sub 程序运行后，单击命令按钮，则在窗体上输出的内容为( )。
单选题下列说法错误的是
A. Caption不是只读属性，运行时对象的名称可以通过代码改变
B. 设置Height或Width的数值单位为twip，1twip=1/10point
C. Icon属性用来设置窗体最小化时的图标
D. 用来激活属性窗口的快捷键是F4键
单选题在窗体上画一个名称为CommonDialogl的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为Save，默认文件名为SaveFile，在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是 ______。
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim s As String, i As Integer
Dim n As Integer
s = InputBox("输入数据")
n = Len(s)
For i = 1 To n / 2
If __________________________ Then
Exit For
End If
Next i
If i > n / 2 Then
Print s & "是对称字符串"
Else
Print s & "不是对称字符串"
End If
End Sub
该过程的功能是判断输入的字符串是否为对称字符串（例如："1234321"、"XYZZYX"都是对称字符串）。为了实现这一功能，则在横线处应填入的表达式是