Abfrage zur TextBox

02/14/2013 16:12 He3o Sippel#1
Hey,

ich wollte eine Abfrage machen ob :

Die Zahlen in der Textbox kleiner als 1 sind.

Code:
 Private Sub bt1w_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt1w.Click
        If tb1.Text > 1 Then
            timer1.Start()
        End If
        MsgBox("Sie müssen richtig eingeben viele sie möchten.")
    End Sub

Wenn ich das so mache kommt : Üngultige Konventierung von der Zeichenfolge in Typ B.



Dies zu meiner ersten Frag dannoch.

Ist möglich ein Bild in eine MsgBox zu machen ? Denn ich wollte am Ende des Timers(Progressbar) ein Bild öffnen lassen.



Mfg Sippel
02/14/2013 16:14 DyNeXo#2
Wenn in die textbox nur zahlen eingeben werden sollen lese sie doch in nen Interger ein. und lass die inter auswerten über das event text change oder keypress
02/14/2013 17:49 He3o Sippel#3
Danke dir jedoch noch die Frage :

Ich will das am Ende des Progressbars sich ein Fenster mit einem Bild öffnet wie geht das ?
02/14/2013 17:52 Popicker#4
Der Inhalt der Text Property ist eine Zeichenkette. Diese kannst du logischerweise nicht mit einer Zahl vergleichen. Also musst du diese erst in den entsprechenden Datentypen umwandeln. Ich bin mir nicht sicher wie das bei VB.NET geht, doch in C# könnte es so aussehen

Code:
int val = 0;
if(int.TryParse(tb1.Text, out val))
{
    if(val > 1) timer1.Start();
    else MessageBox.Show("Fehlermeldung");
}
else
{
    MessageBox.Show("Ungültige Eingabe");
}
Ist nur ein Beispiel und blind getippt.
02/14/2013 18:16 adistoe#5
PHP Code:
If Progressbar.Value = Progressbar.Maximum Then
     FormMitBild.Show()
End If 
FormMitBild = Eine neue Form mit dem Bild drin.
02/15/2013 01:54 #SoNiice#6
Weiß gerade nicht ob das so richtig wäre, da ich kein VB kann, daher bin ich mit dem Syntax nicht zu 100% vertraut, aber so ähnlich sollte es sein:

Code:
Try
	if Convert.ToInt32(textBox1.Text) < 1 Then
		MsgBox("Deine Eingabe ist unter 1!");
	End If
Catch
	MsgBox("Deine Eingabe bestand nicht nur aus Zahlen!",);
End Try
Habe es mal versucht grob aus C# zu übersetzen mit meinen VB Minimalkenntnissen.
02/15/2013 02:23 tolio#7
ich würde wenn möglich drauf verzichten eine exception zu werfen. zB so:

Code:
if isnumeric(txtText.text) = true then
   if cint(txtText.text) > 1 then
      sonstwas.start
   else
      msgbox("zahl über 0 eingeben!")
   end if
else
   msgbox("bitte nur zahlen eingeben")
end if