Sen siita saa kun ei mene ohjelmoinnin tunneille. Nyt pitaisi koodia vaantaa tehtavaan ja en muista yhtaan mitaan. Voisiko joku ystavallinen sielu kertoa minka mina olen tuosta If -lauseesta unohtanut kun koko ajan huudetaan "Excepted end of statement" ?
Option explicit
Sub cmdCheckGrade_OnClick()
Dim intGrade1 as integer
Dim intGrade2 as integer
Dim intGrade as integer
Dim intTotalMark as integer
intGrade1 = txtFirst.value
intGrade2 = txtSecond.value
intGrade3 = txtThird.value
If intGrade1 < 0
Then MsgBox"Input Error"
Elseif
intTotalMark = intGrade1 intGrade2 intGrade
MsgBox "Your total mark is "& intTotalMark
End If
Mina en nae (VBScript)
4
500
Vastaukset
- EnfIf
mun mielestä puuttuu yksi end if
- ripsuli
Kannattais käydä kyllä tunneilla....
If intGrade1 < 0 then
MsgBox("Input Error")
Else
intTotalMark = intGrade1 intGrade2 intGrade
MsgBox("Your total mark is ") & intTotalMark
End If- toope
Joo, tiedan. Uusintaan taitaa menna. Kiitos kuitenkin.
If intGrade1 < 0
Then MsgBox"Input Error"
Elseif
intTotalMark = intGrade1 intGrade2 intGrade
MsgBox "Your total mark is "& intTotalMark
End If
if lauseessa then samalle riville kuin If, elseif tarvitsee myös then (suorittaa vertailun) ja vertailu If rivin tapaan samalle riville. jos ei uutta vertailua niin pelkkä else.
If intGrade1 < 0 Then
MsgBox = "Input Error"
Else
intTotalMark = intGrade1 intGrade2 intGrade
MsgBox = "Your total mark is "& intTotalMark
End If
...näin nopeastikatsottuna :)
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Lataus pakkaskelissä
En olisi koskaan ostanut sähköautoa jos olisin tajunnut että ne eivät lataa pakkasissa suurteholatauksella vaan istut tu1214550Kun väestö ikääntyy ja veronmaksajat vähenee, mitä sitten vasemmistolaiset?
Maahanmuutto ei vaan ole ratkaisu väestön ikääntymiseen. Maahanmuutto lykkää ja hidastaa väestön ikääntymistä ja työv692632Miksei Trump ole kiinnostunut Suomen valloittamisesta?
Täällähän on enemmän turvetta kuin Norjalla öljyä. Eikö Ttump ole turvenuija?801665Kyllä mä suren
Sitä että mikään ei ole kuten ennen. Ei niitä hetkiä ja katseita. Toisaalta keho lepää eikä enää tarvitse sitä tuskaa ko91146- 66872
- 21853
- 41845
Olet mies aika ailahteleva luonteeltasi
Olen nähnyt kuinka olet iloinen, sosiaalinen ja osallistuva. Autat ja kannustat muita. Ja sitten olen nähnyt kuinka istu120833Yhteen hiileen velanottoveljet V P K
Tytäryhtiöissä palaa julkista rahaa ja vastuuttomuuden takia -ei pakollisten -kuntalain edellyttämien asioiden takia! N67807Olisin valmis tutustumaan uudelleen
En menneisyyden kautta vaan haluaisin tutustua ihmiseen, jollaiseksi olet kasvanut.50789