Miten voin tehdä laskurin Visual Basic 6.0. Pitäis saada laskin jossa on valinnat yhteen, vähennys, kerto ja jakolaskulle. Miten kirjoitan kaavat?
Miten?
Aloittelija
1185
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 1
Vanhimmat
dim a as double
dim b as double
dim c as double
dim op as string
a=inputbox("luku 1")
op=inputbox("laskuoperaattori , -, *, /")
b=inputbox("luku 2")
select case op
case " "
c=a b
case "-"
c=a-b
case "*"
c=a*b
case "/"
if b0 then
c=a/b
else
messagebox("Nollalla jako!!!")
end if
case else
messagebox("Tuntematon operaattori")
end select
messagebox("laskun tulos=" & c)