salasanan ja tunnuksen pitää olla oikein?
Private Sub Command1_Click()
If LCase$ = (Text1.Text) = "salasana" Then
MsgBox "oikein"
Else
msgox "salasana väärin!"
End If
If LCase$ = (Text2.Text) = "tunnus" Then
MsgBox "oikein"
Else
msgox "tunnus väärin!"
End If
end sub
miten tän vois yhdistää
siten että
1
273
Vastaukset
- xxxxx
Private Sub Command1_Click()
If LCase$ = (Text1.Text) = "salasana" and LCase$ (Text2.Text) = "tunnus" Then
MsgBox "oikein"
Else
msgox "salasana väärin!"
End If
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Silmienvääntelijä-persut pääsivät Japanissa sarjakuvaan
Torille! https://www.hs.fi/kulttuuri/art-2000011943173.html1795012Nato kaatamassa Petterin haaveileman Tunnin junan?
Nato edellyttää pohjoisessa Jäämereltä Rovaniemelle saakka kapearaitesta suoraa rautatieväylää, joka maksaa paperirahaa,204418Donald Trump pääsi samalle listalle Sanna Marinin kanssa
Eli vasemmistolaisen Time-median top 100 jännäihmisten listalle. https://time.com/collections/time100-next-2021/593769993117Älkää vaan sairastuko syöpään Suomessa
Tilaston mukaan Suomi, Slovakia ja Latvia lääkitsee aivan pohjamudissa syöpää. Sairastunutta hoidetaan edelleen vanhana2532962Kyllä, maata ei halua puolustaa nimenomaan punavihreän puolen edustajat
"Esimerkiksi maanpuolustushenki on keskimääräistä alempana naisten, arvoliberaalien, heikossa taloustilanteessa olevien1432902- 522511
- 271929
- 221767
- 351760
- 681751