HTML Code:
Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
      ' Set the caption bar text of the form.  
      Me.Text = "Hello Danzey"
      ListBox1.Items.Add("200")
      ListBox1.Items.Add("140")
      ListBox1.Items.Add("120")
      ListBox2.Items.Add("jack")
      ListBox2.Items.Add("nina")
      ListBox2.Items.Add("lisa")
   End Sub
  
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
      MsgBox(ListBox2.SelectedItem.ToString() + ListBox1.SelectedItem.ToString())
   End Sub
End Class