| |
Visual-Basic EinsteigerListview - | | | Autor: crosstravel | Datum: 04.07.14 18:02 |
| Hallo zusammen,
ich schreibe gerade ein kleines Programm zur Verwaltung der INI-Datei und stütze mich dabei weitgehend auf das Beispiel aus dem Workshop "INI-Dateien bearbeiten und verwalten".
Beim Kompilieren komme ich auf den Fehler: Method or Datamember notfound
Der Cursor steht dabei auf der fett geschriebenen zeit und hier auf "itemX.SubItems(1)"
Ich finde die Ursache nicht; unter itemX. gibt es bei mir kein Eintrag "Subitems"
Hat jemand eine Idee, wo mein Problem liegen könnte ?
Danke und Gruss
Rainer
Private Sub Init_Keys(ByVal strSection As String, _
ByVal INIFile As String)
Dim strKeys As String
Dim Key() As String
Dim i As Integer
Dim itemX As ListItem
' ListView löschen
lvwKeys.ListItems.Clear
' vbNullString übergeben, um alle gespeicherten
' Keys zu ermitteln
strKeys = GetIniString(strSection, vbNullString, _
"", INIFile, 32767)
' Sind überhaupt Einträge vorhanden?
If strKeys <> "" Then
' Rückgabestring "splitten"
Key = Split(strKeys, Chr$(0))
' Alle Einträge der ListBox hinzufügen
With lvwKeys.ListItems
For i = 0 To UBound(Key) - 1
Set itemX = .Add(, , Key(i))
itemX.SubItems(1) = GetIniString(strSection, Key(i), "", INIFile)
Next i
End With | |
Re: Listview - | | | Autor: Blackbox | Datum: 07.07.14 19:08 |
| Hi,
das liegt daran, dass Du eine Konstante verwendet hast und nicht die Zählervariable.
Statt:
itemX.SubItems(1) = GetIniString(strSection, Key(i), "", INIFile)
so
itemX.SubItems(i) = GetIniString(strSection, Key(i), "", INIFile)
das i kann man leicht mit 1 verwechseln. | |
Re: Listview - | | | Autor: crosstravel | Datum: 07.07.14 22:18 |
| Hallo Blackbox,
da ist wirklich ein dummer Lapsus; danke für den Hinweis.
Gruss
Rainer | |
| 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 |
|
|
vb@rchiv CD Vol.6 vb@rchiv Vol.6
Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
Online-Update-Funktion Entwickler-Vollversionen u.v.m.Jetzt zugreifen Tipp des Monats sevZIP40 Pro DLL
Zippen und Unzippen wie die Profis!
Mit nur wenigen Zeilen Code statten Sie Ihre Anwendungen ab sofort mit schnellen Zip- und Unzip-Funktionen aus. Hierbei lassen sich entweder einzelnen Dateien oder auch gesamte Ordner zippen bzw. entpacken. Weitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|