VB 6.0: Design a form contains a sorted list alphabetically.

Design a form contains a sorted list alphabetically such that the user can add the item from text to the list after click on command button "add".
Sol:
//for more program please visit www.programtubenotes.blogspot.in 

Private Sub Form_Load()
    List1.List=""

   List1.Sorted=True
   Text1.Text=""
    Command1.Vaption="add"
 End Sub
Private Sub Command1_Click()
list1.AddItem (Text1.Text)
Text1.Text = " "
End Sub

Output:-

after Run the get this window

• Write a C++ program to calculate age in years, months and days.