vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 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
VB6: Namen mehrerer Textfelder gleichzeitig auslesen 
Autor: BenC
Datum: 10.09.04 15:41

Hallo,

ich habe auf einer Form 3 Textfelder (txtAN, txtCC, txtBCC).
Mit dem Code werden alle Textfelder auf den Inhalt hin untersucht und der Name des Textfeldes wird ausgelesen und in
einer Label ausgegeben. Wenn ich im jeweils einem Textfeld einen Wert stehen habe, dann klappt alles sehr gut.
Sobald ich z.B. in den Textfeldern txtAN und gleichzeitig txtCC stehen habe, dann wird nur der Name des Textfeldes txtAN angezeigt und nicht
beide gemeinsam (txtANtxtCC).
Frage:
Wie müsste der Code geändert werden, damit der Name (siehe BoxName) der Textfelder erscheint, in denen ein Wert steht (z.B. txtCCtxtBCC usw.)?

'Hier ein Ausschnitt meines Codes

Dim iAN As Integer, iCC As Integer, iBCC As Integer
Dim spAN() As String, spCC() As String, spBCC() As String
Private Textfelder As New Collection

spAN = Split(Me.txtAN.Text, ";")
spCC = Split(Me.txtCC.Text, ";")
spBCC = Split(Me.txtBCC.Text, ";")

'Befüllen der Collection
With Textfelder
.Add txtAN
.Add txtCC
.Add txtBCC
End With

Dim C As Control
Dim BoxName As String
BoxName = ""
For Each C In Textfelder
If C.Text <> "" And InStr(1, C.Text, "@") > 0 Then
BoxName = BoxName & C.Name
Exit For
End If
Next
lbltest.Caption = BoxName

Danke für alle Tipps im Voraus.

mfg
BenC
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
VB6: Namen mehrerer Textfelder gleichzeitig auslesen586BenC10.09.04 15:41
Re: VB6: Namen mehrerer Textfelder gleichzeitig auslesen272ModeratorDieter10.09.04 18:12
Re: VB6: Namen mehrerer Textfelder gleichzeitig auslesen276BenC11.09.04 17:58

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