填空题在窗体中添加一个命令按钮(名为Command1) 和一个文本框(名为text1) ,然后编写如下事件过程: Private Sub Command1_C1ick( ) Dim x As Integer, y As Integer, z As Integer x=5:y=7:z=0 Me!Text1="" Call p1(x,y,z) Me!Text1=z End Sub Sub p1(a As Integer,b As Integer,c As Integer) C=a+b End Sub 打开窗体运行后,单击命令按钮,文本框中显示的内容是______
填空题如果要从多个表中删除相关记录必须满足以下条件: 在“关系”窗口中定义______的关系; 在“关系”对话框中选中______复选项; 在“关系”对话框中选中______复选项。
填空题一下程序找出50以内所有能构成直角三角形的整数组。阅读下列程序,并完成程序。 Private Sub Commandl C土ick() For a=l to 50 For b=a to 50 C=Sqr(a∧上标2+b∧上标2) If【15】then print a;b;c next b next a end Sub C<=50 And C=Int(c)
填空题表达式"12"+"3"+45的值是{{U}} 【12】 {{/U}}。
填空题在窗体上添加一个命令按钮,编写如下事件过程: Private Sub Command1_Click() sum=0 For i=3 To 7 sum=i+2 Next i MsgBox sum+i End Sub 运行窗体后,单击命令按钮,消息框的输出结果是______。
填空题在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Commandl_Click( ) Static X As Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X Print X, Y End Sub 程序运行时,3次单击命令按钮Command1后,窗体上显示的结果为 【14】 。
填空题设有如下代码:
x=1
Do
x=x+2
Loop until{{U}} 【13】 {{/U}}
运行程序,要求循环执行3次后结束循环,在空白处填入适当语句。
填空题当输入10,11,12时,下面程序运行结果是{{U}} 【6】 {{/U}}。
#include <iostream>
using namespace std;
int main()
{
int a,b,C,max;
Cin>>a>>b>>c;
max=a;
if(max<b)
max=b;
if(max<c)
max=c;
cout<<max<<end1;
return 0;
填空题在查询设计视图中,设计查询准则的相同行之间是{{U}} [8] {{/U}}的关系,不同行之间是{{U}} [9] {{/U}}的关系。
填空题Access中,文本框分为3种类型:结合型、非结合型与______。
填空题设a=6,则执行x=IIf (a>5,-1,0)后,x的值为{{U}} 【8】 {{/U}}。
填空题VBA的运行机制是{{U}} 【7】 {{/U}}。
填空题软件生命周期一般可分为以下阶段:问题定义、可行性研究、{{U}} 【3】 {{/U}}、设计、编码、{{U}} 【4】 {{/U}}、运行与维护。
填空题有如下用户定义类型及操作语句: Type Student SNo As String Sname As String SAge As Integer End Type Dim Stu As Student With Stu .SNo="200609001" .SName="陈果果" .SAge=19 End Wifh 执行MsgBox Stu.SAge后,消息框输出结果是______。
填空题若希望使用一个或多个字段的值进行计算,需要在查询设计视图的设计网格中添加 【7】 字段。
填空题在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码: Public x as integer Private Sub Command1_Click( ) x=5 Call s1 Call s2 MsgBox x End Sub Private Sub s1( ) x=x+10 End Sub Private Sub s2( ) Dim x as integer x=x+10 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是 (15) 。
填空题冒泡排序在最坏情况下的比较次数是______。
填空题阅读下面程序:
Private Function a(load As Integer) As Single
If load <20 then
money = load/2
else
money =20 + load
end if
a = money
End Function
Private Sub Form_Click( )
Dim load As Integer, fee As Single
Load = InputBox("请输入一个数:")
fee= a(loaD)
Print fee
End Sub
输入20,运行后的输出结果是{{U}} 【6】 {{/U}}。
填空题在窗体上画一个命令按钮Command1和3个标签控件(Lable1、Lable2和Lable3),编写如下代码: Public x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n=5 x=x+n y=y+n z=z+n Lable1.Caption=x Lable1.Caption=y Lable1.Caption=z End Sub 运行程序,连续3次单击命令按钮后,则3个标签中显示的内容分别为______。
填空题当数据的物理结构(存储结构、存取方式等)改变时,不影响数据库的逻辑结构,从而不至于引起应用程序的变化,这是指数据的 【5】 。