在窗体上已经建立了一个文本框Text1和一个命令按钮(Command1)，运行程序后单击命令按钮
DimaAsInteger'模块级变量PrivateSubCommand1_Click()DimbAsInteger,cAsIntegera=2:b=-1CallMySu...
Dim a As Integer '模块级变量
Private Sub Command1_Click()
Dim b As Integer, c As Integer
a = 2: b = -1
Call MySub(b, c)
c = c + b:Call MySub(c, b)
a = a + c
Text1.Text = a + b + c
End Sub
Sub MySub(ByVal x, y)
Dim b As Integer
a = x + a + b
x = 2 * a + x
y = x + 1
End Sub
，则在文本框Text1中显示的内容是_______。 展开
Private Sub Command1_Click()
Dim b As Integer, c As Integer
a = 2: b = -1
Call MySub(b, c)
c = c + b:Call MySub(c, b)
a = a + c
Text1.Text = a + b + c
End Sub
Sub MySub(ByVal x, y)
Dim b As Integer
a = x + a + b
x = 2 * a + x
y = x + 1
End Sub
，则在文本框Text1中显示的内容是_______。 展开
1个回答
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
