Keskustelu: Ohjelmointikysymykset: VB6: X (ja kuva) vb

tässä tuli semmonen pulma että kun tein semmosen muuttujan joka tarkkailee Picture1:sen X -arvoa (ja tein siitä Public muotosen) ...ja sitte ku painaa nappia ni Form2 tulee esille ja sen Text1.Text on Formi1:sen X:än arvo..
jotain tähän malliin:

Public x as Integer
Option Explicit

Private Sub Command1_Click()
 Form2.Visible = True
End Sub

Private Sub Form_Load()
Form2.Visible = False
x = 0   ' x on 0 koska kuvaa on aluksi kohdassa 0, 0 :)

End Sub

'''Form2'''
Private Sub Form_Load()
Text1.Text = Form1.x
End Sub

...ja sit ku sitä liikuttaa sitä ukkoo ni x:n arvo muuttuu sen mukaan(se kyllä toimii) .. mutta kun ensimmäisen kerran painaa nappia niin Text1.Text on jostain syystä 0 (joka tapauksessa) .. mutta kun Form2:sen sulkee ja painaa nappia toistamiseen niin sitten siihen textboxiin kyllä ilmestyy se oikea luku.... apuva??? =(

Ja kysyttänekö tässä samalla ettei tarvii uutta aihetta alottaa että onko mahdollista että kun painaa nappia niin Picture Boxin kuva vaihtuu... ja jos on niin miten??

CoDeR kirjoitti:

onko mahdollista

Älä kysele tyhmiä. Nyt ohjelmoidaan. Kaikki on mahdollista.

CoDeR kirjoitti:

että kun painaa nappia niin Picture Boxin kuva vaihtuu

nimi.Picture = LoadPicture("c:\poke\hotxxx.jpg")

Edit: tai siihen voi kopioida toisessa Picture Boxissa olevan kuvan. nimi.Picture = nimi2.Picture

Eiks kukaan tosiaan osaa vastata tohon x ongelmaan? =(

Kokeile yhdistää luvun päivitys nappulan painamiseen:

Private Sub Command1_Click()
    Form2.Visible = True
    Form2.Text1.Text = x
End Sub

Jep. kiitti

edit: voitko antti kertoa vielä semmosen että miten saan näkymään formin captioniin muuttujien x:n ja y:n arvot samanaikaisesti (x on siis kuvan x ja y on kuvan y)??
sain vain yhden kerrallan (Form1.Caption = x)

CoDeR kirjoitti:

miten saan näkymään formin captioniin muuttujien x:n ja y:n arvot samanaikaisesti

Form1.Caption = x & ", " & y

eip toimi

Kyllä se toimii, jos formin nimi on Form1 ja muuttujat x ja y ovat olemassa. Jos et saa sittenkään toimimaan, niin näytä koodiasi ja kerro mahdolliset virheilmoitukset.

eiku joo sain jo.