miten saa tästä kaikki nappulat toimimaan erin lailla?
Private Sub Form_Load()
Dim Arvo As Integer
Arvo = MsgBox("jotain", 4, "jotain")
End Sub
kyllä ja ei nappulat ja miten saisin ne toimimaan siten että ei nappula sulkee ohjelman ja kyllä avaa?
(tulee heti kun ohjelma alkaa)
help mEEEEEEEEEEEEEE!!!!!!!!!!!!!!!!!!!!!!!!!
kysymys?
1
275
Vastaukset
- vbkutosella
En ymmärtänyt kysymystä, mutta tarkoittanet että kyseinen ohjelma loppuu.
Private Sub UserForm_Initialize()
Dim i As Long
i = MsgBox("Aloitetaanko ?", vbYesNo, "Startti")
If i = vbNo Then
Application.Quit
End If
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Tukalaa kuumuutta
Tietäisitpä vaan kuinka kuumana olen käynyt viime päivät. Eikä johdu helteestä, vaan sinusta. Mitäköhän taikoja olet teh433007Ensi kesänä
Näin kesän viimeisenä minuutteina ajattelen sinua. Olisiko seuraava kesä "meidän" kesä? Tänä vuonna ei onnistuttu, mutta612961- 422367
- 311863
Okei, myönnetään,
Oisit sä saanut ottaa ne housutkin pois, mutta ehkä joskus jossain toisaalla. 😘251719Anne Kukkohovin karmeat velat ovat Suomessa.
Lähtikö se siksi pois Suomesta ? Et on noin kar? mean suuret velat naisella olemassa721674- 481586
Mihin hävisi
Mihin hävisi asiallinen keskustelu tositapahtumista, vai pitikö jonkin Hannulle kateellisen näyttää typeryytensä771275- 371247
- 791070