a)
Public Sub hoanvi(byref a as integer, byref b as integer)
a = a - b
b = a + b
End sub
Private Sub cmdnhap_click()
a = 60
b = 70
hoanvi(b, a)
End Sub
hoi? a = ........ b = ........
b)
Public Function hamthucthi(n as integer) as integer
Static iA as integer
Do
iA = iA + 2
n = n +1
Loop until iA < n
hamthucthi = iA
End Function
Private Sub cmd_click()
a = 5
b = hamthucthi(a)
a = hamthucthi(b)
End Sub
Hoi? a = .......... b = ..........