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);
全站熱搜