Visual Basic 6.0 da kullanışlı bir özellikte resimlerimizin üzerine tıkladığımızda bunların büyümesini sağlamamızdır.Bunlar hazırladığımız projede küçük olan resimleri bir anda büyütüp tekrar kendi boyutuna kolay bir yol ile getirmemizi sağlar.
1. Visual basic programımızı çalıştırıp , yeni bir proje açıyoruz(standart exe)
2. Açtığımız proje üzerine general bölümünden image seçip 4. farklı noktaya resimleri yerleştiriyoruz.resimleri properties kısmından picture tıklayarak seçiyoruz.
3. image1 ,image2 , image3 , image4 isimlerini resimlerimize veriyoruz.
4. şimdi kodlarını yazmaya sıra geldi image1. üzerine çift tıklayarak kod bölümüne geçiyoruz.sağ üst köşede bulunan procedure özelliğinden kodun click prosedürünü seçiyoruz.. ve aşşada ki kodları yazıyoruz.
Kod:
Private Sub Image1_Click()
normal
Image1.Width = 6000
Image1.Height = 5000
End Sub
Bu kodları diğer image2-3-4 içinde tek tek tekrarlıyoruz üstüne tıklayıp click prosedürü seçip kodları yazıyoruz.
form üzerine tıklayıp aşşada ki kodları yazıyoruz.
Kod:
Private Sub normal()
For i = 0 To Count - 1
Controls(i).Width = 1215
Controls(i).Height = 1095
Next
End Sub
5.Programımızı çalıştırdığımızda üstüne tıkladığımız resim büyüyecektir.
hadi bağalım
12-21-2010, 16:25
Küçük Resimleri Büyültme 
Normal
