vb@rchiv · Diskussionsforen · Case und IFELSE funktionieren nicht · VB.NET

VB Classic
VB.NET
ADO.NET
VBA
C#

NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!

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

[212 User online]
[178 im Forum]

Partnerseiten
Top 5 Partnerlinks

Weitere...

Entwickler / Welt

··· Diskussionsforen · VB.NET - Ein- und Umsteiger

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

VB.NET - Ein- und Umsteiger

Case und IFELSE funktionieren nicht

Autor: Team-Hanzlik
Datum: 16.04.12 18:17

Hallo zusammen. Ich habe in meinem Programm, dass mehr als 2 Abfragen hat zuerst mit IF Then Else (IFELSE) die Abfrage gemacht und dann mit SELECT CASE. Bei beiden ist das Ergebnis das gleiche. Es wird das erste Kriterium ausgegeben. Kann mir jemand helfen. Es kann nur an meinem Code liegen, jedoch finde ich den Fehler nicht. Nachfolgend der betreffende Code in VB.NET 2010 Ultimate. 'If lblAusBMI.Text > 40 Then ' lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und Sie haben Adipositas (Grad 3)." 'ElseIf lblAusBMI.Text > 35.1 Or lblAusBMI.Text < 40.0 Then ' lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und Sie haben Adipositas (Grad 2)." 'ElseIf lblAusBMI.Text > 30.1 Or lblAusBMI.Text < 35.0 Then ' lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und Sie haben Adipositas (Grad 1)." 'ElseIf lblAusBMI.Text > 25.1 Or lblAusBMI.Text < 30.0 Then ' lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und Sie haben Übergewicht." 'ElseIf lblAusBMI.Text > 19.1 Or lblAusBMI.Text < 25.0 Then ' lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und haben Normalgewicht." 'ElseIf lblAusBMI.Text < 19.0 Then ' lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und haben Untergewicht." 'End If Select Case Auswertung Case lblAusBMI.Text > 40 lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und Sie haben Adipositas (Grad 3)." Case lblAusBMI.Text > 35.1 Or lblAusBMI.Text < 40.0 lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und Sie haben Adipositas (Grad 2)." Case lblAusBMI.Text > 30.1 Or lblAusBMI.Text < 35.0 lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und Sie haben Adipositas (Grad 1)." Case lblAusBMI.Text > 25.1 Or lblAusBMI.Text < 30.0 lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und Sie haben Übergewicht." Case lblAusBMI.Text > 19.1 Or lblAusBMI.Text < 25.0 lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und haben Normalgewicht." Case lblAusBMI.Text < 19.0 lblAusgabe.Text = "Sie haben einen BMI von " & lblAusBMI.Text & " und haben Untergewicht." End Select Vielen Dank im voraus.

alle Nachrichten anzeigen

Gesamtübersicht | Zum Thema | Suchen

Thema

Views

Autor

Datum

Case und IFELSE funktionieren nicht	1.848	Team-Hanzlik	16.04.12 18:17
Re: Case und IFELSE funktionieren nicht	1.306	effeff	16.04.12 18:34
Re: Case und IFELSE funktionieren nicht	1.286	Team-Hanzlik	16.04.12 18:37
Re: Case und IFELSE funktionieren nicht	1.290	Manfred X	16.04.12 18:41
Re: Case und IFELSE funktionieren nicht	1.369	Team-Hanzlik	16.04.12 18:49
Re: Case und IFELSE funktionieren nicht	1.272	Manfred X	16.04.12 18:51
Re: Case und IFELSE funktionieren nicht	1.272	Team-Hanzlik	16.04.12 18:54
Re: Case und IFELSE funktionieren nicht	1.301	Team-Hanzlik	16.04.12 18:56
Re: Case und IFELSE funktionieren nicht	1.246	Manfred X	16.04.12 19:02
Re: Case und IFELSE funktionieren nicht	1.273	Team-Hanzlik	16.04.12 19:06
Re: Case und IFELSE funktionieren nicht	1.309	Manfred X	16.04.12 19:15
Re: Case und IFELSE funktionieren nicht	1.259	Team-Hanzlik	16.04.12 19:17
Re: Case und IFELSE funktionieren nicht	1.287	DotNetErbse	17.04.12 10:22
Re: Case und IFELSE funktionieren nicht	1.299	Team-Hanzlik	17.04.12 12:12
Re: Case und IFELSE funktionieren nicht	1.250	Manfred X	17.04.12 15:59
Re: Case und IFELSE funktionieren nicht	1.263	DotNetErbse	17.04.12 16:23
Re: Case und IFELSE funktionieren nicht	1.379	Team-Hanzlik	17.04.12 18:51
Re: Case und IFELSE funktionieren nicht	1.264	Team-Hanzlik	17.04.12 18:55
Re: Case und IFELSE funktionieren nicht	1.249	FZelle	17.04.12 23:31
Re: Case und IFELSE funktionieren nicht	1.260	Team-Hanzlik	18.04.12 11:30
Re: Case und IFELSE funktionieren nicht	1.275	Team-Hanzlik	17.04.12 18:48

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

sevZIP40 Pro DLL

Zippen und Unzippen wie die Profis!
Mit nur wenigen Zeilen Code statten Sie Ihre Anwendungen ab sofort mit schnellen Zip- und Unzip-Funktionen aus. Hierbei lassen sich entweder einzelnen Dateien oder auch gesamte Ordner zippen bzw. entpacken.

Weitere Infos

Tipp des Monats

Mai 2024
Hermann Röttger

Wochentage eines Datumsbereichs ermitteln

Wochentage eines Datumsbereichs ermitteln, optional mit Feiertagsberechnung

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 1605.50 EUR...

Jetzt nur 599,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