Visual Basic Problem!

Diskutiere Visual Basic Problem! im Developer Network Forum im Bereich Hardware & Software Forum; Also ich verwend die Visual Basic ExpressEdition 2008 und hab da ein einfach Progie nach einem Tutorial geschrieben, dass nach eingabe von Höhe...
  • Visual Basic Problem! Beitrag #1
W

Windwalker

Bekanntes Mitglied
Dabei seit
14.05.2006
Beiträge
104
Reaktionspunkte
0
Also ich verwend die Visual Basic ExpressEdition 2008 und hab da ein einfach Progie nach einem Tutorial geschrieben, dass nach eingabe von Höhe, Breite und Länge das Volumen und die Oberfläche von Rechtecken brechnet und ausgibt das hab ich nach dem Tutorial so gemacht:
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim Flaeche As Integer
Dim Volumen As Integer
Dim Ergebnis As Integer

a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
Volumen = a * b * c
Flaeche = (2 * a * b) + (2 * b * c) + (2 * a * c)
Ergebnis = "Fläche: " + Str(Flaeche) + Chr$(13) + Chr$(10)
Ergebnis = Ergebnis + "Volumen: " + Str$(Volumen)
MsgBox(Ergebnis, 64, "Ergebnis")
End Sub
Dies entspricht genau dem Tutorial doch ich bekommen immer die Fehlermeldung:
Das Typzeichen "$" entspricht nicht dem deklarierten Datentyp "Char".

Danke im Vorraus! Mfg Wind
 
  • Visual Basic Problem! Beitrag #2
peterfido

peterfido

Bekanntes Mitglied
Dabei seit
16.02.2000
Beiträge
1.785
Reaktionspunkte
0
Ort
Berlin
Versuchs mal so. schein sich ein $ im Str(Volumen) eingeschlichen zu haben.
Ist allerdings aus dem Kopf, da ich VB 2008 nicht installeirt habe.

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim Flaeche As Integer
Dim Volumen As Integer
Dim Ergebnis As Integer

a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
Volumen = a * b * c
Flaeche = (2 * a * b) + (2 * b * c) + (2 * a * c)
Ergebnis = "Fläche: " + Str(Flaeche) + Chr$(13) + Chr$(10)
Ergebnis = Ergebnis + "Volumen: " + Str(Volumen)
MsgBox(Ergebnis, 64, "Ergebnis")
End Sub
 
  • Visual Basic Problem! Beitrag #3
cmddegi

cmddegi

Bekanntes Mitglied
Dabei seit
12.07.2001
Beiträge
4.740
Reaktionspunkte
0
Ort
Austria
Falls das Tutorial für eine ältere Version gedacht ist, könnte auch das das Problem sein. Bin mir nicht sicher, ob bei den .net-Versionen die alten Funktionen Str, Chr$ usw. noch funktionieren.
Sonst versuch mal statt
Chr$(13) + Chr$(10)
vbCrLf
und statt Str$(Volumen)
Convert.toString(Volumen)
 
Thema:

Visual Basic Problem!

ANGEBOTE & SPONSOREN

https://www.mofapower.de/

Statistik des Forums

Themen
213.179
Beiträge
1.579.172
Mitglieder
55.878
Neuestes Mitglied
Satan666
Oben