vb@rchiv · Diskussionsforen · Forschleife mit If- Bedingung

VB Classic
VB.NET
ADO.NET
VBA
C#

sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!

HOME WORKSHOPS TIPPS & TRICKS BEFEHLSREFERENZ API-REFERENZ FAQ

··· FORUM

Forenübersicht Suchen Forumsregeln

Allgemeine Foren

Allgemeine Fragen Fragen zur vb@rchiv CD Tipps & Workshops Suche VB Code

VB.NET, C#

Ein-/Umsteiger Fortgeschrittene ADO.NET/Datenbanken ASP.NET/WebServices C# Ecke

VB Classic 5/6, VBA

Einsteiger Fortgeschrittene ActiveX Datenbanken Windows API VB Skript (VBS)

Sonderforen

sev-Komponenten Jobs Suche/Gesuche Projekte & Betatester

DOWNLOAD TOOLBESPRECHUNG BÜCHERECKE MARKETPLACE GRAFIK & DESIGN VB-SEITEN

[332 User online]
[307 im Forum]

Partnerseiten
Top 5 Partnerlinks

Weitere...

Entwickler / Welt

··· Diskussionsforen · Visual-Basic Einsteiger

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

Visual-Basic Einsteiger

Forschleife mit If- Bedingung

Autor: Andrew
Datum: 10.01.02 21:08

Hallo nochmal, bei dieser Forschleife akzeptiert er einfach nicht " End If ", Er sagt dann: End If ohne If-Block Woran liegt das oder wie muss ich es richtig machen ? Der Code: Private Sub Testen_Click() bytLänge = Len(Eingabe) strKleinABC = LCase(Eingabe) For bytNummer = 1 To bytLänge strVorne = Mid(strKleinABC, bytLänge, 1) strHinten = Mid(strKleinABC, ((bytLänge + 1) - bytNummer), 1) If strHinten <> strVorne Then blnAusgabeWert = False End If <= Hier sagt er immer: Fehler beim Kompilieren End If ohne If-Block Das ist doch quatsch, If Block ist doch da !! Next bytNummer If blnAusgabeWert = True Then Interesponse = MsgBox("Dieses Wort ist ein Palindrom, Gratulation !", vbInformation + vbOKOnly, " Testergebnis !!! ") Else Interesponse1 = MsgBox("Dieses Wort ist leider kein Palindrom !!!", vbCritical + vbOKOnly, " Testergebnis !!! ") End If End Sub Danke im Voraus

alle Nachrichten anzeigen

Gesamtübersicht | Zum Thema | Suchen

Thema

Views

Autor

Datum

Forschleife mit If- Bedingung	53	Andrew	10.01.02 21:08
Re: Forschleife mit If- Bedingung	317	Dieter	10.01.02 21:13
Re: Forschleife mit If- Bedingung	31	Moni	10.01.02 21:17
Sehr schön erklärt, Moni (oT)	324	Dieter	10.01.02 21:28
Danke Dieter ...	28	Moni	10.01.02 21:39
Superheißen Dank, aber...	28	Andrew	10.01.02 21:54
Re: Superheißen Dank, aber...	282	unbekannt	10.01.02 22:29
Ups, kleine Korrektur ...	268	unbekannt	10.01.02 22:37
Tausend Dank (o.T.)	28	Andrew	11.01.02 10:09

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

sevGraph (VB/VBA)

Grafische Auswertungen
Präsentieren Sie Ihre Daten mit wenig Aufwand in grafischer Form. sevGraph unterstützt hierbei Balken-, Linien- und Stapel-Diagramme (Stacked Bars), sowie 2D- und 3D-Tortendiagramme und arbeitet vollständig datenbankunabhängig!

Weitere Infos

Tipp des Monats

November 2025
Heinz Prelle

Datei-Mehrfachauswahl an eine ListBox übergeben

Dieser Tipp zeigt, wie Sie über den Windows-CommonDialog eine Mehrfach-Dateiauswal realisieren...

Details

TOP Entwickler-Paket

TOP-Preis!!
Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1866.50 EUR...

Jetzt nur 979,00 EUR
Weitere Infos

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