07. februar 2009 - 14:42Der er
7 kommentarer og 1 løsning
Hjælp til Visual Studio i "Listbox"!
Hej
Hvordan kan jeg programmere programmet, sådan så at når man dobbelt-klikker på en "Item" i en listbox, så der kommer data frem, som man selv har givet "Item"'et?
Jeg programmere med Visual Basic med Visual Studio 2008 Express Edition.
Altså det data jeg giver "Item"'et ville jeg gerne have at jeg skal se i en ny "Form", ved at dobbelt-klikke på "Item"'et?
Private Sub ListBox1_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDoubleClick MsgBox(ListBox1.SelectedIndex) ' Erstat evt. med din kode m.m. End Sub
Ok, men så kommer der jo bare en form frem, hvor der står 0 og en "OK" knap? Har prøvet at skrive: If MsgBox(ListBox1.SelectedIndex) Then Form2.Show 'Form2 er bare det eks. jeg bruger. End If
Det virker godt nok, men først efter jeg klikker på den form hvor der står "OK" knap og den tekst hvor der står 0.
Hvad gør jeg, bare for at vise en form, som jeg selv har valgt? Istedet for den form med teksten 0 og knappen OK.
Private Sub ListBox1_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDoubleClick MessageBox.Show(ListBox1.SelectedItem) End Sub
Hvis du skal have den vist i en form kan du lave en property på formen, og ligge informationer i den
Jeg tror at du misforstår mig. Jeg ville ikke dobbelt-klikke i hele listboxen, for at få en form frem. Men jeg vil derimod, dobbeltklikke på det f.eks. første Item i listboxen, så der kommer f.eks. Form2 frem. Men når jeg så dobbeltklikker på det ANDET Item, skal Form3 dukke frem?
Hvis du dobbeltkilkker på listbox item 1, så kommer værdien fra listbox 1 frem Hvis du dobbeltkilkker på listbox item 2, så kommer værdien fra listbox 2 frem osv.
Ellers må jeg give fortabt herfra, det virker hos mig.
Public Class Form2 Public Str As String = "" Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.Text = Str End Sub End Class
From1, med listbox med listboxitems
Private Sub ListBox1_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDoubleClick Dim Frm2 As New Form2 Frm2.Str = ListBox1.SelectedItem Frm2.ShowDialog() Frm2.Dispose()
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.