Imports System
Public Module Module1
Public Ad As String()
Public Soyad As String()
Public sub Main()
set2
End sub
Private Function degerata(ByVal i As Integer) As String()
If i = 1 Then Return Ad
If i = 2 Then Return Soyad
End Function
Public Sub Set2()
degerata(1)(0) = "hi"
console.writeline (Ad(0))
End Sub
End Module