单选题下面是求最大公约数的函数的首部：
Function gcd(ByVal x As Integer，ByVal y As Integer)As integer
若要输出8、12、16这3个数的最大公约数，下面正确的语句是______。
单选题只有将组合框的Style属性值设置为( )时，才能触发Db1Click事件。
单选题设“A="87654321"”，则表达式Val(Left(A，4)+Mid(A，4，2))的值为
____
。
单选题下列控件中，不响应Click事件的是( )。
单选题有如下过程代码： Sub var_dim() Static numa
As Integer Dim numb As Integer
numa=numa+2 numb=numb+1 print
numa;numb End Sub 连续3次调用var
dim过程，第3次调用时的输出是______。
A.2 1
B.2 3
C.6 1
D.6 3
单选题在窗体上画一个水平滚动条，其属性值满足Min
单选题关系表中的每一横行称为一个 ______。 A) 元组 B) 字段 C) 属性 D) 码
单选题为了在按下Esc键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是______。
单选题要使标签中的文本靠右显示，则应将其Alignment属性设置为______。
单选题以下语句的输出结果是______ 。 Print Format＄(32548.5，“000，000.00”)
单选题下列各选项中，不属于序言性注释的是( )。
单选题下列过程定义语句中合法的是_____________。
A.Sub Proc(ByVal n())
B.Sub Proc(n)As Integer
C.Function Proc()
D.Function Proc(ByVal n)
单选题当窗体上有多个控件时，为了在程序运行后使得焦点位于某个控件上，应对该控件进行的设置是
单选题不能判断字符变量st中第一个字符是否为“S”的表达式是______。
单选题在窗体上画一个名称为Command1的命令按钮，一个名称为Text1的文本框数组（含４个文本框，下标从０开始），然后编写如下事件过程：
Private Sub Command1_Click()
Dim i As Integer, n As Integer
For Each TextBox In Text1
Text1(i) = Text1(i).Index
n = 10 * (n + Val(Text1(i).Text))
i = i + 1
Next
Print n
End Sub
运行程序，单击命令按钮Command1，则在窗体上的输出结果是
单选题当执行以下过程时，在名为lblResult的标签框内将显示______。Private Sub Command1_ Click() Dim I, R R = 0 for I = 1 To 5 step 1 R= R+ I Next I lblResult. Caption = Str＄(R)End Sub
单选题下列叙述中正确的是( ) A．为了建立一个关系，首先要构造数据的逻辑关系 B．表示关系的二维表中各元组的每一个分量还可以分成若干数据项 C．一个关系的属性表称为关系模式 D．一个关系可以包括多个二维表
单选题窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(p1(x),y) Text2.Text=p1(x) End Sub Private Function p1(x As Integer)As Integer x=x+y:y=x+y p1=x+y End Function Private Function p2(x As Integer,y As Integer)As Integer p2=2*x+y End Function 当单击1次和单击2次命令按钮后，文本框Textl和Text2内的值分别为( )。
单选题窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。设有如下的类型声明： Type Person name As String *8 major As String*20 End Type 当单击"保存"按钮时，将两个文本框中的内容写入一个随机文件C：/Testl.dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是______。 A) Open "c: /Test1.dat" For Random As#1 Get #1 ,1 ,p Close#1 B) Open "c: /Test1.dat" For Random As#1 Len= Len(p) Get #1,1,p Close #1 C) Open "c:/Test1.dat" For Random As#1 Put #1,1,p Close #1 D) Open "c:/Test1.dat" For Random As#1 Len= Len(p) Put #1 ,1 ,p Close #1
单选题为了暂时关闭计时器，应把该计时器的某个属性设置为False，这个属性是 ______。