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
      7455
    2. Hei rakas...

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

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

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

      Mä näin sut tuu takasin! Oli kiire, niin en ehtiny sin perään!
      Ikävä
      17
      2826
    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
      52
      2386
    7. Miksi et irrota otettasi

      Suhteeni?
      Ikävä
      53
      2327
    8. Koko ajan olet

      Senkin suhteen kiusannut. Halut on ihan mielettömät olleet jo pitkään
      Ikävä
      43
      2268
    9. Toiveikas vai toivoton

      torstai? Ajatuksia?
      Ikävä
      37
      2268
    10. Mukavaa päivää

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