Dim a as Char=" "
Dim split As String() = gr.Split(New Char() {a})

Εάν το διάστημα μεταξύ των String είναι μεγαλύτερο του 1 , ποιό πρέπει να είναι το a

Ευχαριστώ

Υποθέτω ότι εννοείς πως θα αποφύγεις τη δημιουργία κενών strings αν επαναλαμβάνονται κενά strings?

Κοίτα στο Help την παραλλαγή της Split η οποία παίρνει και παράμετρο StringSplitOptions. Αν θέσεις την τιμή RemoveEmptyEntries θα πετύχεις αυτό που θες.

---

Παναγιώτης Καναβός, Freelancer
Twitter: http://www.twitter.com/pkanavos

Dim s1 As String = "ONE   TWO   THREE"
To String είναι έτσι δηλ. μεσολαβούν πάντα 3 κενά

Ποιό πρέπει να είναι
Dim stringSeparators() As String = {"  "}

γιά να πέρνω τα ξεχωριστά String και όχι αυτά που έχουν μόνο ένα κενό μεταξύ τους
δηλ αν  ONE TWO τότε να το βλέπει σαν ένα String

Ένας πιο αποδοτικός τρόπος είναι να χρησιμοποιήσεις Regular Expressions. Για περισσότερες πληροφορίες και παραδείγματα http://www.regular-expressions.info/

εμ, ξέρει μήπως κανείς πως υλοποιεί το .Net τα regexp με αποτέλεσμα να είναι τόσο γρήγορα?

Θα μπορούσες απλά πρίν κάνεις Split να κάνεις replace τα 2 κενά με ένα κενό ως εξής :

gr.Replace("  "," ").Split(a.TocharArray())

 

---

Σταύρος Βαλσάμης
Προγραμματιστής

Μπορείς να δεις το κώδικα που παραθέτω για να πάρεις μια ιδέα το πώς μπορεί να γίνει με RegEx.  Το separator string είναι 3 κενά που όπως είπες θα είναι το standard  που θα χωρίζει τις τιμές μεταξύ τους

Αν έχεις απορίες μπορείς να μου στείλεις PM

Imports System.Text.RegularExpressions

Module Module1
    Sub Main()

        Dim test As String
        Dim seperator As String
        Dim valuesarray As Array
        Dim value As String
        seperator = "   "
        test = "one space   two  spaces   three   spaces"

        valuesarray = Regex.Split(test, seperator)

        For Each value In valuesarray
            Console.WriteLine(value)

        Next
    End Sub

End Module

Μήπως γινόμαστε υπερβολικοί? Η String.Split κάνει άνετα τη δουλειά, ενώ τα Regular Expressions είναι αρκετά στρυφνά. Όπως λέει και ο Roy Osherove, ο δημιουργός του Regulator και του Regulazy, "You have a problem and you want to solve it with regular expressions. Now you have TWO problems". Ε, κάτι θα ξέρει

Όσον αφορά το Split, μία από τις μορφές του δέχεται ένα string array. O κώδικας είναι απλούστατος:

string[] items = mystring.Split(new string[]{" "},StringSplitOptions.None);

---

Παναγιώτης Καναβός, Freelancer
Twitter: http://www.twitter.com/pkanavos

Oi REGEX οντος θα είναι  overkill αν μιλάμε για λίγες πράξεις , αν όμως ι συγκεκριμένη ρουτίνα χρησιμοποιείτε για να κάνει process μεγάλα log files τότε ένα REGEX πιθανόν να είναι πιο αποδοτικό.

 

Το αρχικό post είναι γραμμένο σε VB οπότε ένα απλο implementation τις Split einai παρακάτω:

 

Imports System.Text.RegularExpressions

Module Module1
    Sub Main()

        Dim test As String
        Dim seperator As String
        Dim valuesarray As Array
        Dim value As String
        seperator = "   "
        test = "one space   two  spaces   three   spaces"

        valuesarray = Split(test, "   ")


        For Each value In valuesarray
            Console.WriteLine(value)

        Next
    End Sub

End Module

Lutonian στον παραπάνω κώδικα αν κατάλαβα καλά χρησιμοποιείς την Microsoft.VisualBasic.Strings.Split και όχι την System.String.Split.

Το αναφέρω σαν σημείωση, καθώς η πρώτη βρίσκεται στο .net για λόγους συμβατότητας με την vb6 και διαφέρει ελαφρώς από την δεύτερη. 

---

Dimitris Papadimitriou Software Development Professional

Οι απαντήσεις παρέχονται για συγκεκριμένες ερωτήσεις και χωρίς καμιά εγγύηση. Διαβάστε επίσης τους όρους χρήσης.

Έκανα λίγο benchmarking (1.000.000 iterations) και έχουμε:

1. System.String.Split - 1,8 sec
   
2. VisualBasic.String.Split - 6,9 sec
   
3. RegEx.Split - 14,8 sec

Επισυνάπτω τον κώδικα.

Για να τρέξει ο κώδικας πρέπει να προσθέσετε στο C# console project που θα δημιουργήσετε ένα reference στην Microsoft.VisualBasic!!! Τι θράσος!!!

---

Dimitris Papadimitriou Software Development Professional

Οι απαντήσεις παρέχονται για συγκεκριμένες ερωτήσεις και χωρίς καμιά εγγύηση. Διαβάστε επίσης τους όρους χρήσης.

Ωραίος ο Δημήτρης! Πράγματι, η Split() δεν είναι αντίστοιχη της Sting.Split. Επίσης, η Split() επιστρέφει String() και όχι Array, αν και αυτό δεν επηρεάζει την ταχύτητα. Ο αντίστοιχος κώδικας για το String.Split σε VB πάντως είναι:

Dim test As String = "one space two spaces three spaces"
Dim values() As String = test.Split(New String() {" "}, StringSplitOptions.None)
For Each value As String In values
   Console.WriteLine(value)
Next

---

Παναγιώτης Καναβός, Freelancer
Twitter: http://www.twitter.com/pkanavos