VB Wie die Rückkehr und Sie erhalten 3-dimensionale-array aus Funktion

Habe ich mit einem problem konfrontiert, wie man mit mehrdimensionalen Arrays. Ich habe eine Funktion:

Public Function findCheckDigit(ByVal text As String) As String(,,)
    Dim msgLen As Integer = text.Length
    Dim value(msgLen + 2, 1, 1) As String
    ...
    ...
    ...
    Return value
End Function

Im folgenden werde ich versuchen, rufen Sie diese Funktion:

Private Sub bGenerate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bGenerate.Click
        Dim value(tbText.Text.Length + 2, 1, 1) As Array

        value(tbText.Text.Length + 2, 1, 1) = findCheckDigit(tbText.Text)  <--- Here is a problem

        MsgBox(value(0, 1, 0))  ' Return empty in any position
    End Sub

Ich bin mir sicher, dass das problem in diesem Ort, aber wie das umzusetzen, meine Funktion aufrufen, um ein anderes 3-dimensionales array mit der gleichen Größe?

  • Welche Fehler sind Sie immer? (!)
InformationsquelleAutor Viktor V. | 2012-10-20
  1. 4

    Erstellen Sie ein Leeres array und nicht darum, irgendwelche Daten in es. Sie müssen nicht erstellen die Grenzen auf dem Empfänger-array, so etwas wie dies tun, und stellen Sie sicher, dass die Array-Typen sind die gleichen wie zuvor erwähnt wurde, durch Luke94.

    Public Function findCheckDigit(ByVal text As String) As String(,,)
    Dim msgLen As Integer = text.Length
    Dim value(msgLen + 2, 1, 1) As String
    value(0, 0, 0) = "Hello"

    Return value
End Function

Private Sub bGenerate_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Dim value(,,) As String

    value = findCheckDigit(tbText.Text) 

    MsgBox(value(0, 0, 0))  

End Sub
    • Hmm, vielen Dank, dasss working. Thats seltsam, ein bisschen, Es scheint, dass ich versucht habe auf diese Weise mich selbst, aber Es hat nicht funktioniert, vielleicht habe ich etwas vergessen, d.h. ich habe die stellen mit dem Wert(Sie für msglen + 2, 1, 1) Als Array anstelle von Wert(Sie für msglen + 2, 1, 1) Als String . Ich weiß, dass der Prozess der Einführung der array-Funktion sein sollte, etwas ähnliches mit immer ein-dimensionales array von Beispielen auf der offiziellen website, aber ich hab Chaos in meinem Kopf. Nochmals vielen Dank!
    • Sie sind herzlich eingeladen, froh, eine Hilfe sein
    InformationsquelleAutor Mark Hall
  2. 1

    Wenn Sie 

    Dim value(msgLen + 2, 1, 1) As String

    Sind Sie beim Zugriff auf ein array-element, das nicht existiert. Sagen wir mal das array hat 5 Elemente (jeweils 2d-arrays). Sie für msglen wäre 5. Nun, Sie binden um Zugriff auf die acht element "Wert", weil Sie sagen, sind Sie für msglen + 2. Das würde nicht funktionieren, weil es gibt nur 5 Elemente.

    InformationsquelleAutor golddove
  3. 0

    Ich bin nicht sicher, ob ich deine Frage verstanden habe Recht. Also hier ist mein Vorschlag

    In der findCheckDigit Funktion, deklarieren Sie das Array als String

    Dim Wert(Sie für msglen + 2, 1, 1) As String

    Aber in der Klick-Listener erstellen Sie ein Array

    Dim Wert(tbText.Text.Länge + 2, 1, 1) Als Array

    • Kann sein, es war mein problem, aber es sollte ein array von Typ string, nicht Array nur ot wird es nicht funktionieren.
    InformationsquelleAutor Luke94
Schreibe einen Kommentar