Свойство Picture на формата?

зареждам графични изображения във формата чрез следната програмна конструкция:

Код:

---

Private Sub Form_Load()
List1.AddItem "Париж"
List1.AddItem "Лондон"
List1.AddItem "Виена"
List1.AddItem "Ню Йорк"
End Sub

Private Sub List1_Click()
Select Case List1.ListIndex
  Case 0
    Form2.Picture = LoadPicture("D:\DOKUMENTI\VB_Pictures\viena.jpg")
    Form2.Show
  Case 1
    Form2.Picture = LoadPicture("D:\DOKUMENTI\VB_Pictures\london.jpg")
    Form2.Show
  Case 2
    Form2.Picture = LoadPicture("D:\DOKUMENTI\VB_Pictures\New York.jpg")
    Form2.Show
  Case 3
    Form2.Picture = LoadPicture("D:\DOKUMENTI\VB_Pictures\Paris.jpg")
    Form2.Show
End Select
End Sub

---

като използвам ListBox.
Проблема е следния - не можах да открия във свойствата на формата как да задам при зареждане на графични изображения със различна големина (например 640х480 и 1024х760), във формата, изображенията да ми се преоразмеряват съобразно размера на формата.Защото иначе не могат да се виждат целите изображения или ако са много малки остава празно място отстрани.
Ако някой може да помогне? :)

Няма да стане така. Картината за бекграунд на формата няма опции за рисайз. Зареди изображение и контролирай неговата ширина и височина така:

Private Sub Form2_Load()
Image1.Stretch = True
Image1.Picture = LoadPicture("D:\DOKUMENTI\VB_Pictures\New York.jpg")
End Sub

Private Sub Form2_Resize()
Image1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight
End Sub

Благодаря @Tommorow.
ще пробвам твоя начин. :)