Quantcast
Channel: VBForums - Visual Basic .NET
Viewing all articles
Browse latest Browse all 27367

VS 2005 ORDER A"file.txt" IN ALPHABETICAL ORDER

$
0
0
I apologize in advance for the bad translation


HELLO BOYS ARE NEW IN THE FORUM
I AM TRYING TO MAKE A PLAN FOR THE MANAGEMENT OF PERSONAL DATA AND SINCE THE FIRST ARE WEAPONS STO FILE.TXT INSTEAD OF USING THE DATABASE SQL

MY PROBLEM IS WHEN ORDERING AN FILE.TXT WHERE THERE ARE CARICATTI The Structured DATA OF A PERSON IN THIS WAY:

Public Structure Cliente
<VBFixedString(4)> Dim ID As Integer
<VBFixedString(6)> Dim Importo As String
<VBFixedString(30)> Dim Nome As String
<VBFixedString(30)> Dim Cognome As String
Dim Born As Date
<VBFixedString(30)> Dim Location As String
<VBFixedString(30)> Dim Province As String
<VBFixedString(16)> Dim CodFisc As String
<VBFixedString(30)> Dim Indirizzo As String
<VBFixedString(30)> Dim Provincia As String
<VBFixedString(5)> Dim CAP As String
<VBFixedString(30)> Dim Citta As String
<VBFixedString(2)> Dim Maggiorenne As String
<VBFixedString(30)> Dim Genitore As String
<VBFixedString(7)> Dim Abbonamento As String
<VBFixedString(19)> Dim Attivita As String
Dim Inizio As Date
Dim Termine As Date
<VBFixedString(30)> Dim Email As String
<VBFixedString(15)> Dim Cell As String
<VBFixedString(1000)> Dim Note As String
End Structure

Public Persona as Cliente

NOW I WANT TO ORDER IN ALPHABETICAL ORDER YOUR DETAILS IN THIS FILE CREATED IN THIS WAY

Sub Aprifile()
numFile = FreeFile()
FileOpen(Numfile, "Clienti.txt", OpenMode.Random, OpenAccess.ReadWrite, , Len(Persona))
End Sub

CAN YOU PLEASE HELP ME WITH A CODE THAT ARE TOO HEAVY AS THE METHOD "quicksort" I CAN NOT UNDERSTAND HOW TO USE :confused:.

PS = Please explain in the code you can use variable names that I put in here thanks :)

Viewing all articles
Browse latest Browse all 27367

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>