Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Jak zawartosc Listy przeniesc do Text...
Robert004




Typ: neutral
Postów: 1
Zarejestrowany: May 2005
Jak zawartosc Listy przeniesc do Text...

Jak moge przekopiowac zawartosc obiektu List np1000 pozycji)do obiktu Text. Chodzi o to, aby mozna bylo skopiowac zawartosc jednego z tych obiektow na zewnatrz za pomoca menu podrecznego "kopiuj wklej" , albo zapisac zawartosc List do *.txt.

Za pomoc z gory dziekuje.

13-05-2005 14:52
Pokaż profil Robert004  Wyślij email do Robert004   
OPAX
RatNet



Typ: neutral
Postów: 21
Zarejestrowany: Mar 2005

Private Sub Form_Load()
Dim x
zmiennaa(1) = "heyah" ' Tutaj to co jest wpisane do listy
zmiennaa(2) = "1"
zmiennaa(3) = "dwa"

zmiennab(1) = "heyah " ' To co będzie wpisane do Labela"
zmiennab(2) = "1"
zmiennab(3) = "dwa"
For x = 1 To 100
If zmiennaa(x) = "" Then Exit For
List1.AddItem zmiennaa(x)
List1.ItemData(List1.NewIndex) = x
Next x
End Sub

Private Sub List1_Click()
enter = zmiennab(List1.ItemData(List1.ListIndex))
Label1.Caption = (enter)
End Sub


_____________________________________________
Sendpack packet

13-05-2005 15:32
Pokaż profil OPAX  Wyślij email do OPAX   Odwiedź stronę OPAX       8910371
Wszystkich odpowiedzi: 1 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1