2014-04-24 45 views
0

你可以檢查這段代碼嗎? 我想嘗試顯示提示信息,如果用戶不從列表框中選擇任何選項如何顯示要求的flash信息從列表框中選擇一個列表

Public Sub btnHVM_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHVM.Click 

     ListBoxHVM.Visible = True 
     Code =ListBoxHVM.SelectedValue 

     If Code = "" Then 

      Dim Message As String = "Please make a selection" 
      MessageBox.Show(Message) 

     End If  
If Code = "B" Then 

      ChooseB1(Station) 
      ChooseB2(Station) 

     End If 

     If Code = "A" Then 
      ChooseA1(Station) 
      ChooseA2(Site) 
      ChooseA3() 
     End If 

End Sub 
+0

列表框' ListBoxHVM'只有當你點擊'btnHVM'時纔可見,那麼你如何選擇項目? –

+0

在我的表單中,我不必點擊btnHVM來使ListBoxHVM可見。是不是可見意味着它始終可見? – zayya

回答

0

您必須分配ListBoxHVM.SelectedValuecode

Code=ListBoxHVM.SelectedValue 

編輯2

If code = "" Then 
+0

其餘的都可以嗎? – zayya

+0

是的..你試過了嗎? – Bender

+0

我已經嘗試過了,但消息沒有彈出 – zayya

相關問題