Dim a As ListViewItem = ListView2.Items(i) RichTextBox1.Text = a.SubItems(8).Text RichTextBox2.Text = a.SubItems(9).Text
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Article ID: 321104
Article Last Modified on 2/12/2007
-------------------------------------------------
APPLIES TO
Microsoft Visual Basic 2005 Express Edition
Microsoft Visual Basic .NET 2003 Standard Edition
Microsoft Visual Basic .NET 2002 Standard Edition
--------------------------------------------------
This article was previously published under Q321104
SYMPTOMS
When you add long strings to a ListView control, all of the string is added to the items collection, but the control can only display the first 259 characters of each item.
RESOLUTION
To display the full text of an item in the ListView control, you can populate a TextBox control with the selected value.
Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim ts As String = "xxxxxxxxxxxxxxxxxxxxxxxxxx" & _ "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" & _ "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" & _ "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" & _ "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" & _ "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" & _ "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" & _ "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" & _ "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaee" & _ "eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeX!" MsgBox(Len(ts)) ListView1.Items.Add(ts) End Sub Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged RichTextBox1.Text = ListView1.SelectedItems(0).SubItems(0).Text End Sub End Class