单击按钮Command1,在窗体上第一行显示?第二行显示?
Option Explicit
Private Sub Form_Click()
Dim x As Single, i As Integer
x = 1。
2
For i = 1 To 3
x = x * i
Print fun1(x)
Next i
End Sub
Private Function fun1(x As Single) As Single
Static y 'y要定义成静态变量
y = y + x
fun1 = y / 2
End Function。
Option Explicit
Private Sub Form_Click()
Dim x As Single, i As Integer
x = 1。
2
For i = 1 To 3
x = x * i
fun1 (x)
Next i
End Sub
Private Function fun1(x As Single) As Single
Dim y As Single
y = y + x
fun1 = y / 2
Print fun1
End Function
。
线性链表分好几种,分为单链,双链等,它们的存储顺序也不一样. 线性表是...