배열 (1) 썸네일형 리스트형 VB(비주얼 베이직)에서 배열을 매개변수로 넘기기 Private Sub Form_Load() Dim tP(1 To 4) As Integer Dim i As Integer i = Test(tP) Debug.Print tP(1), tP(2), tP(3), tP(4) End Sub Private Function Test( ByRef t_arr As Variant ) As Integer t_arr(1) = 4 t_arr(2) = 3 t_arr(3) = 2 t_arr(4) = 1 Test = 1 End Function 2가지만 주의하면 됩니다. 배열을 매개변수로 받은 Sub 함수에서 Variant 형으로 선언하는 것과 Integer 는 아니지만 Return 형이 꼭 있어야 합니다. 아무것도 Return을 안해주면 Sub 함수에서 변경한 값이 적용이 되지 않더군요. 이전 1 다음