Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
Info Coronavirus/Vaccinare vs Fake News

Cum pun protectie in Google Walle...

Soba din tabla pentru atelier.

HIT and RUN - (Fuga dupa adevar)
 Proiect Erasmus -Vaccin si test pcr

Identificare dioda zenner

Cont SPV pentru PFA?

Spalare instalatie termica
 afisare eroare centrala termica e...

Probleme cu un PDF in Adobe Reader

NHA,NBA

Scartait placute frana
 Contract imprumut PFA

Comoditatea se plateste(si in Ung...

Hayu Romania (serviciul de stream...

Scoatere bani pensie privata obli...
 

Conversie Save/load item from listbox to listview

- - - - -
  • Please log in to reply
No replies to this topic

#1
Dancezar09

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

0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

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