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


array till textfil samt leta efter värde vb.net

Postades av 2004-11-27 15:45:44 - Christina Antonsson, i forum vb.net, Tråden har 4 Kommentarer och lästs av 824 personer

har skapat en array som dels ska sparas till 2 textfiler, dessutom ska man kunna vissa hela arrayen i en textbox med 4 kol och 5 rader, och sedan söka i textfilerna, tex om man skriver 100 så ska alla artiklar som kostar upp till och med 100 visas.
jag gjorde min array så här:
Sub ArrayInit()
arrArticles(0, 0) = "Colt Peacemaker"
arrArticles(1, 0) = "Holster"
arrArticles(2, 0) = "Levis Straus Jeans"
arrArticles(3, 0) = "Saddle"
arrArticles(4, 0) = "Stetson"
arrArticles(0, 1) = "112,50"
arrArticles(1, 1) = "20,75"
arrArticles(2, 1) = "15,56"
arrArticles(3, 1) = "425,30"
arrArticles(4, 1) = "98,75"
arrArticles(0, 2) = "Water Colt"
arrArticles(1, 2) = "Holster"
arrArticles(2, 2) = "Horse"
arrArticles(3, 2) = "Saddle"
arrArticles(4, 2) = "Hat"
arrArticles(0, 3) = "15,45"
arrArticles(1, 3) = "2,65"
arrArticles(2, 3) = "28,55"
arrArticles(3, 3) = "10,40"
arrArticles(4, 3) = "4,85"

End Sub
så här vill jag att den ska visa alla mina artiklar kol 1och2 tillhör textfil1, kol 3och4 tillhör textfil2
Artikel Pris Artikel Pris
Colt Peacemaker 112,50 Water Colt 15,45
Holster 20,75 Holster 2,65
osv....

har försökt med att använda loopar för att få uppställningen men någonstans blir det galet, så finns det någon som kan visa och förklar för mig så vore jag tacksam. christina


Svara

Sv: array till textfil samt leta efter värde vb.net

Postades av 2004-11-29 22:00:08 - Fredrik Edström

Ett annat sätt istället för att lagra värden i en array är att du skapar en klass, Artikel, som har egenskaperna Namn och Pris. Ett objekt för varje artikel. Sedan lagrar du alla objekten i en Collection. Genom denna Collection kan du använda dig av en foreach för att loopa igenom alla artiklar och skriva ut dom. Låt oss anta att du skapar en klass Artikel
<code>
Public Class Artikel
Public Artnamn As String
Public Pris As Single

Public Sub New(namn As String,pris As Single)
Me.Artnamn = namn
Me.Pris = Pris
End Sub
End Class
</code>

sedan skapar du X antal objekt och sätter egenskaperna genom konstruktorn typ:
<code>
Dim a1 As New Artikel("Peacemaker", 112.5)
Dim a2 As New Artikel("Water Colt", 15.45)
Dim a3 As New Artikel("Holster", 20.45)
Dim a4 As New Artikel("Holster", 2.75)
</code>

lägg till objekten till en samling
<code>
Dim col As New Collection
'Om du vill separera värden från 2 filer kan du använda två Collections osv...
col.Add(a1)
col.Add(a2)
col.Add(a3)
col.Add(a4)
</code>

sedan kan du skriva ut egenskapera på följande sätt
<code>
Dim radbryt As Integer = 0

Me.textbox.Text = "Artikel" & vbTab & "Pris" & vbTab & "Artikel" & vbTab & "Pris"
For Each t As Artikel In col
If t.Pris < 100 Then 'endast om pris under 100 skall listas
If radbryt Mod 2 = 0 Then
Me.textbox.Text = Me.textbox.Text & vbcrLf & t.Artnamn & vbTab & t.Pris & vbtab
radbryt = 1
Else
Me.textbox.Text = Me.textbox.Text & t.artnamn & vbTab & t.Pris
radbryt = radbryt + 1
End If
End If
Next
</code>

formateringen kanske inte blir den snyggaste, men detta är själva principen. En textbox kanske inte är bästa alternativet för detta. kanske en richtextbox, datagrid??

Samma princip med ForEach när du skall spara till textfil.

//Fredde


Svara

Sv:array till textfil samt leta efter värde vb.net

Postades av 2004-11-29 23:21:27 - Christina Antonsson

tack för svaret, jag provade richtextbox och då funkade det, om jag använder den istället kan man spara ner den som txtfil?



//Christina, nybörjare


Svara

Sv: array till textfil samt leta efter värde vb.net

Postades av 2004-11-30 12:28:45 - Fredrik Edström

<code>
RichTextBox1.SaveFile("c:\minfil.txt", RichTextBoxStreamType.PlainText)
</code>

är ett sätt...

//Fredde


Svara

Sv:array till textfil samt leta efter värde vb.net

Postades av 2004-11-30 13:07:19 - Christina Antonsson

ok, tack

//christina


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
719
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