Amatööri täällä pähkii todennäköisesti yksinkertaisen asian kanssa......
...eli, jos teen alasvetovalikkoon käskyn siirrä, niin miten saan siirrettyä käskyn kohteena olevaa kuvaa joka kerta, kun valitsen uudelleen valikosta käskyn siirrä, esim. 100 yksikköä lisää alaspäin? Lisäksi vielä haluaisin tulostaa siirtojen lukumäärän ja kuvan sen hetkisen paikan.
(Ymmärsiköhän kukaan edes kysymystä?! :O)
Valikko-ongelma
Los Idiotos
3
323
Vastaukset
- vbguru
Laitoin malliksi ratkaisun, jossa kuvaa siirretään Command1-painikkeella 100 yksikköä alaspäin. Alkuperäinen sijainti otetaan Form_Load:ssa talteen original_top muuttujaan.
Tietysti pitää tehdä rajoitin, ettei kuvaa saa piiloon, ellei halua. Ja palautusnappula, vaikka toiseen Command2-painikkeeseen.
Label1:ssa näytetään kuvan sijainti ja siirtojen määrä.
Dim original_top As Integer
Dim siirto As Integer
Private Sub Command1_Click()
siirto = siirto 100
Picture1.Top = original_top siirto
Label1.Caption = "Kuvan sijainti " & Picture1.Top & " " & " siirtoja " & siirto / 100
End Sub
Private Sub Command2_Click()
siirto = 0
Picture1.Top = original_top
Label1.Caption = "Kuvan sijainti " & Picture1.Top & " " & " siirtoja " & siirto / 100
End Sub
Private Sub Form_Load()
original_top = Picture1.Top
siirto = 0
Label1.Caption = "Kuvan sijainti " & Picture1.Top & " " & " siirtoja " & siirto / 100
End Sub- Los Idiotos
Tosi paljon kiitoksia gurulle! :o)
- vbguru
Los Idiotos kirjoitti:
Tosi paljon kiitoksia gurulle! :o)
Mukavahan se on jos voi hieman auttaa.
Itsekin apuja paljon saa netistä hakemalla, joskus vaan on vaikeampaa, joskus helpompaa,
sen kaipaamansa tiedon löytäminen.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Mitäs peitsarissa on tapahtunut eilen illalla
Mikkelissä iso poliisioperaatio https://www.iltalehti.fi/kotimaa/a/39ef020c-2d81-4d72-b720-651f458ba3e2922452Mistä löytää kadonnut motivaatio?
Mikä neuvoksi, kun oikein mikään ei enää jaksa huvittaa eli ei ole motivaatiota tehdä mitään? Joka päivä ajattelen, että1412228Saana airola ja. muusikko spekulaatiota
Saara airolan kirja muusikko mies. Oisko redrama tai lauri tähkä? Saana oli 13 v vuonna 2014 Tekoäly sanoo : tähkä Julki132048- 1711560
Jos saisit palata takaisin johonkin vuoteen
Mikä vuosi se olisi? Ja mitä siinä hetkessä tapahtuisi?1381267Miksi ETTE suostu selvittämään . . . . . ...
Asioita jotka jääneet selvittämättä toisen osapuolen kanssa? Kertoisitteko miksi ette suostu? Vaikka teidän mielestä193888- 85886
- 174846
Wille Rydman on kansalaisten mielestä huonoiten onnistunut ministeri
Onneksi olkoo Wille kärkipaikasta! Oletkin sen eteen tehnyt hartiavoimin töitä. "Ministeri Wille Rydman (ps) on kansala451796- 51667