填空题
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),
然后编写如下事件过程:
Private Sub Command1 Click()
Text1.Text=InputBox("请输入数据1")
Text2.Text=InputBox("请输入数据2)
End Sub
程序运行后,如果单击命令按钮,将先后显示两个输入对话框,在两个输入对话框中分别输入123和abc,则两个文本框中显示的内容分别为
【9】
和
【10】
。
【参考答案】
[9]123
[10]abc
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
有下列程序,运行后变量x1、y1和z1的结果分别是 【13】 、 【14】 和 【15】 。 Private Sub fun1(s,m,n) s = m + 1 m = n + 2 n = s + 3 End Sub Private Sub form Click() Dim x1, y1 x1 = 1 :y1 = 1 :z1 = 1 Call fun1(x1,y1 + 1,(z1)) Debug.Print x1; y1; z1 End Sub
点击查看答案&解析
填空题
运行下列程序: Dim t As Integer Private Sub Form_Click() t = 2 x=Val(InputBox( 输入一个整数5 )) Print funl(x); t End Sub Private Function fun1(y) If y>0 Then fun1 = 1: t=10 Else If y=0 Then fun1 = 0: t=20 Else fun1 = -1: t=30 End If End Function 从键盘为变量x输入数据5,输出的结果是 【8】 。
点击查看答案&解析
相关试题
为了建立窗体的Click事件过程,即Form_Cli...
要想在文本框中显示垂直滚动条,必须将Scro...
在窗体上画两个文本框,然后编写程序。程序...
数据库的逻辑模型设计阶段的主要任务是将 ...