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
260
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
Ja taas ammuttu kokkolassa
Kokkolaisilta pitäisi kerätä pois kaikki ampumaset, keittiöveitset ja kaikki mikä vähänkään paukku ja on terävä.454911- 672898
Helena Koivu on äiti
Mitä hyötyä on Mikko Koivulla kohdella LASTENSA äitiä huonosti . Vie lapset tutuista ympyröistä pois . Lasten kodista.2851874Milli-helenalla ongelmia
Suomen virkavallan kanssa. Eipä ole ihme kun on etsintäkuullutettu jenkkilässäkin. Vähiin käy oleskelupaikat virottarell2621770Kuinka kauan
Olet ollut kaivattuusi ihastunut/rakastunut? Tajusitko tunteesi heti, vai syventyivätkö ne hitaasti?1151679Kun näen sinut
tulen iloiseksi. Tuskin uskallan katsoa sinua, herätät minussa niin paljon tunteita. En tunne sinua hyvin, mutta jotain531256Ja taas kerran hallinto-oikeus että pieleen meni
Hallinto-oikeus kumosi kunnanhallituksen päätöksen vuokratalojen pääomituksesta. https://sysmad10.oncloudos.com/cgi/DREQ951229- 701172
Löydänköhän koskaan
Sunlaista herkkää tunteellista joka jumaloi mua. Tuskin. Siksi harmittaa että asiat meni näin 🥲1331147Purra saksii taas. Hän on mielipuuhassaan.
Nyt hän leikkaa hyvinvointialueiltamme kymmeniä miljoonia. Sotea romutetaan tylysti. Terveydenhoitoamme kurjistetaan. ht2801127