把样式放在数据表中

Question

大家好！

我有一个标签，我存储我的数据库行值。我想要的是使其显示如下。

<li> Row value 1</li> 
<li> Row value 2</li> 
<li> Row value 3</li> 

这是我到目前为止。

**前端**

后端

Dim dt As New DataTable() 
     Dim conn As SqlConnection = New SqlConnection("myconnectionhere") 
     conn.Open() 
     Dim cmd As SqlCommand = New SqlCommand("myselect command", conn) 
     'Dim reader As SqlDataReader = cmd.ExecuteReader 
     Dim da As SqlDataAdapter = New SqlDataAdapter(cmd) 
     da.SelectCommand = cmd 
     da.Fill(dt) 
     If dt.Rows.Count > 0 Then 
      For i As Integer = 0 To dt.Rows.Count - 1 
       Resulttext.Text = dt.Rows(i)("Name").ToString & Resulttext.Text 
      Next 
      conn.Close() 
     End If 

该查询检索一个以上的行。 代码正在工作。只有我要求一种风格。非常感谢！

Answer 1

你在看这样的事情吗？

If dt.Rows.Count > 0 Then 
    Resulttext.Text = "<ul>" 
    For i As Integer = 0 To dt.Rows.Count - 1 
     Resulttext.Text = "<li>" & dt.Rows(i)("Name").ToString & "</li>" & Resulttext.Text 
    Next 
    Resulttext.Text = "</ul>" 
    conn.Close() 
    End If