Kleine Programm..... Hilfe erbeten
lima-city → Forum → Programmiersprachen → Basic
all
auftauchen
auslese
bank
beginn
code
computer
folgende prozedur
item
kleine frage
list
liste
problem
programm
prozedur
registrierung
sagen
sender
string
system
-
Hallo @all
IIch möchte gerne das dass Progamm zu beginn des Startes die werte aus einer txt list und dann mit der Registd. überprüft wenn das objekt da dann soll dieser Wert in einer Listbox Ausgegeben werden. Wenn man dann auf ein Wert klickt sollte dann der key zu sehen sein.
vlt kann mir jemand folgen so wie eine Keyfinder
Mfg Simsobjekt -
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage
-
Hast du vielleicht schon konkret irgendwelche Probleme? So allgemein wie du formuliert hast ist es schwierig, dir zu helfen.
Lg Joe -
Naja ein Win32-Programm unter VB.NET für ja bekannterweise zu allererst beim Start folgende Prozedur aus:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'Auszuführender Code End Sub
Jetzt lässt du eben mit der einen Prozedur die Txt auslesen, z.B.:
Dim S As String = My.Computer.FileSystem.ReadAllText("Dateipfad")
Und dann evtl. mit Split an einem bestimmten Trennzeichen, z.B. "," unterteilen (in ein Array):
Dim newS() As String = s.Split(",")
Nun kannst du den Inhalt des Arrays in die ListBox einfügen:
For Each Value As String In NewS ListBox1.Items.Add(Value) Next
Der Gesamte Quellcode:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim S As String = My.Computer.FileSystem.ReadAllText("Dateipfad") Dim newS() As String = s.Split(",") For Each Value As String In NewS ListBox1.Items.Add(Value) Next End Sub
-
Danke genau das was ich brauchte. Und noch eine kleine Frage:
bevor die Werte in der Listbox auftauchen soll, soll zuerst sie Überprüft werden ob sie in der Registerdatenbank vorhanden ist.
Ja = in der Liste
nein = nicht in der Liste
Wenn man dann der Wert aus Listbox wählt soll dann der Wert vom dem Register Key in einer Textbox auftachen
Hoffe das ich das jetzt nicht zu schwierig beschrieben habe:-)
lg Simsobjekt -
Registerdatenbank?
Meinst du die Registrierung vom PC?
Dann versuchs mal mit einem Befehl aus
My.Computer.Registry.irgendeinBefehlInDieserRubrik
mfg
htnipdb
P.S.: Natürlich dann sowas wie
If My.Computer.Registry.Exists('Was weiß ich')
P.P.S.: Das waren jetzt keine konkreten bzw. richtigen Code-Beispiele, da ich gerade im Urlaub bin und kein MVSB habe. -
Dankeschön!
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim S As String = My.Computer.FileSystem.ReadAllText("Dateipfad") Dim newS() As String = s.Split(",") If My.Computer.Registry.Exists(newS) Then ListBox1.Items.Add(Value) end if End Sub
so habe ich das jetzt gemacht und wie kann ich denn "Wert" aus der Bank auslesen wenn ich in der Listbox den Wert auswähle (ausgabe in einer Textbox)
lg Simsobjekt -
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage