单选题数据库系统的核心是
单选题以下关于过程的叙述中,错误的是
单选题下列程序执行后,变量x的值为( )。 Dim a,b,c,d As Single Dim x As Single a=100 b=20 c=1000 If b>a Then d=a:a=b:b=d End If If b>c Then x=b Elseif a>c Then x=c Else x=a End If A) 100 B) 20 C) 1000 D) 0
单选题编写如下事件过程: Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s As Integer ReDim x1(3) For i = 1 To UBound(x1) x1(i)=i + 1 Next i Call sub1(x1) For i = 1 To UBound(x1) s = s + x1(i) Next i Print s End Sub Private Sub sub1(n()As Integer) Dim i As Integer ReDim Preserve n(5) For i = 3 To 5 n(i)=n(i-1)*2 Next i End Sub 程序运行后,单击窗体,则窗体上显示的内容是
单选题在窗体上画一个名为Checkl的复选框,如果在窗体启动事件中编写语句“Checkl.Enabled=False”,则运行后复选框的状态为( )。
单选题以下Visual Basic不支持的循环结构是
单选题层次型、网状型和关系型数据库划分原则是( )。 A) 记录长度 B) 文件的大小 C) 联系的复杂程度 D) 数据之间的联系方式
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Dim k As Integer Private Sub Form_Load() k=15 End Sub Private Sub Command1_Click() Static b As Integer b=b+k k=k+1 Print k,b End Sub 程序运行时,两次单击命令按钮Command1后,在窗体上显示的第二行是( )。
单选题窗体上有一个名称为Command1的命令按钮,其事件过程如下:
Private Sub Command1_Click()
Dim i As Integer, j As Integer, k As Integer
Dim s As Double
s=0:i=1:j=0:k=-1
Do While i<6
s=s+k*(j/i)
i=i+1
j=j+1
k=-k
Loop
Print s
End Sub
以上程序所计算的表达式是______。
单选题用数据流图(DFD) 作为描述工具的软件开发阶段是______。 A) 可行性分析 B) 需求分析 C) 概要设计 D) 详细设计
单选题在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序( )。 Private Type student StuName As String * 10 StuGrade As String * 10 StuAge As Integer End Type Private Sub Form Click() Dim s As student Open "c:/student.txt"For Random As#1 Len=Len(s) For i=1 To 5 s.StuName=InputBox("请输入姓名") s.StuGrade=InputBox("请输入年级号") s.StuAge=Val(InputBox("请输入年龄")) ______ Next i Close #1 End Sub
单选题设有如图所示窗体和以下程序:PirintSubCommand1_Click()Text1.Text="VisualBasic"EndSubPrivateSubTextLostFocus()IfText1.Text<>"BASIC"ThenText1.Text="":TextSetFocusEndIfEndSub程序运行时,在Text1文本框中输入“Basic”(如图所示),然后单击Command按钮,则产生的结果是
单选题在窗体中添加两个文本框,其名称为别为Text1和Text2;两个标签,其名称为别为Labe11和Labe12。编写程序,使得程序运行后,在文本框Text2中输入小写字母,能转换为比此字母ASCII代码小4的大写字母,结果显示在文本框Text1中。如输入“efg”,则输出结果为“ABC”,运行后如下。能够实现上述功能的程序是______。
单选题程序段如下; s=0 For I=5 to -1 step -2 S=s+I Next I Print I 语句S=S+I执行的次数和最后I的值分别为( )。
单选题对下列二叉树:进行中序遍历的结果是______。
单选题为了使标签Labell透明且不具有边框,以下正确的属性设置是
单选题要求当鼠标在图片框P1中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是
单选题往窗体Form1上励口—个列表框控件List1,并编写如下代码: Private Sub Form_Load() For i=0 To 6 List1.AddItem i Next i End Sub 为了在程序运行时,按住Ctrl键单击列表中的项目可以选中多个项目,可以设置List1的属性 ______。
单选题Sub过程与Function过程最根本的区别是( )。 A) Sub过程可以用Call语句直接使用过程名调用,而Function过程不可以 B) Function过程可以有形参,Sub过程不可以 C) Sub过程不能返回值,而Function过程能返回值 D) 两种过程参数的传递方式不同
单选题编写如下程序:
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
s=0:j=1
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
程序运行后,单击命令按钮Command1,输出结果为______。