Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Zahlen vergelichen in textbox
Autor: apo
Datum: 25.11.04 18:08
bevor du dir die finger wund tippst solltest du dir das hier nochma anschauen: Option Explicit Private Sub Text1_Change(Index As Integer) lblResult.Caption = Compare & " Übereinstimmungen" End Sub Private Sub Text2_Change(Index As Integer) lblResult.Caption = Compare & " Übereinstimmungen" End Sub Private Function Compare() Dim i As Integer Dim j As Integer Dim x As Integer For i = 0 To Text1.Count - 1 For j = 0 To Text2.Count - 1 If Text1(i) = Text2(j) Then x = x + 1 Next Next Compare = x End Function   damit sollte es um einiges weniger arbeit sein du musst ein textfeld auf der form erstellen, und das denn 5 mal kopieren dann erstellst du eine neues textfeld (keine kopie von den ersten 5!!) und kopierst dieses 10 mal, dann noch schnell das label gesetzt und umbenannt und schon sollte alles laufen mfg apo - DSL-Network.info - Deine DSL & Lan-Gaming Community! Anmelden und mitmachen. Kostenlos. www.DSL-Network.info

Zahlen vergelichen in textbox	513	dosman	25.11.04 15:49
Re: Zahlen vergelichen in textbox	249	Oliver_	25.11.04 17:37
Re: Zahlen vergelichen in textbox	245	apo	25.11.04 18:08
DAnke (ot) werds gleich mal testen	219	dosman	26.11.04 13:45

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