Dim s As String = “選取的項目:<br>”

For i As Integer = 0 To cblCate.Items.Count - 1
            If cblCate.Items(i).Selected Then
                ‘ List the selected items
                s = s & cblCate.Items(i).Text
                s = s & “<br>”
            End If
        Next
Response.Write(s);

arrow
arrow
    全站熱搜

    包爾伯 發表在 痞客邦 留言(0) 人氣()