Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Hur öppnar jag filen som jag sparat och får in värderna i List2. Har testat, men

Postades av 2005-09-29 10:36:59 - Kenneth Jonsson, i forum visual basic - allmänt, Tråden har 1 Kommentarer och lästs av 699 personer

Hej

Jag för över enstaka filer från en File1 till en List2. Sedan sparar utan problem. Men öppna den till List2, går inte så bra. Hur??

Private Sub Klick1_Click()
If File1.ListIndex <> -1 Then
List2.AddItem File1
End If
End Sub

Private Sub Klick2_Click()
If List2.ListIndex <> -1 Then
List2.RemoveItem List2.ListIndex
End If
End Sub

Private Sub Spara1_Click()
'Spara innehållet i en Listbox till en fil
Dim f%, i%, FileName$
FileName = "c:\Listan2.inf"
f = FreeFile: i = 0
Open FileName For Output As f
For i = 0 To List2.ListCount - 1
Print #f, List2.List(i)
Next i
Close f
End Sub


Har testat denna variant, men får nedslag på bl.a.
"If Dir(FileName) Then... "

Dim f%, i%, FileName$, TextStr$
FileName = "c:\Listan2.inf"
f = FreeFile: i = 0
List2.Clear
If Dir(FileName) Then
Open FileName < > "" For Input As f
Do While Not Eof( f )
Line Input #f, TextStr
List2.AddItem TextStr
Loop
Close f
End If


Svara

Sv: Hur öppnar jag filen som jag sparat och får in värderna i List2. Har testat,

Postades av 2005-09-29 15:21:23 - Kenneth Jonsson

Löste det....

Private Sub Öppna1_Click()
Dim f%, i%, FileName$, TextStr$
FileName = "c:\Listan2.inf"
f = FreeFile: i = 0
List2.Clear
Open "c:\Listan2.inf" For Input As f
Do While Not EOF(f)
Line Input #f, TextStr
List2.AddItem TextStr
Loop
Close f

End Sub


Svara

Nyligen

  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper
  • 16:36 Allt du behöver veta om keramiskt
  • 16:14 Vem anlitar man egentligen när tak

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 722
27 958
271 751
573
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies