hi.Jx_man, ur code is copying just 1 item, i want to copy multiple selected items.
I have tried the foll. code,Check it out where I m wrong-

Private Sub Command9_Click()
For i = List1.ListCount...

I want to copy the selected items from listbox1 to listbox2.
I know how to copy all the items but not selected.
Private Sub Command3_Click()
For i = 1 To List1.ListCount
List2.AddItem i
Next...

Can somebody tell me the diff b/w Debug & Debug.Print
If we write Debug.Print "i=" & i
It gives the o/p in the immediate window.

If we write print "i=" & i
It gives the normal o/p.

But what...

Private Sub Command2_Click()
Dim response As Integer

Response=MsgBox "Have a gala shopping", vbOKCancel + vbInformation + vbDefaultButton1, "welcome to the superMarket"

If response = vbYes...

Private Sub Command2_Click()
MsgBox "Have a gala shopping", vbOKCancel, "welcome to the superMarket"
End Sub

Hey, 1) I want to know how to add icons in the message Box .
2) How To Set the...

Ya , but there is any procedure to add the comment & unblock comment to the Standard toolbar..so we can do it quickly by clicking on it.

Single line Comments---?
Multi-Line Comments--?

I dont want the description, I want how to commnet the section of code.
Ex,
Line in C, Single Line Comments- //
Multi-Line Comments-/* */

Private Sub Command1_Click()
Select Case Me.Text1.Text
Case 1
MsgBox ("U Entered 1")
Case 2
MsgBox ("U entered 2")
Case 3
MsgBox ("u entered 3")
Case Default
MsgBox ("Default")