需要顯示Itembox值的幫助

對於visual basic和im，我有一個難以將itembox值顯示到我的標籤顯示的新品。有任何想法嗎？需要顯示Itembox值的幫助

Private Sub frmMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 
    'fill the list box with values 
    lstNames.Items.Add("Smith, Joe") 
    lstNames.Items.Add("Jones, Mary") 
    lstNames.Items.Add("Adkari, Joel") 
    lstNames.Items.Add("Lin, Sue") 
    lstNames.Items.Add("Li, Vicky") 
    lstNames.SelectedIndex = 0 
End Sub 

Private Sub MainForm_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick 
    Select Case (lstNames.SelectedIndex) 
     Case 0 
      lblDisplay.Text = "3388" 
     Case 1 
      lblDisplay.Text = "3356" 
     Case 2 
      lblDisplay.Text = "2487" 
     Case 3 
      lblDisplay.Text = "1111" 
     Case 4 
      lblDisplay.Text = "2222" 
    End Select 
End Sub

來源

2013-03-04 Steven Thach

問題是什麼？ – 2013-03-04 23:19:39

你的意思是處理Form.MouseClick事件，或者是一個Button.Click事件？正如您現在所使用的，當我單擊窗體上的任何位置時，此代碼適用於我（更改標籤文本）。 – djv 2013-03-04 23:29:02

我想嘗試從MainForm.MouseClick事件移動你的代碼lstNames.ItemSelected

在lstNames雙擊控制在設計視圖應該爲你創造這個事件默認。

來源

2013-03-04 23:30:59

+1好抓，大概是這個問題 – Steve 2013-03-04 23:35:00

需要顯示Itembox值的幫助

回答

相關問題