填空题
有下列程序,运行后变量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
【参考答案】
[13] 3
[14] 1
[15] 1
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在窗体上画两个文本框,然后编写程序。程序运行后,如果在第一个文本框中输入A、B、 C、D或a、b、c、d,则在第二个文本框中显示EFDH。请完善下列程序。 Private Sub Form_Load() Show Text1.Text= Text2.Text= Text1.SetFocus End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Text2.Text= 【11】 End Sub
点击查看答案&解析
填空题
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1), 然后编写如下事件过程: Private Sub Command1 Click() Text1.Text=InputBox( 请输入数据1 ) Text2.Text=InputBox( 请输入数据2) End Sub 程序运行后,如果单击命令按钮,将先后显示两个输入对话框,在两个输入对话框中分别输入123和abc,则两个文本框中显示的内容分别为 【9】 和 【10】 。
点击查看答案&解析
相关试题
要想在文本框中显示垂直滚动条,必须将Scro...