填空题

在窗体中添加一个名称为 Command1 的命令按钮，然后编写如下程序： Private Sub s(ByVal p As Integer) p = p * 2 End Sub Private Sub Command1_Click() Dim i As Integer i = 3 Call s(i) If i > 4 Then i = i ^ 2 MsgBox i End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为__________ 。

【参考答案】

C

<上一题目录下一题>

热门试题

单项选择题

将欧阳秀的工资增加200元的SQL语句是【】。

A．REPLACE 教师WITH工资=工资+200 WHERE 姓名="欧阳秀"
B．UPDATE 教师SET工资=工资+200 WHEN 姓名="欧阳秀"
C．UPDATE 教师工资WITH工资+200 WHERE 姓名="欧阳秀"
D．UPDATE 教师SET工资=工资+200 WHERE姓名="欧阳秀"

填空题

下列子过程的功能是：将当前数据库文件中“学生表”的学生“年龄”都加1。请在程序空白的地方填写适当的语句，使程序实现所需的功能：Private Sub SetAgePlus1_Click()Dim db As DAO.DatabaseDim rs As DAO.RecordsetDim fd As DAO.FieldSet db = CurrentDb()set rs = db.OpenRecordset( 学生表 )Set fd= rs.Fields( 年龄 )Do While Not rs.EOFrs.Editfd = 【】rs.Update【】Looprs.Closedb.CloseSet rs = NothingSet db = NothingEnd Sub

相关试题