Bitte um Erklärung!

  • VB6

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von alchimist.

    Bitte um Erklärung!

    Hallo freunde, ich habe ein paar Programm schnipsel gefunden, die aber nur sehr wenig bis garnicht protokolliert sind.

    Kann mir bitte eine Beschreibung zu diesen sachen geben? Wäre euch sehr dankbar, da ich es ja auch verstehen will warum was so funzt.

    <pre>

    Option Explicit

    Public Function EncodeString(ByVal strToEncode As String, ByVal strPassword As String) As String

    </pre>

    <pre>
    For i = 1 To UBound(cfc)
    cfc(i) = Asc(Right(strPassword, Len(strPassword) - i + 1))
    Next i
    </pre>

    Was bedeutet eine Funktion wie diese

    <pre>
    Private Function VirtPos(i As Long, a() As Integer) As Integer
    .
    .
    .
    End Function

    Private Function addToIndex(i As Integer, j As Integer) As Integer
    .
    .
    .
    End Function

    Private Function GetOfIndex(i As Integer, j As Integer) As Integer
    .
    .
    .
    End Function
    </pre>

    Vielen Dank im Voraus

    Greez ProSoft @lias Professional Software

    Hallo ProSoft,

    Was bedeutet eine Funktion wie diese

    ist genau so, als wenn ich mit einer verölten M8-Mutter zu einem KFZ-Meister gehe und ihn frage, welche Automarke war das.

    Du präsentierst da ein Code-Schnipsel, welcher unter Umständen erst im Kontext seine wahre Funktionalität offen legt.

    Probleme:
    1) <font color="firebrick"> strToEncode </font> kommst in dem Quelltext von <font color="firebrick"> EncodeString </font> nicht vor.
    2) niemnand weiß was das <font color="firebrick"> cfc </font> ist.
    3) du erwähnst mit keinem Wort, was das Programm denn so macht

    Aber es kann ja sein, dass du jemanden findest, der auf solche Rätsel steht.

    Gruß Markus