Keskustelu: Ohjelmointikysymykset: VB6: pikku ongelma. =(

Dim koe1 As String

Option Explicit

Private Sub Command1_Click()
  Text2.Text = koe1
End Sub

Private Sub Form_Load()
koe1 = Text3.Text

End Sub

.... ton koodin siis pitäs toimii niin et alussa määritelty muuttuja koe1 sais sen arvon mitä Text3:seen kirjotetaan. ja sit ku nappia painetaan ni sen pitäs näyttää se teksti (mitä kirjotettiin Text3:seen ja annettin koe1:sen arvoksi) mutta kun se laittaa ton Text2:sen textiks "Text3" ...... ??? =(=(

edit: tai jos otan ton Text3:n alkuarvon (Text3) pois ni sit se ei tulosta mitään tohon Text2:een??

Laita Text3.Text = Text2.Text

no nii kyl se toimii silleenki mut ku sille muuttujalle koe1 pitäs saada se arvo mitä Text3:een kirjotetaan... ja tossa se ei toteudu. =(

edit: eli ton kysymyksen vois muotoilla vaik niin et roolipelissä kun käyttäjä saa päättää hahmonsa nimen .. niin miten muuttuja koe1:lle saa arvoksi sen mitä käyttäjä kirjoittaa text boxiin.... jotta nimeä voidaan käyttää myöhemminkin????

Siis se laittaa Text2.Text arvon Koe1:een vaikka sen pitäisi laittaa Text3.Text arvo siihen. En kyllä tajua mikä tässä on onglema. Mikset laita command klikkiin tuota Koe1 = Text3.Text?

Oletko kirjoittanut jonkin oletusarvon Text3 objektin Text ominaisuuteen - jos et saat loadissa koe1-muuttujaan tyhjän arvon ja Text2-objektiin tallentuu vain tyhjä arvo painiketta painettaessa.

Jos haluat Text3 objektiin kirjoitettavan arvon tallentuvan koe1 muuttujaan se täytyy tapahtua Text3_LostFocus() tai Text3_Change() eventissä - ei Form_Load() eventissä, joka suoritetaan vain silloin kun lomake ladataan muistiin.

Form_Load suoritetaan vain, kun formi ladataan... elli tuo sijoitus koe1 = Text3.Text tapahtuu vain kerran, silloin kun formi ladataan. Kannattaa laittaa tuo muuttujaan ottaminen samassa klikkauksessa kun se sijoitetaan toiseen tekstilaatikkoon.

Lisää tapahtumakoodi:

Private Sub Text3_Change()
   koe1 = Text3
End Sub