单选题有三个关系R，S和T如下：其中关系T由关系R和S通过某种操作得到，该操作为______。A)选择B)交C)投影D)并
单选题两个或两个以上的模块之间关联的紧密程度称为( )。
单选题在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() s=0 For i=1 To 15 x=2 *1-1 If x Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是______。
单选题在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub
TxtA_KeyPress(Keyascii as integer) …… End
Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是
A. 单击鼠标
B. 双击文本框
C. 鼠标滑过文本框
D. 按下键盘上的某个键
单选题编写如下程序： Private Sub Command1_Click() Dim num As Integer，k As Integer，n As Integer sum=InputBox("请输入一个正整数：") k=sum n=2 Do Do While sum Mod n=0 Print n；：num=num／n Loop n=n+1 Loop Until n＞k／2 End Sub 程序运行后，单击命令按钮Command1，并输入数值20，则输出结果为
单选题假设变量bool_x是一个布尔型(逻辑型)的变量，则下面正确的赋值语句是{{U}} {{/U}}。
A.bool_x="False"
B.bool_x=.False.
C.bool_x=#False#
D.bool_x=False
单选题下列关于过程的叙述不正确的是( )
单选题在数据库系统的组织结构中，下列( )映射把用户数据库与概念数据库联系了起来。
单选题要使菜单项MenuOne在程序运行时失效，使用的语句是 A) MenuOne.Visible=True B) MenuOne.Visible=False C) MenuOne.Enabled=True D) MenuOne.Enabled=False
单选题在窗体上有两个文本框：Text1和Text2，然后编写如下事件过程：Private Sub Form_Load()ShowText1．Text=" "：Text2．Text=" "：Text2．SetFocusEnd SubPrivate Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer)Text1．Text=Text1．Text+Chr(KeyCode-4)End Sub程序运行后，如果在Text2文本框中输入“ertyu”，则Text1文本框中的内容为( )。
单选题栈底到栈顶依次存放元素A、B、C、D，在第五个元素E入栈前，栈中元素可以出栈，则出栈序列可能是( )
单选题一个工程中含有窗体Form1、Form2和标准模块Modell，如果在Form1中有语句Public X As
Integer，在Modell中有语句Public Y As Integer。则以下叙述中正确的是 ______。
A. 变量X、Y的作用域相同
B. Y的作用域是Modell
C. 在Form1中可以直接使用X
D. 在Form2中可以直接使用X和Y
单选题在窗体中添加一个名称为Command1的命令按钮和一个名称为text1的文本框，然后编写如下程序； ( ) Private Sub Commandl_Click() Dim x，y，z As Integer x=5：y＝7：z=O Text1．Text="" Call Pl(x，y，z) Text1. Text＝Str(z) End Sub Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer) c=a+b End Sub
单选题窗体上有一个名称为Command1的命令按钮，其事件过程如下：
Private Sub Command1_Click()
x="VisualBasicProgramming"
a=Right(x,11)
b=Mid(x,7,5)
e=MsgBox(a,,b)
End Sub
运行程序后单击命令按钮，以下叙述中错误的是______。
单选题窗体上有一个名称为Timer1的计时器控件，一个名称为Shape1的形状控件，其Shape属性值为3(Circle)。编写程序如下：
Private Sub Form_Load() Shape1.Top=0
Timer1.lnterva1=100 End Sub Private Sub
Timer1_Timer() Static x As Integer
Shape1.Top=Shape1.Top+100 x-x+1 If x Mod 10=0
Then Shape1.Top=0 End If End
Sub 以下关于上述程序的叙述中，错误的是______。
A.每执行一次Timer1_Timer事件过程，x的值都在原有基础上增加1
B.Shape1每移动10次回到起点，重新开始
C.窗体上的Shapel由下而上移动
D.Shape1每次移动100
单选题设a是整型变量，与函数IIf(a>0，-a，a)有相同结果的代数式是( )。
单选题在窗体上画一个名为Command1的命令按钮，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 For j=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行上面的程序，其输出结果是
单选题有如下程序： Dim arr (3, 3) For j=1 To 3 For k=1 To 3 arr(j, k)=(j-1)*3+k Next k Next j For j=2 To 3 For k=2 To 3 Print arr(k, j); Next k Print Next j 运行后，输出的结果是______。
单选题在窗体上有—个名称为Text1的文本框和一个名称为Command1的命令按钮，要求在程序执行时，每单击命令按钮—次，文本框向右移动—定的距离。下面能够正确实现上述功能的程序是 ______。
单选题以下叙述中错误的是______。 A) 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型 B) Sub过程中不能嵌套定义Sub过程 C) Sub过程中可以嵌套调用Sub过程 D) Static类型用于定义变量，不能定义过程