수다닷컴

Option Explicit

Private Sub Command1_Click()

Dim x As Integer, y As Integer

x = 3 : y = 5

swap x, y

print x, y -- 출력

End Sub

Sub swap(n1 As Integer, byVal n2 As Integer)

Dim tmp As Integer

tmp = n1

n1 = n2

n2 = tmp

End Sub

이문제에 관해서 변수와 서브함수를 설명하라는데 .. 처음배우는 비쥬얼베이직;; 교재에도 안나와있고..
가르쳐 주시지도않고 숙제를 해오라는데 막막하네요.. 설명좀부탁드립니다

신청하기