Frage : Wie ich tue, „nicht ein Mitglied der Schnur“ Störung im Vb.net-Code regeln.

Hallo erhalten Experten,

I eine „nicht ein Mitglied der Schnur“ Störung für die folgende Linie in diesem Code:
MyString.Appenttext ()

Can erklären Sie, wie man this.
1 repariert:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:

Private VorExportDatasetToCsv (ByVal MyDataSet als Datensatz)
        Schwaches Papierlösekorotron als DataTable
        Schwacher Dr. als DataRow
        Schwaches MyString als Schnur



        Schwaches bFirstRecord, wie Boolesch = ausrichten en
        Schwaches myWriter als neues System.IO.StreamWriter („C:\MyTestCSV.csv ")



        MyString = ""

        Versuch
            Für jedes Papierlösekorotron in MyDataSet.Tables ()
                Für jeden Dr. in Papierlösekorotron. Reihen
                    bFirstRecord = ausrichten en

                    Für jedes Feld als Gegenstand in dr.ItemArray
                        Wenn nicht bFirstRecord dann
                            MyString.AppendText („, ")

                        Beenden wenn
                        MyString.AppendText (field.ToString)
                        bFirstRecord = falsch
                    Zunächst

                    'Neue Linie, zum der folgenden Reihe zu unterscheiden              
                    MyString.AppendText (Environment.NewLine)

                Zunächst

            Zunächst

        Fang ex als Ausnahme

            MsgBox (ex. Mitteilung)

        Enden-Versuch

        'Die Schnur zur Csv Akte schreiben
        myWriter.WriteLine (MyString)

        'Aufräumen
        myWriter.Close ()



    Sub


Thanks
Stan beenden

Antwort : Wie ich tue, „nicht ein Mitglied der Schnur“ Störung im Vb.net-Code regeln.

Sie können dieses schreiben:

    MyString.AppendText („, ")

so:

    MyString = MyString u. „,“

Ähnlich Änderung:

    MyString.AppendText (field.ToString)

Zu:

    MyString = MyString u. field.ToString

Und schließlich, diese Linie:

    MyString.AppendText (Environment.NewLine)

Wird:

    MyString = MyString u. Environment.NewLine
Weitere Lösungen  
 
programming4us programming4us