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
289
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
Vain vasemmistolaiset rakennemuutokset pelastavat Suomen
Kansaa on ankeutettu viimeiset 30+ vuotta porvarillisella minäminä-talouspolitiikalla, jossa tavalliselta kansalta on ot273425Persut huutaa taas: "kato! muslimi!"
Persut on lyhyessä ajassa ajaneet läpi kaksi työntekijöiden oikeuksien heikennystä, joita se on aiemmin vastustanut. Pe132828- 282504
- 421927
- 531779
- 151760
- 451626
KL: Mari Hynynen avoimena - Jouni-rakkaan ja Joel-pojan välit ovat nämä!
Mari Hynynen (ent. Perankoski) on naimisissa Jouni Hynysen kanssa. Marilla on edellisestä liitosta yksi lapsi, Joel Vola101468- 541444
Missikohu edustaa nykyajan monimuotoisuutta
Puolesta vai vastaan, saako esittää pilkkaavasti jonkun toisen ihmisen syntyperäisiä ominaisuuksia? Kadulla vastaan tule2641164