vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Zippen wie die Profis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Comboeinräge speichern 
Autor: Redo
Datum: 28.06.02 10:11

Hallo zusammen ,
ich habe ein Form(name= Kanalaktivierung) das 8 ComboBoxen enthält(ControlArray) und ein commandButton(btnini9 mit der Beschriftung "Übernehmen"
Private Sub btnini_Click()
Unload Me
End Sub
jeder von den ComboBoxen hat am Anfang den Text "Auswählen" und enthält beim FormLoad zwei Einträge "Mit Kalibrierung"
und "Ohne Kalibrierung".Da ich will daß nach dem Unload des Forms die Einträge ,die der Benutzer im ComboBox ausgewählt hat ,
gespeichert werden damit sie bei FormLoad wieder zu sehen sind.habe ich ein Funktion in einem Modul geschrieben,die Combosave heißt und hier ist sie:
Public comboeintr(0 To 7) As String
Public Function combosave()
Dim i As Integer
For i = 0 To 7
Kanalaktivierung.Combo1.Item(i).List(Kanalaktivierung.Combo1.Item(i).ListIndex) = comboeintr(i)
Kanalaktivierung.Combo1(i).Text = Kanalaktivierung.Combo1(i).List(0)
Next i
End Function
Diese Funktion wird beim FormLoad aufgerufen

Private Sub Form_Load()
Dim i As Integer
combosave
For i = 0 To 7
Combo1(i).AddItem "Mit Kalibrierung"
Combo1(i).AddItem "Ohne Kalibrierung"
Next i
End Sub

Private Sub Form_Unload(Cancel As Integer)
Dim j As Integer
For j = 0 To 7
comboeintr(j) = Combo1(j).List(Combo1(j).ListIndex)
Next j
End Sub
Leider wird nur die zuletzt gemachte Änderung am ComboBox wahrgenommenund nicht die Änderungen die Davor stattgefunden haben.
Für jeden Hilfe bin ich sehr Dankbar.
Gruß redo
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Comboeinräge speichern57Redo28.06.02 10:11
Wie wär's damit 217ModeratorDieter28.06.02 10:18
Danke aber noch was36Redo28.06.02 10:53
Re: Danke aber noch was278ModeratorDieter28.06.02 10:57
Re: Danke aber noch was35Redo28.06.02 11:12
Achso nur temporäre...239ModeratorDieter28.06.02 11:32
Jetzt Ok aber Problem mit btnübernehmen34Redo28.06.02 12:06
Uppss.. kleiner Schönheitsfehler209ModeratorDieter28.06.02 12:33
Re: Uppss.. kleiner Schönheitsfehler33Redo28.06.02 12:58
Vielen Danke es funktioniert(oT)30Redo28.06.02 13:20
Re: Comboeinräge speichern30Mario28.06.02 10:19

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 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