Ominaisuuksien kopionti

"Tutkija"

VB-taitajat!
Kertokaahan miten kopioidaan esim. combobox ja groupbox (sis. radionappeja) ominaisuuksineen.
Tällaisena aloittelevana "Tutkijana" kykenen ajon aikana lisäämään komponentteja mutta ominaisuudet pitäisi saada mukaan.

Toisena murheena: textboxin tekstin lisääminen buttonilla vanhaa tekstiä hävittämättä...

Kovasti ennakkoon kiittäen!

Ps. Tälläerää en kaipaa fanaattisia vinkkejä "kunnon kieliin" vaihtamisesta. Ehkä pikemminkin asiallisia kommentteja aloittelevalle "helposti" omaksuttavasta...

4

653

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Nimetön

      ..sanomasta että vb on vain osittain ohjelmointikieli, mutta siinäkin eräs oikean ohjelmoinnin kulmakivi tietääkseni on, eli periytyvyys, ominaisuudet siis voidaan periyttää lapsioliolle.

    • vbguru

      Panenpa tähän malliksi miten esimerkiksi Comboboxin ominaisuuksia voi kopioda toiseen.

      Tässä ensin MSDN mallin mukaan ladataan Combo1

      Private Sub Form_Load()

      Combo1.AddItem "Chardonnay"
      Combo1.AddItem "Fumé Blanc"
      Combo1.AddItem "Gewürztraminer"
      Combo1.AddItem "Zinfandel"

      End Sub


      Ja jos Combo2 on luotu, lennosta tai muuten, sen arvoiksi kopioidaan nuo Combo1 datat

      Private Sub Command1_Click()
      Dim i As Integer
      For i = 0 To Combo1.ListCount - 1
      Combo2.AddItem Combo1.List(i)
      Next i
      End Sub

      Ja Textboxin tekstin lisääminen vanhaa hävittämättä. Jos vanha teksti halutaan säilyttää nimenomaan saman Textboxin sisältönä, niin laittaa vaan

      Text1.Text = Text1.Text & uusiteksti

      siis tuossa lisättävä teksti muuttujana "uusiteksti"

    • zardid

      Edellinen teksti ei katoa boxista, jos kirjoitat text.box.text= text.box.text "lisää tekstiä2

      • "Tutkija"

        Kiitos vastanneille!!!
        Projekti on ollut jäissä kys. ongelmien, puutarhatöiden ym. takia. Siinä välissä ehdin hieman tutustumaan muihinkin ohjelmiin ja Python vaikutti muita selkeämmältä, ei ylimääräisiä (???) välimerkkejä...
        Oletin tämän kysymykseni jo kuoppaantuneen aikasegmentteihin mutta jatketaan kun keritään.
        Kiitos!


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Huomenta ihana

      Kauniskasvoinen ihanuus 😘 saan sut vielä
      Ikävä
      46
      7575
    2. Hei rakas...

      Miten on työpäivä sujunut? Rakastan sinua 💗
      Ikävä
      33
      4183
    3. Ei tämä etene ikinä

      Kun kumpikaan ei enää ota yhteyttä. Mä en ainakaan uskalla.
      Ikävä
      57
      3685
    4. Edelleen sitä on vaikea uskoa

      Että olisit oikeasti rakastunut muhun
      Ikävä
      50
      3170
    5. Vitsi mihin menit. Heti takasin.

      Mä näin sut tuu takasin! Oli kiire, niin en ehtiny sin perään!
      Ikävä
      17
      2856
    6. 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 kons
      Suomalaiset julkkikset
      57
      2481
    7. Miksi et irrota otettasi

      Suhteeni?
      Ikävä
      54
      2388
    8. Toiveikas vai toivoton

      torstai? Ajatuksia?
      Ikävä
      40
      2329
    9. Koko ajan olet

      Senkin suhteen kiusannut. Halut on ihan mielettömät olleet jo pitkään
      Ikävä
      45
      2322
    10. Mukavaa päivää

      Mun rakkauden kohteelle ❤️ toivottavasti olet onnellinen
      Ikävä
      16
      2266
    Aihe