如何在不在一行中的新行中创建循环项

Question

我有一个代码将数据库中的数据显示为标签。所有数据都显示在一行中，但我想让每行数据显示在一个新行中。我正在使用VB.Net

Aspx.vb

Sub ResourceName_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Try
  Dim LanguageName As String = vbNullString
  Dim LangNameList As String = vbNullString
  Dim LangWrittenList As String = vbNullString
  Dim LangSpokenList As String = vbNullString
  Dim WrittenRate As String = vbNullString
  Dim SpokenRate As String = vbNullString


  lblLanguageName.Text = ""
  lblLanguageWritten.Text = ""
  lblLanguageSpoken.Text = ""

   attPage.SQLQuery = DC.Data_TechnicalResource("12",chkResourceName1.SelectedValue)

   DS = DA.GetSQLDataset(attPage.SQLQuery)

        If DS IsNot Nothing AndAlso DS.Tables(0).Rows.Count > 0 Then
          For Each dr In DS.Tables(0).Rows
                LanguageName = dr("LanguageName").ToString
                WrittenRate = dr("WrittenLevel").ToString
                SpokenRate = dr("SpokenLevel").ToString
                If cnt <> 0 Then
                    LangNameList = LangNameList + LanguageName
                    LangWrittenList = LangWrittenList + WrittenRate
                    LangSpokenList = LangSpokenList + SpokenRate
                Else
                    LangNameList = LanguageName
                    LangWrittenList = WrittenRate
                    LangSpokenList = SpokenRate
                End If
                cnt = cnt + 1
            Next

        End If
        lblLanguageName.Text = LangNameList
        lblLanguageWritten.Text = LangWrittenList
        lblLanguageSpoken.Text = LangSpokenList

输出如下

Bahasa MalaysiaEnglishTamil          10,10,4     10,10,4

我想输出应该是这样的

Bahasa Malaysia          10           10

English                  10           10

Tamil                    4             4

有人可以帮我这么做吗？我会很感激。谢谢。

Answer 1

另一答案