[shwehdi4pc]

لنسخ صف في TextBox

Private Sub listbox1_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles listBox1.MouseDoubleClick
textbox1.text = listbox1.Text
end sub