VB 檢查數字

-
今天Sorcer要在一個字串裡面檢查數字
查到一個簡單好用的函數，做個紀錄



If IsNumeric(CoValue) = "True" Then
  CoValue = Double.Parse(CoValue) 
End If

這樣是不是很簡單呢

留言

張貼留言

這個網誌中的熱門文章

CheckBox GridView 動態產生

-
Protected Sub gv_account_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles gv_account.RowDataBound If e.Row.RowType = DataControlRowType.DataRow Then Dim ck = New CheckBox ck.ID = "Scheck" e.Row.Cells(1).Controls.Add(ck) End If End Sub 抓值方式 Sub PermissionCheck() Dim gvr As GridViewRow Dim KeyName As String For Each gvr In gv_account.Rows Dim cb As CheckBox = CType(gvr.FindControl("Scheck"), CheckBox) If cb.Checked = True Then KeyName = gv_account.DataKeys(gvr.RowIndex).Values(0) End If Next End Sub
閱讀完整內容