Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Error 9 Subscript out of range!
Autor: Martin
Datum: 25.06.02 00:15
Das wäre der Code: Private Sub cmdscan_Click() Dim VBEx As New axVBEx32.VBEx32 Dim lCount As Long Dim sFileToLookFor As String ReDim sFiles(10000) As String sFileToLookFor = "*.mp3" lCount = VBEx.Files.List("c:", sFiles(), True, sFileToLookFor) For I = 0 To lCount lblresult.Caption = "Die Datei wurde" & CStr(lCount + 1) & " mal gefunden!" Next I End Sub Müßte doch eigentlich so stimmen, oder? Aber er zeigt mir immer folgende Fehlermeldung an: Error 9 Subscript out of range! Woran liegt das bitte? Danke für die Hilfe Martin

Error 9 Subscript out of range!	56	Martin	25.06.02 00:15
Bereits behoben	323	Dieter	25.06.02 00:26
Re: Bereits behoben	255	unbekannt	25.06.02 00:37
Re: Error 9 Subscript out of range!	414	unbekannt	25.06.02 00:35
Re: Error 9 Subscript out of range!	46	Martin	25.06.02 09:31
Re: Error 9 Subscript out of range!	272	Dieter	25.06.02 09:36

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen