填空题

在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
Dim n As Integer
n=Val(InputBox("请输入一个整数:"))
If n Mod 3=0 And n Mod 2=0 And n Mod 5=0 Then
Print n+10
End If
End Sub
程序运行后，单击命令按钮，在输入对话框中输入60，则输出结果是______。

【参考答案】

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

填空题
在窗体上画一个命令按钮，名称为command1，然后编写如下程序： Private Sub Command1_Click() Dim ct As String Dim nt As Integer Open e: stud. txt (13) Do While True ct=InputBox( 请输入姓名: ) If ct= (14) Then Exit Do nt=Val(InputBox( 请输入总分: )) Write #1, (15) Loop Close #1 End Sub 以上程序的功能是，程序运行后，单击命令按钮，则向e盘根目录下的文件stud. txt中添加记录(保留已有记录)，添加的记录由键盘输入；如果输入“end”，则结束输入。每条记录包含姓名(字符串型)和总分(整型)两个数据。请填空。
填空题
在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Private Sub Command1_Click() Dim M(10) As Integer For k=1 To 10 M(k)=12-k Next k x=6 Print M(2+M(x)) End Sub 程序运行后，单击命令按钮，输出结果是______。
相关试题