vf练习题
答案:1 悬赏:40 手机版
解决时间 2021-02-24 05:02
- 提问者网友：练爱
- 2021-02-23 08:49
vf练习题
最佳答案
- 五星知识达人网友：未来江山和你
- 2021-02-23 09:19
纠正你的题目一下，你的这个不是VF的程序题，而是VB的，且代码有些问题，更正如下：
Private Sub Command1_Click()
Dim I As Integer, J As Integer
Dim K As Integer
I = 1: J = 2
K = Fun(I, Fun(I, J)) + I + J
Print "I="; I; "J="; J; "K="; K
End Sub
Function Fun(A As Integer, ByVal B As Integer) As Integer
A = A + B
B = A + B
Fun = A + B
End Function
结果为 I=11 J=2 K=43
Private Sub Command1_Click()
Dim I As Integer, J As Integer
Dim K As Integer
I = 1: J = 2
K = Fun(I, Fun(I, J)) + I + J
Print "I="; I; "J="; J; "K="; K
End Sub
Function Fun(A As Integer, ByVal B As Integer) As Integer
A = A + B
B = A + B
Fun = A + B
End Function
结果为 I=11 J=2 K=43
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯