[Visual Basic 2010 Express] Maximal Wert eines Integers

Berdi · 28. Oktober 2019, 21:17

Hey gibt es eine Möglichkeit bei Integern einen maximalen Wert festzulegen?

petaod · 28. Oktober 2019, 21:25

Bei der Eingabe?
NumericUpDown

Berdi · 28. Oktober 2019, 21:47

Ich weiß net was du meinst mein Code ist:

VB.NET-Quellcode

Private Sub BFüttern_click(sender As System.Object, e As System.EventArgs) Handles BFüttern.Click
Dim GesundheitAnzahl As Integer = CInt(Gesundheit.Text) 'Gesundheit und Freude sind Label
Dim FreudeAnzahl As Integer = CInt(Freude.Text)
FreudeAnzahl = CInt(Freude.Text) 'Wert des Labels laden
FreudeAnzahl += 1 'Erhöhe um 1
Freude.Text = CStr(FreudeAnzahl) 'Wert zurückschreiben
GesundheitAnzahl = CInt(Gesundheit.Text) 'Wert des Labels laden
GesundheitAnzahl += 1 'Erhöhe um 1
Gesundheit.Text = CStr(GesundheitAnzahl) 'Wert zurückschreiben
End Sub

Und jetzt will ich das Gesundheit und Freude einen maximal Wert haben so 100 oder so

RodFromGermany · 29. Oktober 2019, 06:04

@Berdi Schmeiß den Code und die GUI dazu weg und nimm mehrere NumericUpDown-Controls.
Die haben ein .Minimum und ein .Maximum und feddich.

VaporiZed · 29. Oktober 2019, 08:19

Wenn es um eine codeseitige Begrenzung geht, dann fehlen wohl Grundlagen:
If GesundheitAnzahl < 100 Then GesundheitAnzahl += 1
oder kürzer und »more sophisticated«: GesundheitAnzahl = Math.Min(100, GesundheitAnzahl + 1)

exc-jdbi · 29. Oktober 2019, 08:39

Wenn codeseitig, dann würde ich sogar eine Const einführen.

VB.NET-Quellcode

Private Const FREUDEMIN As Int32 = 0
Private Const FREUDEMAX As Int32 = 100
Private Const GESUNDHEITMIN As Int32 = 0
Private Const GESUNDHEITMAX As Int32 = 100

Frendliche Grüsse

exc-jdbi

mrMo · 29. Oktober 2019, 19:16

Sofern vorhanden. In den Properties einer Klasse könnte man im Setter dies prüfen und behandeln.

petaod · 29. Oktober 2019, 19:55

Ich bin nach wie vor für ein NumericUpDown.
Und auch wenn @RodFromGermany das in Post #4 etwas drastisch formulierte: Er hat recht.
Jedenfalls ist das hundert mal eleganter, als die Eingabe mühevoll in irgendwelchen Events zu pasrsen.

Berdi · 29. Oktober 2019, 21:20

Das Thema ist erledigt danke für eure Antworten aber ich habe eine Lösung gefunden

EaranMaleasi · 29. Oktober 2019, 21:29

Wärst du so gut, und würdest uns deine Lösung mitteilen?

[Visual Basic 2010 Express] Maximal Wert eines Integers

[Visual Basic 2010 Express] Maximal Wert eines Integers

VB.NET-Quellcode

VB.NET-Quellcode

Benutzer online 1

Tags

Ähnliche Themen

7 Benutzer haben hier geschrieben