close
Blogtrottr
Yahoo!奇摩知識+ - 分類問答 - 電腦網路 - 發問中
Yahoo!奇摩知識+ - 分類問答 - 電腦網路 - 發問中 
Thousands of Free eBooks

BookBub brings you free & bargain national bestselling eBooks in the genres of your choice! Sign up now & join 1.5 million happy readers.
From our sponsors
這該如何解決 ~"~ 煩惱好久
Oct 28th 2013, 03:46

Private Sub DataGridView1_CellPainting(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellPaintingEventArgs) Handles DataGridView1.CellPainting
If e.ColumnIndex
Return
End If
Dim column As DataGridViewColumn
column = DataGridView1.Columns(e.ColumnIndex)

If column.DataPropertyName = "天車" AndAlso e.RowIndex >= CInt(HomePage1(1) - 1) AndAlso e.Value.ToString = "0" Then --------->>>>使用者程式碼未處理NullReferenceException (並未將物件參考設定為物件的執行個體)

e.CellStyle.ForeColor = Color.Blue
e.CellStyle.BackColor = Color.Blue
e.CellStyle.SelectionForeColor = SystemColors.Highlight
End If

If column.DataPropertyName = "." AndAlso e.RowIndex >= 0 AndAlso e.Value.ToString = "1" Then
e.CellStyle.ForeColor = Color.Orange
e.CellStyle.BackColor = Color.Orange
e.CellStyle.SelectionForeColor = SystemColors.Highlight
ElseIf column.DataPropertyName = "." AndAlso e.RowIndex >= 0 AndAlso e.Value.ToString = "0" Then
e.CellStyle.ForeColor = Color.FromArgb(255, 255, 255, 192)

e.CellStyle.SelectionForeColor = SystemColors.Highlight
End If
End Sub

This entry passed through the Full-Text RSS service — if this is your content and you're reading it on someone else's site, please read the FAQ at fivefilters.org/content-only/faq.php#publishers. Five Filters recommends:

You are receiving this email because you subscribed to this feed at blogtrottr.com.

If you no longer wish to receive these emails, you can unsubscribe from this feed, or manage all your subscriptions
arrow
arrow
    全站熱搜
    創作者介紹
    創作者 gyyjddqba132r 的頭像
    gyyjddqba132r

    進擊的巨人14, 進擊的巨人線上看, 進擊的巨人漫畫, 進擊的巨人遊戲, 進擊的巨人 動畫, 進擊的巨人 線上漫畫, 進擊的巨人14線上看, 進擊的巨人13, 進擊的巨人 h, 進擊的巨人op

    gyyjddqba132r 發表在 痞客邦 留言(0) 人氣()