Tooltip 이용법 (with gridview)

   Private Sub RadGridView1_CellFormatting(sender As Object, e As CellFormattingEventArgs) Handles RadGridView1.CellFormatting

        e.CellElement.ToolTipText = Nothing
        With RadGridView1
            If TypeOf e.Row Is GridViewDataRowInfo Then
                Dim 요금제데이터 As String = .Rows(e.RowIndex).Cells(1).Value
                Dim 요금제음성 As String = .Rows(e.RowIndex).Cells(5).Value

                e.CellElement.ToolTipText = "[" & .Rows(e.RowIndex).Cells(0).Value & "]" & vbNewLine  '- 요금제
                e.CellElement.ToolTipText += "월정액 : " & Format(Int(.Rows(e.RowIndex).Cells(3).Value), "#,##0") & "원" & vbNewLine  '- 요금제
                If 요금제데이터 = 999999 Then
                    요금제데이터 = "데이터 무제한"
                Else
                    If Val(요금제데이터) < 1024 Then
                        요금제데이터 = 요금제데이터
                        e.CellElement.ToolTipText += "데이터: " & Format(Val(요금제데이터), "0.0MB") & vbNewLine
                    Else
                        요금제데이터 = Val(요금제데이터) / 1024
                        e.CellElement.ToolTipText += "데이터: " & Format(Val(요금제데이터), "0.0GB") & vbNewLine
                    End If
                End If
                e.CellElement.ToolTipText += "음성 :" & 요금제음성
            End If
        End With

        If e.CellElement.IsCurrent Then
            e.CellElement.DrawFill = True
            e.CellElement.BackColor = Color.FromArgb(255, 228, 209)
            e.CellElement.ForeColor = Color.FromArgb(247, 66, 0)
        Else
            e.CellElement.ResetValue(LightVisualElement.BackColorProperty, ValueResetFlags.Local)
            e.CellElement.ResetValue(LightVisualElement.DrawFillProperty, ValueResetFlags.Local)
            e.CellElement.ResetValue(LightVisualElement.ForeColorProperty, ValueResetFlags.Local)
        End If
    End Sub