单选题在程序运行时,下面的叙述中正确的是( )。
单选题设有如下变量声明语句: Dim a, b As Boolean 则下面叙述中正确的是( )。
单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是 ______。
单选题窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0~9各数字字符的个数。某人编写如下程序:
Private Sub Command1_Click()
Dim count(10) As Integer
第1个For循环
For i=0 To 9
count(i)=0
Next
S=Trim(Text1.Text)
strLen=Len(S)
第2个For循环
For i=1 To strLen
C=Mid(g,i,1)
If e>="0" And C<="9" Then
x=Val(c)
count(i)=count(i)+1
End If
Next
第3个For循环
For i=0 To 9
Print Str(i), count(i)
Next
End Sub
运行程序后,发现不能实现题目的要求,程序应该进行的修改是______。
单选题窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click() Dim art_x(5,5)As Integer For i=1 To 3 For j=2 To 4 arr_x(i,j)=i*j Next i Next i Print arr_x(2,1);arr_x(3,2);art_x(4,3) End Sub 运行程序,并单击命令按钮,窗体上显示的内容为
单选题数据库应用系统中的核心问题是
单选题下列程序段的执行结果为______。 A="abcd" B="bcdc" E=Right(A,3) F=Mid(B,2,3) If E<FThen PrintE+F Else Ptint F+E
单选题窗体上有1个名称为Command1的命令按钮,事件过程如下:Private Sub Command1_Click() m=-3.6 If Sgn(m)Then n=Int(m) Else n=Abs(m) End If Print nEnd Sub运行程序,并单击命令按钮,窗体上显示的内容为( )。
单选题用二维表结构表示实体与实体间联系的数据模型是______。
A.网状模型
B.层次模型
C.面向对象模型
D.关系模型
单选题设R是一个2元关系,S是一个3元关系,则下列运算中正确的是( )。
单选题设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮,并有以下事件过程: Private Sub Command1_Click() x!=Val(Text1.Text) Select Case x Case Is<-10.Is>=20 Print"输入错误" Case Is<0 Print 20-x Case Is<10 Print 20 Case Is<=20 Print x+10 End Select End Sub 程序运行时,如果在文本框中输入-5,则单击命令按钮后的输出结果是______。 A) 5 B) 20 C) 25 D) 输入错误
单选题运行程序段后输出______个“*”号。 For i=1 To 2 For j=0 To i-1 Print"*" Next j Next i
单选题下列控件中,不响应Click事件的是
单选题全局数据视图的描述称为______。
A.外模式
B.概念模式
C.内模式
D.物理存储模式
单选题用户在屏幕上画出应用程序界面,并设置好对象的属性,系统便可以自动生成程序代码,这称为( )
单选题在窗体上画一个名称为Command1的命令按钮,然后编写下列事件过程:
Private Sub Command1Click()
C=1234
c1=Trim(Str(c))
For i=1 To 4
Print
Next
End Sub
程序运行后,单击命令按钮,要求在窗体上显示下列内容:1
12
123
1234
则在横线处应填入的内容为( )。
单选题下列程序段的执行结果为 a=5 For k=1 To 0 a=a+k Next k Print k;a
单选题下面程序计算并输出的是
Private Sub Command1_Click()
a=10:s=0
Do
s=s+a*a*a:a=a-1
LoopUntil a<=0
Print s
End Sub
单选题能得到组合框Combo1中最后一个列表项序号的表达式是( )。
单选题窗体上有1个名称为CD1的通用对话框,1个名称为Command1的命令按钮。命令按钮的单击事件过程如下:
Private Sub Command1_Click()
CD1.FileName=""
CD1.Filter="All Files|*。*|(*。DoC)|*。Doc|(*。Txt)|*.txt"
CD1.FilterIndex=2
CD1.Action=1
End Sub
关于以上代码,错误的叙述是______。