apua Yritän tehdä ensimmäisä ohjemiani Visualilla. onglema Kun laskimelle syöttää oikeita arvoja se toimii. Jakaa kolmosen nelosella jne.. Jos syöttää nollan, se ilmoittelee, että nollalla ei voi jakka Mutta jos ei syötä mitään ja suorittaa, homma ei pelitä... Haluaisin saada ilmoituksen syötä luku jakajaan vaan miten.. eli miten korjaan tämän: Sub Command4_Click (Index As Integer) Dim msg msg = "valitse toinen luku" If luku2 = 0 Then MsgBox msg ElseIf luku2 0 Then tulos = Val(luku1) / Val(luku2) End If End Sub
EnsiyritysLaskin
PeetXcXX
1
665
Vastaukset
- Petri_Petri
Kai olet määritellyt, että Luku2 on numero. Esim. dim Luku2 as integer Syöttökenttään syötetään tekstiä ja sen saa numeroksi val-funktiolla. Esim. Luku2=val(TextBox1.Text) ElseIf-käskyssä on ehto turhaan, sillä nollaa testaat jo ekassa if-ehdossa. Joten muuta elseif-rivi pelkäksi else-käskyksi.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Tykkään sinusta tosi tosi paljon
Siksi en pysty sisäistämään sitä, että se ei ole molemminpuolista. Sattuu liikaa. En osaa käsitellä sitä tunnetta, koska513487- 1562109
Kaupan kassalla kannataa olla kylmä käytös
https://www.is.fi/taloussanomat/art-2000010488540.html "19-vuotias Minja ja 59-vuotias Anne työskentelevät sillä todelli2061805Mitä tehdä asialle?
Jos laitan deitti-ilmon "40-vuotias nainen etsii seuraa" niin ketään ei kiinnosta (korkeintaan paria runkkaripenaa joill1341716- 801165
- 2341104
Mitä helvettiä pakolaisille pitäisi tehdä RAJALLA?
Jos Venäjä työntää rajalle pakolaisia ja tekee Suomelle selväksi että heidän puolelleen ei ole pakolaisilla asiaa - mitä2851071- 130999
Olen pahoillani mies
Olen surullinen puolestasi, ettet saanut kaipaamaasi naista. Yrititkö lopulta edes? Teistä olisi tullut hyvä pari52939- 72895