在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：Private Sub Commandl Click()Dim x As Integer，y As Integer，z As Integerx=5:y=7:z=0Me!Text1=" "Call p1(x，y，z)Me!Text1=zEnd SubSub p1(a As Integer，b As Integer，C As Integer)c=a+bEnd Sub打开窗体运行后，单击命令按钮，文本框中显示的内容是 1。