请教如何给过程中的数组参数赋值

如题 :
调用过程定义一个SC()的数组   
Public Sub ofxh(ByVal ks As Integer, ByVal js As Integer, ByVal sc() As String)
        For i = ks To js - 1
           msgbox(sc(i))        
        Next
    End Sub

调用OFXH:
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        'datai()为已经赋值的动态数组,
       '如何调用OFXH过程,并给SC()赋值,实现外部的datai()的数据传给子程序的SC()数组
       call(0,200,???)
    End Sub