VBScript Probleme

hallo Leute.
Ich hab Probleme beim Schreiben eines Rechners mit VBScript.
also ich hab zuerst folgendes geschrieben:

option explicit
dim x
Const Default="Hier Eingeben"

x=Inputbox("Geben Sie bitte die Rechnung hier unten ein. " , "Rechner" , Default)

Und jetzt will ich dass das Script das ausführt und danach mit msgbox oder wscript.echo(oder was auch immer) ausgibt,
was ich in inputbox reingeschrieben habe.
D.h. wenn ich 6+3 eingegeben habe,dann das Script folgendes macht :

wscript.echo "6+3= " & 6+3.

Ich hab schon mit:
msgbox x
versucht.Aber dann wird das ausgegeben, was ich reingeschrieben habe,aber das will ich ja nicht.

 

10000000000000000000000000000000000000000000000000000
mio mal danke.

 

.\' sein, läßt sich aber in der Regel durch Ersetzen korrigieren), andererseits aber die (korrekte) Punkt-vor-Strich-Regel einsetzt und auch andere Funktionen wie zB sin(45) auswerten kann.

Grüße,
Christoph

 

mit dieser zeile hab ich das problem gelöst.
msgbox "zahl1+zahl2= " & Clng(Clng(zahl1)+clng(zahl2))

 

das mit dem + ist irgendwie nachvollziehbar. Wenn das dein Komplettes Script ist, dann fehlt die Routine für Plus. Oder wie hast du das realisiert? Mich wundert, dass be + eine Ausgabe erscheint

Gruß
André

P.S. Nein, ich hab kein MSN (halleluja)

 

weil ich 1.keine lust habe xp zu installieren (hab zur zeit 98) 2. ich mich mit VB noch nicht ganz gut auskenne wie mit VB Script.

Aber jetzt hab ich mit folgenden Zeilen das Problem gelöst:

dim zahl1
dim zahl2
dim zeichen

zahl1=inputbox("Bitte geben Sie die erste Zahl hier ein " , "Der Rechner" , "Hier eingeben")
zahl2=inputbox("Bitte geben Sie die zweite Zahl hier ein " , "Der Rechner" , "Hier eingeben")
zeichen=inputbox("Bitte geben Sie das Zeichen hier ein " , "Der Rechner" , "Hier eingeben")

if zeichen="/" then
msgbox "Zahl1/Zahl2= " & zahl1/zahl2
else
if zeichen="-" then
msgbox "zahl1-zahl2= " & zahl1-zahl2
else
if zeichen="\" then
msgbox "zahl1\zahl2= " & zahl1\zahl2
else
if zeichen="mod" then
msgbox "zahl1 mod zahl2= " & zahl1 mod zahl2
else
if zeichen="^" then
msgbox "zahl1^zahl2= " & zahl1^zahl2
else
if zeichen="*" then
msgbox "zahl1*zahl2= " & zahl1*zahl2

end if
end if
end if
end if
end if
end if

Aber da sind 2 neue Probleme gekommen.
1. ich kann nur Rechnungen mit 2 Rechnenelemente berechnen, und nicht mehr.D.h. ich kann nicht 6+6+6 rechnen weil ich nur 2 inputbox habe.Aber dieses Problem kann ich lösen, indem ich mehr inputbox reintue.
2.ich kann keine Addition ausführen.denn statt 5 + 6 =11 wird
5 + 6 = 56 ausgegeben.

hast du msn?

 

nachträge: In eine Inputbox kommen in deinem Fall (du willst eingeben 6+3) nur eine Variable x vom Typ String in Frage.
Bei einem String kannst du NICHT arethmethische Operationen durchführen.
Cleverere Lösung: 2 Inputboxen, jeweils für einen Summanden. d.h. zwei Variablen (x und y) und diese dann addieren lassen.
Und deine Idee mit wscript.echo "6+3= & 6+3 hakt an einer Sache: egal welche Rechnung du eingeben würdest, er würde immer nur 6+3 rechnen, also 9

P.S. Wieso nutzt du VBScript? Du sagtest doch mal, du hättest VStudio .NET, da ist VB bei, damit geht das etwas einfacher (finde ich)
Gruß
André

 

Bei vbscrip bin ich mir nicht sicher, aber musst du eine variable nicht nur beim namen, sondern auch beim Typ deklarieren? in deinem Fall: dim x as Integer
und die korrekte Schreibweise des msgbox Befehls lautet (in deinem Fall) : msgbox (x)

Gruß
André