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
268
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
Tänään pyörit ajatuksissa enemmän, kun erehdyin lukemaan palstaa
En saisi, silti toivon että sinä vielä palaat ja otetaan oikeasti selvää, hioituuko särmät ja sulaudummeko yhteen. Vuod225124- 254278
- 272441
- 342234
- 371988
- 151908
En ole koskaan kokenut
Ennen mitään tällaista rakastumista. Tiedän että kaipaan sinua varmaan loppu elämän. Toivottavasti ei tarvitsisi vain ka191587- 121521
Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...
Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons211237Kerranki asiat oikein
Ilkka ja muut pienpuolueeet...teitte hyvän työn kun valitsitte pätevän henkilön virkaan eikä kepulle passelia!! Jatkakaa101164