Hi leute
Ich hab mir jetzt mal vorgenommen ein bisschen mit vb.net zu programmieren und wollte mit einem Hex2Dez-Programm anfangen.
Ha es eigentlich fertig aber ich wollte es so machen, dass wenn ich nach zwei Zeichen z.B. 7A (Hex) in der Textbox ein Leerzeichen mache und dass Programm dann auch automatisch ein Leerzeichen in der Ausgabe-Textbox der Dezimalzahl macht, aber ich krieg das nicht hin.
Im Moment ist es so dass wenn ich zwei hexa-zahlen eingebe er dann die richtige zahl ausgibt aber wenn ich zwei weitere hinzufüge gibt er eine 5-stellige zahl aus.Ich wollte es aber so machen, dass es nach jeder 2-ten hexa-zahl ein leerzeichen in beiden textboxen macht und die werte einezeln berechnet.
So ist es:
7A B6 (Hex)
31414 (Dez)
So soll es sein:
7A B6 (Hex)
122 182 (Dez)
Hier noch mein Code:
Public Class Form1
Private Sub Button_Berechen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_Berechen.Click
Dim s As String = ""
Dim value As Integer
s = TextBox_Hex.Text
value = Val("&h" & s)
End Sub
End Class
Ich hab mir jetzt mal vorgenommen ein bisschen mit vb.net zu programmieren und wollte mit einem Hex2Dez-Programm anfangen.
Ha es eigentlich fertig aber ich wollte es so machen, dass wenn ich nach zwei Zeichen z.B. 7A (Hex) in der Textbox ein Leerzeichen mache und dass Programm dann auch automatisch ein Leerzeichen in der Ausgabe-Textbox der Dezimalzahl macht, aber ich krieg das nicht hin.
Im Moment ist es so dass wenn ich zwei hexa-zahlen eingebe er dann die richtige zahl ausgibt aber wenn ich zwei weitere hinzufüge gibt er eine 5-stellige zahl aus.Ich wollte es aber so machen, dass es nach jeder 2-ten hexa-zahl ein leerzeichen in beiden textboxen macht und die werte einezeln berechnet.
So ist es:
7A B6 (Hex)
31414 (Dez)
So soll es sein:
7A B6 (Hex)
122 182 (Dez)
Hier noch mein Code:
Public Class Form1
Private Sub Button_Berechen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_Berechen.Click
Dim s As String = ""
Dim value As Integer
s = TextBox_Hex.Text
value = Val("&h" & s)
End Sub
End Class