пара задач (Visual Basic)

Я сам обычный сисадмин, и Visual Basic не знаю вообстче, а мою сестру в универе нагрузили задачей, она соответственно обратилась ко мне... По идее она простая но мне не по силам... Народ, позрите, пжлст.:
_______________________________________________________________
Расположить на екранной форме 2 кнопки OptionButton, одно окно списка ListBox и одну кнопку CommandButton.
а) С помощью панели сообщений MsgBox вывести информацию в зависимости от выбранной кнопки OptionButton.

Private Sub Opt2_Click()
If Opt2. Value=True Then MsgBox "HUMMER, $200000"
End Sub

Private Sub Opt3_Click()
If Opt3. Value=True Then MsgBox "MTSUBISHI, $20000"
End Sub

б) Создать список фруктов. Выбранный элемент вывести в текстовое окно.
Private Sub List1_Click()
n=List1.ListIndex
Txt1.Text=List1.List(n)
End Sub
**********************************************************************

1.Создать на экранной форме две группы кнопок OptionButton по две кнопки в каждой группе. I группа - названия машин, II группа - цвет машины. в зависимости от выбранной машины и ее цвета, вывести стоимость машины в текстовое окно.

Price_Mb=50000: price_Mr=49000
price_Hb=200000: price_Hr=201000

If Opt_M.Value=True and Opt_B.Value=True Then
MsgBox "мерс, $50000 синий": Txt1=price_Mb
End if
If Opt_M.Value=True And Opt_R.Value=True Then
MsgBox "мерс, $50000 краснЫЙ": Txt1=price_MR
End if

.....
2. Проект имеет две формы. На I экранной форме расположить окно списка ListBox и кнопку CommandButton. На II экранной форме создать список фруктов с помощью елемента управления ListBox и расположить кнопку CommandButton. При нажатии на командную кнопку, расположенную на I экранной форме открывается II форма. На II форме выбрать из списка несколько элементов. При нажатии на командную кнопку, расположенную на II экоанной форме, выбранные елементы спсиска добавляются в окно списка, расположенного нна I экранной форме.

Form1 (код)
Private Sub Command3_Click()
Form2.Show
end Sub


Form2 (Код)
Private Sub Command3_Click()
num=Form2.List1.ListCount
For i=0 to num-1
If List1.Selected(i) Then
form1.List2.AddItem Form2.List.List(i)
End If
Next i
form2.Hide
End Sub
________________________________________________________________
П.С. Решение надо сделать в версии 5.0 (сори если че не то ляпнул.. не в курсах...)

Простите меня за ламерские вопросЫ...
Заранее спасибо!