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
442
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
Ja taas ammuttu kokkolassa
Kokkolaisilta pitäisi kerätä pois kaikki ampumaset, keittiöveitset ja kaikki mikä vähänkään paukku ja on terävä.726348- 1385772
Helena Koivu on äiti
Mitä hyötyä on Mikko Koivulla kohdella LASTENSA äitiä huonosti . Vie lapset tutuista ympyröistä pois . Lasten kodista.4863654Ovatko naiset lopettaneet sen vähäisenkin vaivannäön Tinderissa?
Meinaan vaan profiileja selatessa nykyään valtaosalla ei ole minkäänlaista kirjoitettua tekstiä siellä. Juuri ja juuri s1202059- 391361
Suomi vietiin Natoon väärin perustein. Viides artikla on hölynpölyä. Yksin jäämme.
Kuka vielä uskoo, että viides artikla takaa Suomelle avun, jos Suomeen hyökätään. Liikuttavasti täällä on uskottu ja ved4021345- 731173
Sydämeni on sinun luona
Koko ajan. Oli ympärilläni ketä oli niin sinä olet vain ajatuksissa ja tunteissa. En halua muiden kosketusta kuin sinun471034Trump ja Venäjä
Huomasitteko muuten... Käytännössä ainoat valtiot, joille Trump EI eilen asettanut typeriä tariffejaan, olivat Venäjä ja110952Jatkuva stressitila
On sinun vuoksesi kun en tiedä missä mennään mutta tunteeni tiedän ainoastaan56950