How to use "Select Case" with List Box

[Mohammad Ishaq]

Hi, I am working on an excel vba project.I have the following controls on the form.
1.User Form
2.Fram
3.Two List Boxes
4.Option Buttons
5.Text Boxes

I want that when i select any item in the List Box 1 ,the caption of Fram and optionbutton change accordingly.I have write a code using select case but it work only for the first two items and after that the code is doing nothing.I have attached the file please let me guide to correct the code.Thanks

 

[Debaser]

Your code doesn't really make sense as written. All you need to do is check the Listindex of the control:

Select Case Listbox1.Listindex
Case 0
' first item
Case 1 
'second item
Case 2
' third item
End Select

 

[Mohammad Ishaq]

Thanks .Its Ok now.