Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
Upgrade xiaomi mi11

securitate - acum se dau drept - ...

Farmacia Dr Max - Pareri / Sugest...

De unde cumparati suspensii / gar...
 [UNDE] Reconditionare obiecte lemn

Infiltratii casa noua

sugestie usa interior

ANAF si plata la selfpay
 Imprimanta ciss rezista perioade ...

Garmin fēnix 7 / PRO / Saphi...

Care sunt cele mai mari regrete a...

Alfa Romeo Stelvio 2.2 jtd
 Intrebari srl nou

La multi ani @AndReW99!

Alegere masina £15000 uk

TVR vrea sa lanseze o platforma d...
 

Conversie Save/load item from listbox to listview

- - - - -
Last Updated: Jul 05 2010 13:22, Started by Dancezar09 , Jul 05 2010 13:22  
  ·  
  • Please log in to reply
No replies to this topic

#1
Dancezar09
Posted 05 July 2010 - 13:22

Dancezar09

    Junior Member

  • Grup: Members
  • Posts: 27
  • Înscris: 11.02.2010
Am doua functii

Private Sub LoadList(lst As ListBox, file As String)
On Error GoTo error
Dim a As String
Open file For Input As #1
Do Until EOF(1)
Input #1, a
lst.AddItem a
Loop
Close 1
Exit Sub
error:
MsgBox "File Not Found", vbOKOnly, "Error"
End Sub

Private Sub SaveList(lst As ListBox, file As String)
On Error GoTo error
Dim I As Integer
Dim a As String
Open file For Output As #1
For I = 0 To lst.ListCount - 1
a = lst.List(I)
Print #1, a
Next
Close 1
Exit Sub
error:
MsgBox "There has been a error!", vbOKOnly, "Error"
End Sub

este adaptat pentru listbox dar as dori sa convertesc aceste doua functii pentru un list view cu doua categorii

ms mult

Anunturi

Second Opinion Second Opinion

Folosind serviciul second opinion ne puteți trimite RMN-uri, CT -uri, angiografii, fișiere .pdf, documente medicale.

Astfel vă vom putea da o opinie neurochirurgicală, fără ca aceasta să poată înlocui un consult de specialitate. Răspunsurile vor fi date prin e-mail în cel mai scurt timp posibil (de obicei în mai putin de 24 de ore, dar nu mai mult de 48 de ore). Second opinion – Neurohope este un serviciu gratuit.

www.neurohope.ro
Back to Visual Basic

▶ 0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

  1. Forumul Softpedia
  2. → Professional Zone
  3. → Programming
  4. → Visual Basic
Forumul Softpedia foloseste "cookies" pentru a imbunatati experienta utilizatorilor Accept
Pentru detalii si optiuni legate de cookies si datele personale, consultati Politica de utilizare cookies si Politica de confidentialitate