填空题

在窗体中添加一个命令按钮，然后编写如下代码：
Private Sub Command1_Click()
a＝InputBox("请输入一个整数")
b＝InputBox("请输入一个整数")
Print Val(a)+Val(b)
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入21和45，输出结果为 【10】 。

【参考答案】

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

填空题
在窗体上加上一个文本控件PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示“打开文件”对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。 Private Sub Command1_Click() CommonDialog1. Filter= 【14】 CommonDialog1. ShowOpen PCSTextBox. Text＝ 【15】 End Sub
填空题
以下程序判断从文本框Text1中输入的数据，如果该数据满足条件：除以3余2，除以 5余3，除以7余4，则输出；否则，将焦点定位在文本框Text中，选中其中的文本。 Private Sub Command1_Click() x＝Val(Text1.Text) If 【9】 Then Print x Else Text1.SetFoeus Text1.SetStart＝0 End If End Sub
相关试题