填空题在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1 Click() Dim x As Integer,y As Integer x=12:y=32 Call p(x,y) MsgBox x*y End Sub Public Sub P(n As Integer,By Val m As Integer) n=n Mod 10 m=m Mod 10 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
填空题宏组事实上是一个冠有______的多个宏的集合。
填空题若窗体中已有一个名为Cmd的命令按钮、一个名为Label1的标签和一个名为Text1的文本框,且文本框的内容为空,然后编写如下事件代码: Private Function f(x As Long) As Boolean If x Mod 2=0 Then f=False Else f=True End If End Function Private Sub Cmd_Click( ) Dim n As Long n=Val(Me! text1) p=IIf(f(n), "奇数“,"偶数") Me! Labell. Caption=n&"是"&p End Sub窗体打开运行后,在文本框中输入11,单击命令按钮,则标签显示内容为 【12】 。
填空题将下面的程序填写完整,如要计算1+2+…+10,请完成下面的程序,其中,s是单精度类型的变量。
Dim x as Integer,s as Single
s=0
For x=1 to 10
s={{U}} 【15】 {{/U}}
Next x
填空题创建分组统计查询时,总计项应选择 【6】 。
填空题实现数据库操作的DAO技术,其模型采用的是层次结构,其中处于最顶层的对象是{{U}} 【12】 {{/U}}。
填空题在设计视图中创建查询,首先要打开 ______ ,然后是加入查询所使用的字段列表,之后是加入查询结果中应用的字段,接着是输入 ______ ,最后是为查询结果排序。
填空题在Access中模块分为______和______两种类型。
填空题操作查询共有四种类型,分别是删除查询、生成表查询、{{U}} 【8】 {{/U}}和更新查询。
填空题在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command1_Click() Dim a(10),p(3)As Integer k=5 For i=1 To 10 a(i)=i*i Next i For i=1 To 3 P(i)a(i*1) Next i For i=1 To 3 K=k+p(i)*2 Next i MsgBox k End sub 打开窗体运行后,单击命令按钮,消息框中输出的结果是______。
填空题在窗体上画两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程: Private Sub Commandl_Click() Text1="VB programming" Text2=Text1 Text1="ABCD" End Sub 程序运行后,单击命令按钮,文本框Text2中显示的内容为 【12】 。
填空题已知一个名为“学生”的Access数据库,库中的表“stud”存储学生的基本信息,包括学号、姓名、性别和籍贯。下面程序的功能是:通过下图所示的窗体向“stud”表中添加学生记录,对应“学号”、“姓名”、“性别”和“籍贯”的四个文本框的名称分别为tNo、tName、tSex、tRes。当单击窗体中的“增加”命令按扭(名称为Command1)时,首先判断学号是否,如果不重复则向“stud”表中添加学生记录;如果学号重复,则给出提示信息。请依据所要求的功能,将如下程序补充完整。DimADOcnAsNewADODB.ConnectionPrivateSubForm_Load()'打开窗口时,连接Access数据库SetADOcn=CurrentProject.ConnectionEndSubPrivateSubCommand1_Click()'增加学生记录DimstrSQLAsStringDimADOrs.AsNewADODB.RecordsetSetADOrs.ActiveConnection=ADOcnADOrs.Open"Select学号FromStudWhere学号=''+tNo+''IfNotADOrs.(14)Then'如果该学号的学生记录己经存在,则显示提示信息MsgBox"你输入的学号己存在,不能增加!"Else'增加新学生的记录strSQL="InsertIntostud(学号,姓名,性别,籍贯)strSQL=strSQL+"Values("+tNo+","+tName+","+tSex+","+tRes+")"ADOcn.Execute(15)MsgBox"添加成功,请继续!"EndIfADOrs.CloseSetADOrs=NothingEndSub
填空题用于设定控件的输入格式,仅对文本型或日期型数据有效的控件的数据属性为 【12】 。
填空题在表格式窗体、纵栏式窗体和数据表窗体中,将窗体最大化后显示记录最多的窗体是{{U}} 【8】 {{/U}}。
填空题报表标题一般放在 【10】 中。
填空题多字段排序时,排序的优先级是{{U}} 【5】 {{/U}}。
填空题打开数据访问页的设计视图时,系统会同时打开 【11】 。
填空题有如下程序: A$="Flying": b$="is":C$="funny!" Print a$+""+LCase$(b$)+""+UCase$(C$) End运行后输出的结果是 【12】 。
填空题所谓控件,它是一个 【8】 ,例如文本框、复选框、命令按钮等。
填空题设置计算机发出嘟嘟声的宏操作是 【7】 。
