Dim yAs Integer Private SubCommand1_Click() Dim xAs Integer x=2 Text1.Text=p2(p1(x),y) Text2.Text=p1(x) End Sub Private Function p1(xAs Integer)As Integer x=x+y:y=x+y p1=x+y End Function Private Function p2(xAs Integer, yAs Integer)As Integer p2=2*x+y End Function 当单击1次和单击2次命令按钮后,文本框Text1和Text2内的值分别为()。 A.2 4 2 4 B.2 4 4 8 C.4 4 8 8 D.10 10 58 58