但至少也要一次10萬元的大消費。
滿足她的貴婦夢~~
但是後來她好像忘記了,呵呵。
努力賺錢來滿足她吧\_/所以我要加油!
如何在有限生命,創造出無限可能。 記錄一些學習的心得或是筆記
從型別 'DBNull' 轉換為型別 'String' 是無效的。
如果從資料庫讀資料出來要放在
Label 或 Textbox 等控制項應該會常碰到這問題。
就是當資料庫有欄位是Null時,無法轉為String就會出現上述的錯誤訊息。
這時該怎麼辦呢?
If IsDBNull(DV(i)("Er_Code")) Then
Me.Code.Text = ""
Else
Me.Code.Text = DV(i)("Er_Code")
End If
Function CheckDdNull(ByVal data As Object) As String
If IsDBNull(data) Then
Return ""
Else
Return data
End If
End Function
最近跟eileen在一起時,eileen都會捉我的頭髮甩我的頭。
感覺好像…是在拍野蠻女友
Dim Xrank As Integer() = {"-1", "0", "10", "20", "99"}
Dim Xtext As String() = {"Invisible", "使用者", "管理員", "系統管理", "God"}
Dim i As Integer
For i = 0 To Xrank.GetLength(0) - 1
'(DropDownList13,99, RM, 5)
If Xrank(i) <= rank Then
Dim X As New ListItem
x.Text = Xtext(i)
x.Value = Xrank(i)
DDL.Items.Add(x)
End If
Next
squall真是有辦法,找到好多好用的資源。
有空可以去他blog看看~~點他的圖片也不知道他怎麼用的 哈哈
可以把他的圖都show出來 哈哈(不會形容)
右上角那線上播放音樂就是他找到。
可以放上自己的音樂,然後在blog播放。