VB字串處理

字串 逐字取出
If Session("Ins_Part").ToString <> "null" Then
    Dim j As Integer = Nothing
    For i As Integer = 0 To Session("Ins_Part").ToString.Length - 1
        If Session("Ins_Part").ToString(i) = "," Then
            j += 1
        End If
    Next
End If

字串分割為陣列
Dim urlNameSlipt As String() = Session("urlName").Split(",") '分割字串
For i As Integer = 0 To urlNameSlipt.Length - 1
     xxx.Text += urlNameSlipt(i) & "/"
Next

遞減迴圈
For i = 4 To 0 Step -1
Next

左側不足補0

Dim seq2 As String = seq1.PadLeft(5, "0")

字串轉換數字
Cint

取到小數第n位
TextBox1.Text = Format(data, ".##") '最後一位為0則不顯示 '四捨五入
TextBox1.Text = Format(data, ".00") '最後一位為0亦顯示

指定Label日期顯示格式
<asp:Label ID="lb1" runat="server" Text='<%# Bind("CONFIRM_DATE", "{0:yyyy/MM/dd}") %>'></asp:Label>