Rekisteröidy

Ilmoitukset

Ladataan…

    Näytä kaikki

    ListBox - fmMultiSelectExtended

    Millä tavalla saan selville ListBoxissa valittuna olevan arvon kun MultiSelect-ominaisuuden arvo on fmMultiSelectExtended?

    Alla oleva koodi toimii kun MultiSelect = fmMultiSelectSingle, mutta miten saan vastaavan toimimaan kun MultiSelect = fmMultiSelectExtended? (kun valittuna on vain yksi rivi).

    Private Sub UserForm_Initialize()

    ListBox1.AddItem "1"
    ListBox1.AddItem "2"
    ListBox1.AddItem "3"
    ListBox1.AddItem "4"
    ListBox1.AddItem "5"

    End Sub

    Private Sub CommandButton1_Click()

    For a = 0 To ListBox1.ListCount - 1
    If ListBox1.Selected(a) = True Then MsgBox ListBox1.Value
    Next

    End Sub

    Jos vaihdan ListBox1.Value tilalle ListBox1.ListIndex niin se kyllä toimii.

    -Pasi-
    2219
    Äänestä

    Muut lukivat myös

    Vastaukset 2

    Vanhimmat

    MsgBox ListBox1.List(a)

    Äänestä

    • hyvin toimii, kiitos!

      Äänestä

    Odottaa vastausta

    Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.

    Luetuimmat keskustelut

    Kommentoi aloitusta

    -Pasi- kirjoitti:

    Millä tavalla saan selville ListBoxissa valittuna olevan arvon kun MultiSelect-ominaisuuden arvo on fmMultiSelectExtended?

    Alla oleva koodi toimii kun MultiSelect = fmMultiSelectSingle, mutta miten saan vastaavan toimimaan kun MultiSelect = fmMultiSelectExtended? (kun valittuna on vain yksi rivi).

    Private Sub UserForm_Initialize()

    ListBox1.AddItem "1"
    ListBox1.AddItem "2"
    ListBox1.AddItem "3"
    ListBox1.AddItem "4"
    ListBox1.AddItem "5"

    End Sub

    Private Sub CommandButton1_Click()

    For a = 0 To ListBox1.ListCount - 1
    If ListBox1.Selected(a) = True Then MsgBox ListBox1.Value
    Next

    End Sub

    Jos vaihdan ListBox1.Value tilalle ListBox1.ListIndex niin se kyllä toimii.

    -Pasi-

    Anonyymi
    5000

    Ilmoita asiaton sisältö

    • Sisältää materiaalia, joka on loukkaavaa, herjaavaa, rasistista, uhkailevaa tai ahdistelevaa.

    • Materiaali sisältää nimiä, yhteystietoja tai muita henkilökohtaisia tietoja. Julkisuuden henkilöistä, julkisissa viroissa toimivista ihmisistä sekä yritysten vastuuhenkilöistä saa keskustella työhön liittyen. Myös yksityiselämään liittyvistä asioista voi keskustella siltä osin, kuin niistä on julkisesti kerrottu.

    • Sisältää lapsille haitallista tai heiltä kiellettyä materiaalia. Seksuaalinen sisältö on sallittua aiheeseen tarkoitetuilla palstoilla, joiden ikäraja on 18 vuotta.

    • Lainvastaista sisältöä voi olla mm. yksityiselämää loukkaavan tiedon levitys, kiihottaminen kansanryhmää vastaan, laiton uhkaaminen, alaikäisiin liittyvä seksuaalinen sisältö/grooming, petokset, identiteettivarkaudet, kunnianloukkaukset ja tekijänoikeusrikkomukset.

    • Sisältö ei liity palstan tai keskusteluketjun aiheeseen.

    • Viesti ei ole suomea tai ruotsia (pl. International Forums), se sisältää mainontaa, se sisältää tekijänoikeuksin suojattua materiaalia, se on massapostitus tai jokin muu syy.

    Jaa keskustelu