こんにちは、お世話になっております。
ListViewでマウスが通過した行のデータをTooltipに表示させたいですが、ご教示の程よろしくお願致します。
Private Sub ListView2_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListView2.MouseMove
Dim s As String
s = vbCrLf
If ListView1.SelectedItems.Count = 0 Then
'処理を抜ける
Exit Sub
End If
Dim itemx As New ListViewItem
'1番目に選択されれいるアイテムをitemxに格納
itemx = ListView1.SelectedItems(0)
'選択されているアイテムを取得する
Dim varS As String
varS = itemx.SubItems(5).Text
varS = varS & s & itemx.SubItems(7).Text
varS = varS & s & itemx.SubItems(8).Text
varS = varS & s & itemx.SubItems(9).Text
varS = varS & s & itemx.SubItems(10).Text
varS = varS & s & itemx.SubItems(11).Text
ToolTip1.SetToolTip(ListView1, varS)
End Sub