填空题

在窗体中有一个名为(Command1的命令按钮，Click事件的代码如下：
Private Sub(20mnlan d1_Click()
f=0
For n=1 to 10 Step 2
f=f+n
Next n
Me!lb1.Caption=f
End Sub
单击命令按钮后，标签显示的结果是______。

【参考答案】

Y
<上一题 目录 下一题>
热门 试题

填空题
下列子过程的功能是：当前数据库文件中的“学生表”的学生“年龄”都加1，请在程序空白处填写适当的语句，使程序实现所需的功能。 Private Sub SetAgePlus1_Click() Dim a As DAO.Datahase Dim rs As DAO.Recordset Dim fd As DAO.Field Set db=CurrentDb() Set rs=db.OpenRecordset( 学生表 ) Set fd=rs.Fields( 年龄 ) Do While Not rs.EOF rs.Edit fd= (14) rs.Update (15) Loop rs.Close db.Close Set rs=Nothing Set db=Nothing End Sub
填空题
在窗体中有一个名为command12的命令按钮，click事件的代码如下。该事件所完成的功能是：接受从键盘输入的10个大于0的整数，找出其中的最大值和对应的输入位置。请依据上述功能要求将程序补充完整。 Private Sub Command12_Click() max=0 max_n=0 For i=1 To 10 Num=Val(InputBox( 请输入第 & i & 个大于0的整数： )) If(nunl＞Inax)Then max= (12) max_n= (13) End If Next i MsgBox( 最大值为第 &max_n & 个输入的 & max) End Sub
相关试题