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
562
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
Jussi Halla-aho huolissaan Sofia Virrasta
Jussihan on vanha vihreä. Onko tässä kyse alkukesän kiimasta, kun aidan toisella puolella oleva vihreä alkaa kiinnostama897448Sofia Virta kadonnut....onko juomassa?
Virran poissaolo eduskunnasta on herättänyt huomiota. Esimerkiksi Ilta-Sanomat kertoi aiemmin, että Virta on ollut tällä1176179Julkista rahaa ei tule antaa senttiäkään yksityisille yrityksille
Julkinen raha on meidän yhteistä rahaa, ja se raha on tarkoitettu yhteiseen käyttöön, kuten esimerkiksi tuottamaan palve1584314Mitä tapahtui?
Mitä tapahtui keskiviikkoiltana kun oli paljon hälytysajoneuvoja ja mediheli?393022Tytti Tuppurainen: Suomen pakolaiskiintiö pitäisi nostaa 10 000 vuodessa
asia on faktaa, noin Tytti sanoi aiemmin. Kun taas Orpon hallitusohjelman mukaisesti Suomen pakolaiskiintiö on pudotettu2282951Ensin Henry Novak ja nyt sitten se Irlannin tapaus
jossa mustaihoinen afrikkalainen mieshenkilö puukottaa valkoihoista maassa makaavaa miestä useita kertoa pään alueelle.782866Halla-aho sivaltaa edustajantyöstään lintsaavaa Sofia Virtaa
https://www.iltalehti.fi/politiikka/a/937c74d7-f905-4466-b9b4-abd017fe5b63 Kansanedustajan on ilmoitettava poissaolosta882577Islamovasemmistolaisuus - tälläista termiä käytetään
Termi tarkoittaa alunperin äärivasemmiston ja muslimifundamentalistien liittoa, jonka ytimessä oli antisemitismi. Isl902318- 1862239
Ruotsissa uusi monikulttuurisuusongelma: Mummonraiskuut
Ilmiö räjähti käsiin ja nyt painetaan paniikkinappulaa. Moni vanhustenhoivayhtiö on joutunut jopa lopettamaan, koska keh151777