![]() |
| |||||||
| Programlama Dilleri Pascal, Delphi, visual basic, java, database programları webtasarım |
![]() |
| | Seçenekler | Stil |
| | #1 (permalink) |
| Super Moderator ![]() | Visual Basic Formlar Visual Basic' te Formlar Bu yazıda Visual Basic'in olmazsa olmazı olan ve her programda mutlaka bir tane olması gereken formlar ve bu formların özellikleri üzerinde duracağız. Visual Basic' te iki çeşit form vardır. Bunlardan bir tanesi tek başına çalışan form türü olan Visual Basic ilk çalıştığı zaman ekrana gelen form ve projeye her eklenen yeni formun türü olan SDI (Single Document Interface) formlarıdır. Bu tür formların içinde başka formlar çalışamazlar. İkinci tür form çeşidi ise içerisinde başka formların çalışmasına izin veren ve MDI (Multi Document Interface) olarak bilinen form türüdür.Bu tür formların içinde Child form olarak adlandırılan ve normal SDI formların Child özelliğinin true yapılmasıyla oluşan formlar çalıştırılabilir. Aşağıdaki birince resimde örnek bir SDI form , ikinci resimde ise örnek bir MDI form ve bu formun içindeki Child formları görebilirsiniz. Şimdi sıra geldi formların özelliklerine. Bu özellikleri sırasıyla ele alalım. Caption: Formun başlığına yazılacak yazıyı belirtir.Bu özelliğe formun properties penceresinden ulaşılabileceği gibi kod kullanarak da formun başlığı değiştirilebilir. Icon : Formda kullanılacak iconu belirtir. Bu icon programınıza ait bir kısayol oluşturduğunuzda gözükecek icondur aynı zamanda. BorderStyle : Formun sınırlarının belirlendiği bu özellik aşağıda belirten değerleri alabilir. 0-None:Bu değer verildiğinde form boyutlandırılamaz ,taşınamaz ve kapatılamaz. Ayrıca formun çerçevesi ,başlığı,kontrol kutusu ,min ve max düğmeleri de formda yer almayacaktır. Çalıştığında aşağıdaki şekli alır. 1-FixedSingle: Bu değer verildiğinde kullanıcı formu büyültüp küçültemez ama formu taşıyabilir ve kapatabilir.Ayrıca formun boyutlarında herhangi bir değişiklik yapılamaz. 2-Sizable: Varsayılan değer budur ve formun tüm özellikleri kullanılabilir. 3-FixedDouble :Kullanıcı formu boyutlandıramaz ama formu taşıyabilir ve formu kapatabilir. 4-FixedToolWindow :Normal forma göre başlığı daha küçük olan ve kontrol menüsü içermeyen bir form oluşturur.Bu formun boyutları kullanıcı tarafından değiştirilemez. 5-SizableToolWindow :Yukarıdaki forma benzer terk farkı boyutları kullanıcı tarafından değiştirilebilir. MaxButton, MinButton : Formun sağ üst köşesinde bulunan ve formun büyültülüp küçültülmesi işlemleri için kullanılan düğmelerin formda bulunup bulunmamasını belirler. ControlBox : Formun sol üst köşesinde bulunan kontrol menüsünün görünüp görünmemesini sağlar.Bu değer true veya false değerlerini alabilir.Eğer bu değer true ise kontrol menüsü görünür ve bu form Alt+F4 tuş kombinasyonu kullanılarak kapatılabilir. Moveable : Bu özellik ile kullanıcının formu taşıyıp taşıyamayacağı belirlenir.Bu özellik true veya false değerini alabilir.Eğer bu değer true ise kullanıcı formu taşıyabilir. ShowInTaskbar : Bu özellik formun çalışma esnasında görev çubuğunda görünüp görünmeyeceğini belirler.True yada false değerlerini alabilir.Eğer bu özellik true ise program çalıştığında form görev çubuğunda görünür. AutoRedraw : Bu özellik ile formun üzerine başka bir form geldiğinde veya formun boyutlarıyla oynandığında formun üzerindeki yazı veya çizimlerin yenilenip yenilenmeyeceği belirlenir.Bu özellik true veya false olmak üzere iki değer alabilir. Eğer bu değer true ise formda yenileme yapılır ve formun üzerindeki yazı ve çizimler kaybolmaz. FontTransparent : Formun üzerine Print metodu ile yazılan yazıların zemin renginin olup olmamasını belirler. Bu özellik true yada false olabilir.Eğer true ise yazıların zemin rengi olmayacaktır. False ise yazı kandı zemin rengi üzerine yazılır ve altındaki nesneyi göstermez. WindowState : Formun ilk çalışmaya başlayacağı zaman alacağı durumu belirler.Bu özellik üç değer alabilir. 0-Normal :Normal durumda açılır. 1-Minimized :Simge durumunda açılır. 2-Maximized :Ekranın tamamını kaplayacak şekilde açılır. StartupPosition : Formun yüklenmeye başlandığı zaman ekran koordinatlarının neye göre belirleneceğini belirler.bu özellik dört farklı değer alabilir. 0-Manuel :Form tasarlandığı zamanki konumda açılır. 1-CenterOwner : Child özelliği true yapılmış formların MDI formun ortasında açılmasını sağlar. 2-CenterScreen :Formun ekranın ortasında açılmasını sağlar. 3-WindowsDefault :Formun konumunu Windows belirler. KeyPreview : Form aktifken basılan tuşlardan formun etkilenip etkilenmeyeceği bu özellik kullanılarak ayarlanılır.Bu özellik iki değer alabilir.Eğer değer true ise formda bulunan herhangi bir kontrolün üzerinde basılan tuşlar ilk önce formun KeyPress , Keydown ,KeyUp olaylarını meydana getirir.Bu değer false ise kontrolün üzerinde basılan tuşlar o kontrolün KeyPress , Keydown , KeyUp olaylarını meydana getirir. Count : Formdaki menüler dahil kontrol sayısını belirtir. Picture : Formun üzerinde gösterilecek resmi belirtir. MDIChild : Yukarıda bahsettiğimiz MDI formların içinde çalışabilen bir form istiyorsak bu özelliği true yapmamız gerekiyor. CurrentX, CurrentY : Formun üzerindeki aktif pixelin yerini belirtir. Formun üzerine yazdırılacak yazılar bu noktadan başlayarak yazdırılır. Width : Formun genişliğinin belirlendiği özellik. Heigth : Formun yüksekliğinin belirlendiği özellik. Left : Formun ekranın ne kadar solunda olacağının belirlendiği özellik. Top : Formun ekranın ne kadar üstünde yer olacağının belirlendiği özellik. Font : Formlara yazılacak yazıların fontlarının belirlendiği özellik. BackColor: Formun zemin renginin belirlendiği özellik. ScaleMode : Formda kullanılan ölçü birimini belirtir.Varsayılan ölçü birimi Twip'dir.Kullanılabi lecek ölçü birimleri ise; 1- Twip 2- Point 3- Pixel 4- Character 5- Inch 6- Millimeter 7- Centimeter MousePointer: Form üzerindeki fare işaretçisinin şeklini belirler. Enabled : Formların kullanılabir olup olmamasının belirlendiği özellik.Eğer bu özellik bir form için false ise o form proje içerisinde kullanılamaz.
__________________ imza yerine parmak bassam olmazmı İletişim Mail & Msn : azrailangel@sanalkam pus.org |
| | |
| | #2 (permalink) |
| Super Moderator ![]() Üyelik tarihi: Nov 2006 Kullanıcı No: 1785
Mesajlar: 3.313
Ettiği Teşekkür: 12 41 Mesajına 76 kere teşekkür edildi Rep Puanı : 315526 Rep
Seviyesi : ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() | Visual Basic 'de formlara uygulanabilecekler Bu yazımızda sizlerle birlikte Visual Basic 'de formlara uygulanabilecek olayları inceleyeceğiz. Bildiğimiz gibi Visual Basic olay temelli bir programa aracı olup, kullanılan kontroller için önceden tanımlanmış olaylara ilişkin kodlar yazılarak programın çalışması sağlanır. Örneğin siz ,formun üzerine çift tıklanması durumunda bir olayın meydana gelmesini istiyorsunuz. Bunun için formda tanımlanmış DblClick olayına ilgili kodu yazarak bu olayın meydana gelmesini sağlayabilirsiniz. Şimdi sırasıyla formlara uygulanabilecek olayları inceleyelim. Load() : Formun ilk defa hafızaya yüklendiği zaman meydana gelen olaydır.Bu olay kullanılarak ,kullanıcıya formu göstermeden önce yapılması gereken işler yapılabilir. Örneğin ,kullanıcı programı başlattığında ilk önce kullanıcıdan,kullanı cı adı ve şifresini alarak daha sonra yüklenecek ana formda bu bilgileri kullanarak bir veritabanına bağlantı sağlayabiliriz. Activate() : Formun ,programda aktif olması sırasında meydana gelir. Eğer programımızda bir tane form varsa bu form her zaman aktiftir. Bu olaya ,formun aktif olması sırasında yapılmasını istediğimiz olayları yazabiliriz. Deactivate() : Formun , programda aktivitesini kaybetmesi sırasında meydana gelen olaydır. Bu olaya ,formun aktivitesini kaybetmesi sırasında yapılmasını istediğimiz olayları yazabiliriz. Unload(Cancel As Integer) : Formun kapatılması sırasında meydana gelen olaydır. Ayrıca bu olayda tanımlanmış Cancel değişkenini kullanarak sadece bizim istediğimiz durumda formun kapanmasını sağlayabiliriz. Bunu gerçekleştirmek için ,yani formun kullanıcı tarafından hiçbir şekilde kapatılmaması için Cancel değişkenine True değerini atamalıyız. Aşağıdaki örnekte kullanıcı formu kapatmak istediği zaman bir pencereyle(inputbox) karşılaşıyor ve bir değer girmesi isteniyor. Eğer girdiği değer 2 ve 2'den büyükse form kapanmıyor. Private Sub Form_Unload(Cancel As Integer) Dim c c = InputBox("Formu kapatmak için bir sayi giriniz", "Çikis") If c > 2 Then Cancel = True Else Cancel = False End If End Sub Not : Bu olay formun End komutuyla sonlandırılması sırasında meydana gelmez. Yani bu olayın meydana gelebilmesi için formun program tarafından End komutu kullanılarak sonlandırılmaması gerekir. Yukarıdaki programı çalıştırdığınızda aşağıdakine benzer bir ekranla karşılaşmalısınız. Resize() : Formun boyutlarının değiştirilmesi sırasında meydana gelir.Örneğin formun genişliğinin veya yüksekliğinin değiştirilmesi bu olayın meydana gelmesini sağlar. KeyPress(KeyAscii As Integer) : Formun çalışması sırasında yön ve kontrol(Ctrl,Alt,Shi ft) tuşları dışında herhangi bir tuşa basılması sırasında meydana gelen olaydır. Bu olayda basılan tuşun Ascii değeri KeyAscii değişkenine atanır. Bu değişkeni kullanarak hangi tuşa basıldığını öğrenebilirsiniz. Aşağıdaki program, formun çalışması sırasında hangi tuşa basıldığını ekrana yazar. Private Sub Form_KeyPress(KeyAsc ii As Integer) Show Print Chr(KeyAscii) & " tusuna bastiniz." End Sub KeyDown(KeyCode As Integer, Shift As Integer) : Bu olay herhangi bir tuşa basıldığı anda meydana gelir. Bu olayda iki parametre kullanılır.Bu parametrelerin biri basılan tuşun Ascii değerini , diğeri ise bu tuşla birlikte Shift,Ctrl ve Alt tuşlarından herhangi birine basılıp basılmadığı konusunda bilgi tutar. Aşağıdaki tabloda Shift parametresinin alabileceği değerler ve açıklamalarını bulabilirsiniz. Shift Parametresinin Değeri Açıklama 0 Shift ,Ctrl ,Alt tuşlarından herhangi birisi basılı durumda değil. 1 Shift tuşu basılı durumda. 2 Ctrl tuşu basılı durumda. 3 Shift ve Ctrl tuşları basılı durumda. 4 Alt tuşu basılı durumda. 5 Shift ve Alt tuşları basılı durumda. 6 Ctrl ve Alt tuşları basılı durumda. 7 Shift ,Ctrl ve Alt tuşları basılı durumda. Aşağıdaki örnekte kullanıcı Ctrl tuşu ile birlikte A tuşuna basarsa kullanıcıya mesaj verecektir.Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 65 And Shift = 2 Then MsgBox "Ctrl+A tus kombinasyonunu kullandiniz." End If End Sub KeyUp(KeyCode As Integer, Shift As Integer) : Bu olay ise kullanıcının bastığı tuşu bırakması sırasında meydana gelir. Yukarıdaki tabloda Shift parametresi için gösterilen değerler bu olayda da geçerlidir. MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) : Bu olay formun üzerinde mouse'un herhangi bir tuşuna basılması sırasında meydana gelir. Bu olayda kullanılan parametrelerden Button parametresi,kullanıc ını mouse'un hangi tuşuna bastığı bilgisine tutar ve kullanıcı mouse'un sol tuşuna basmışsa 1,sağ tuşuna basmışsa 2,her iki tuşa birlikte basmışsa 3 değerini alır. İkinci parametre olan Shift ise mouse'un tuşlarına basıldığı sırada herhangi bir kontrol karakterine basılıp basılmadığı bilgisini tutar ve yukarıdaki tabloda açıklanan değerler bu olaydaki Shift parametresi için de geçerlidir.X ve Y parametreleri ise bu olayının meydana geldiği andaki mouse işaretçisinin yerinin Twip cinsinden değerlerini tutarlar. Aşağıdaki örnekte mouse'un sol tuşuna tıklandığı yerin Twip olarak değeri kullanıcıya mesaj olarak gösteriliyor. Private Sub Form_MouseDown(Butto n As Integer, Shift As Integer, X As Single, Y As Single) If Button = 1 Then MsgBox ("Mouse'un yeri :" & Str(X) & "," & Str(Y)) End If End Sub MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) : Bu olay kullanıcını mouse'un bastığı tuşunu serbest bırakması sırasında meydana gelir ve kullanılan parametreler MouseDown olayındakilerle aynıdır. MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) : Bu olay mouse işaretçisinin form üzerindeki yerinin değişmesi sırasında meydana gelir ve kullanılan parametreler MouseDown olayındakilerle aynıdır. Click() : Bu olay mouse ile formun herhangi bir yerine tek tıklama yapıldığında meydana gelir. DblClick() : Bu olay mouse ile formun herhangi bir yerine üst üste iki tıklama yapıldığında meydana gelir. Aşağıdaki programda kullanıcıya, formun herhangi bir yerine çift tıklaması durumunda bir mesaj gösterilecektir. Private Sub Form_DblClick() MsgBox "Mouse ile Çift Tıklama Yaptiniz.", , "Çift Tiklama" End Sub
__________________ imza yerine parmak bassam olmazmı İletişim Mail & Msn : azrailangel@sanalkam pus.org |
| | |
| | #3 (permalink) |
| Super Moderator ![]() Üyelik tarihi: Nov 2006 Kullanıcı No: 1785
Mesajlar: 3.313
Ettiği Teşekkür: 12 41 Mesajına 76 kere teşekkür edildi Rep Puanı : 315526 Rep
Seviyesi : ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() | Visual Basic 'de formlara uygulanabilecekler Bu yazımızda sizlerle birlikte Visual Basic 'de formlara uygulanabilecek olayları inceleyeceğiz. Bildiğimiz gibi Visual Basic olay temelli bir programa aracı olup, kullanılan kontroller için önceden tanımlanmış olaylara ilişkin kodlar yazılarak programın çalışması sağlanır. Örneğin siz ,formun üzerine çift tıklanması durumunda bir olayın meydana gelmesini istiyorsunuz. Bunun için formda tanımlanmış DblClick olayına ilgili kodu yazarak bu olayın meydana gelmesini sağlayabilirsiniz. Şimdi sırasıyla formlara uygulanabilecek olayları inceleyelim. Load() : Formun ilk defa hafızaya yüklendiği zaman meydana gelen olaydır.Bu olay kullanılarak ,kullanıcıya formu göstermeden önce yapılması gereken işler yapılabilir. Örneğin ,kullanıcı programı başlattığında ilk önce kullanıcıdan,kullanı cı adı ve şifresini alarak daha sonra yüklenecek ana formda bu bilgileri kullanarak bir veritabanına bağlantı sağlayabiliriz. Activate() : Formun ,programda aktif olması sırasında meydana gelir. Eğer programımızda bir tane form varsa bu form her zaman aktiftir. Bu olaya ,formun aktif olması sırasında yapılmasını istediğimiz olayları yazabiliriz. Deactivate() : Formun , programda aktivitesini kaybetmesi sırasında meydana gelen olaydır. Bu olaya ,formun aktivitesini kaybetmesi sırasında yapılmasını istediğimiz olayları yazabiliriz. Unload(Cancel As Integer) : Formun kapatılması sırasında meydana gelen olaydır. Ayrıca bu olayda tanımlanmış Cancel değişkenini kullanarak sadece bizim istediğimiz durumda formun kapanmasını sağlayabiliriz. Bunu gerçekleştirmek için ,yani formun kullanıcı tarafından hiçbir şekilde kapatılmaması için Cancel değişkenine True değerini atamalıyız. Aşağıdaki örnekte kullanıcı formu kapatmak istediği zaman bir pencereyle(inputbox) karşılaşıyor ve bir değer girmesi isteniyor. Eğer girdiği değer 2 ve 2'den büyükse form kapanmıyor. Private Sub Form_Unload(Cancel As Integer) Dim c c = InputBox("Formu kapatmak için bir sayi giriniz", "Çikis") If c > 2 Then Cancel = True Else Cancel = False End If End Sub Not : Bu olay formun End komutuyla sonlandırılması sırasında meydana gelmez. Yani bu olayın meydana gelebilmesi için formun program tarafından End komutu kullanılarak sonlandırılmaması gerekir. Yukarıdaki programı çalıştırdığınızda aşağıdakine benzer bir ekranla karşılaşmalısınız. Resize() : Formun boyutlarının değiştirilmesi sırasında meydana gelir.Örneğin formun genişliğinin veya yüksekliğinin değiştirilmesi bu olayın meydana gelmesini sağlar. KeyPress(KeyAscii As Integer) : Formun çalışması sırasında yön ve kontrol(Ctrl,Alt,Shi ft) tuşları dışında herhangi bir tuşa basılması sırasında meydana gelen olaydır. Bu olayda basılan tuşun Ascii değeri KeyAscii değişkenine atanır. Bu değişkeni kullanarak hangi tuşa basıldığını öğrenebilirsiniz. Aşağıdaki program, formun çalışması sırasında hangi tuşa basıldığını ekrana yazar. Private Sub Form_KeyPress(KeyAsc ii As Integer) Show Print Chr(KeyAscii) & " tusuna bastiniz." End Sub KeyDown(KeyCode As Integer, Shift As Integer) : Bu olay herhangi bir tuşa basıldığı anda meydana gelir. Bu olayda iki parametre kullanılır.Bu parametrelerin biri basılan tuşun Ascii değerini , diğeri ise bu tuşla birlikte Shift,Ctrl ve Alt tuşlarından herhangi birine basılıp basılmadığı konusunda bilgi tutar. Aşağıdaki tabloda Shift parametresinin alabileceği değerler ve açıklamalarını bulabilirsiniz. Shift Parametresinin Değeri Açıklama0 Shift ,Ctrl ,Alt tuşlarından herhangi birisi basılı durumda değil. Aşağıdaki örnekte kullanıcı Ctrl tuşu ile birlikte A tuşuna basarsa kullanıcıya mesaj verecektir. Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 65 And Shift = 2 Then MsgBox "Ctrl+A tus kombinasyonunu kullandiniz." End If End Sub KeyUp(KeyCode As Integer, Shift As Integer) : Bu olay ise kullanıcının bastığı tuşu bırakması sırasında meydana gelir. Yukarıdaki tabloda Shift parametresi için gösterilen değerler bu olayda da geçerlidir. MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) : Bu olay formun üzerinde mouse'un herhangi bir tuşuna basılması sırasında meydana gelir. Bu olayda kullanılan parametrelerden Button parametresi,kullanıc ını mouse'un hangi tuşuna bastığı bilgisine tutar ve kullanıcı mouse'un sol tuşuna basmışsa 1,sağ tuşuna basmışsa 2,her iki tuşa birlikte basmışsa 3 değerini alır. İkinci parametre olan Shift ise mouse'un tuşlarına basıldığı sırada herhangi bir kontrol karakterine basılıp basılmadığı bilgisini tutar ve yukarıdaki tabloda açıklanan değerler bu olaydaki Shift parametresi için de geçerlidir.X ve Y parametreleri ise bu olayının meydana geldiği andaki mouse işaretçisinin yerinin Twip cinsinden değerlerini tutarlar. Aşağıdaki örnekte mouse'un sol tuşuna tıklandığı yerin Twip olarak değeri kullanıcıya mesaj olarak gösteriliyor. Private Sub Form_MouseDown(Butto n As Integer, Shift As Integer, X As Single, Y As Single) If Button = 1 Then MsgBox ("Mouse'un yeri :" & Str(X) & "," & Str(Y)) End If End Sub MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) : Bu olay kullanıcını mouse'un bastığı tuşunu serbest bırakması sırasında meydana gelir ve kullanılan parametreler MouseDown olayındakilerle aynıdır. MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) : Bu olay mouse işaretçisinin form üzerindeki yerinin değişmesi sırasında meydana gelir ve kullanılan parametreler MouseDown olayındakilerle aynıdır. Click() : Bu olay mouse ile formun herhangi bir yerine tek tıklama yapıldığında meydana gelir. DblClick() : Bu olay mouse ile formun herhangi bir yerine üst üste iki tıklama yapıldığında meydana gelir. Aşağıdaki programda kullanıcıya, formun herhangi bir yerine çift tıklaması durumunda bir mesaj gösterilecektir. Private Sub Form_DblClick() MsgBox "Mouse ile Çift Tıklama Yaptiniz.", , "Çift Tiklama" End Sub
__________________ imza yerine parmak bassam olmazmı İletişim Mail & Msn : azrailangel@sanalkam pus.org |
| | |
| | #4 (permalink) |
| Super Moderator ![]() Üyelik tarihi: Nov 2006 Kullanıcı No: 1785
Mesajlar: 3.313
Ettiği Teşekkür: 12 41 Mesajına 76 kere teşekkür edildi Rep Puanı : 315526 Rep
Seviyesi : ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() | Visual Basic 'de formlara uygulanabilecekler Bu yazımızda sizlerle birlikte Visual Basic 'de formlara uygulanabilecek olayları inceleyeceğiz. Bildiğimiz gibi Visual Basic olay temelli bir programa aracı olup, kullanılan kontroller için önceden tanımlanmış olaylara ilişkin kodlar yazılarak programın çalışması sağlanır. Örneğin siz ,formun üzerine çift tıklanması durumunda bir olayın meydana gelmesini istiyorsunuz. Bunun için formda tanımlanmış DblClick olayına ilgili kodu yazarak bu olayın meydana gelmesini sağlayabilirsiniz. Şimdi sırasıyla formlara uygulanabilecek olayları inceleyelim. Load() : Formun ilk defa hafızaya yüklendiği zaman meydana gelen olaydır.Bu olay kullanılarak ,kullanıcıya formu göstermeden önce yapılması gereken işler yapılabilir. Örneğin ,kullanıcı programı başlattığında ilk önce kullanıcıdan,kullanı cı adı ve şifresini alarak daha sonra yüklenecek ana formda bu bilgileri kullanarak bir veritabanına bağlantı sağlayabiliriz. Activate() : Formun ,programda aktif olması sırasında meydana gelir. Eğer programımızda bir tane form varsa bu form her zaman aktiftir. Bu olaya ,formun aktif olması sırasında yapılmasını istediğimiz olayları yazabiliriz. Deactivate() : Formun , programda aktivitesini kaybetmesi sırasında meydana gelen olaydır. Bu olaya ,formun aktivitesini kaybetmesi sırasında yapılmasını istediğimiz olayları yazabiliriz. Unload(Cancel As Integer) : Formun kapatılması sırasında meydana gelen olaydır. Ayrıca bu olayda tanımlanmış Cancel değişkenini kullanarak sadece bizim istediğimiz durumda formun kapanmasını sağlayabiliriz. Bunu gerçekleştirmek için ,yani formun kullanıcı tarafından hiçbir şekilde kapatılmaması için Cancel değişkenine True değerini atamalıyız. Aşağıdaki örnekte kullanıcı formu kapatmak istediği zaman bir pencereyle(inputbox) karşılaşıyor ve bir değer girmesi isteniyor. Eğer girdiği değer 2 ve 2'den büyükse form kapanmıyor. Private Sub Form_Unload(Cancel As Integer) Dim c c = InputBox("Formu kapatmak için bir sayi giriniz", "Çikis") If c > 2 Then Cancel = True Else Cancel = False End If End Sub Not : Bu olay formun End komutuyla sonlandırılması sırasında meydana gelmez. Yani bu olayın meydana gelebilmesi için formun program tarafından End komutu kullanılarak sonlandırılmaması gerekir. Yukarıdaki programı çalıştırdığınızda aşağıdakine benzer bir ekranla karşılaşmalısınız. Resize() : Formun boyutlarının değiştirilmesi sırasında meydana gelir.Örneğin formun genişliğinin veya yüksekliğinin değiştirilmesi bu olayın meydana gelmesini sağlar. KeyPress(KeyAscii As Integer) : Formun çalışması sırasında yön ve kontrol(Ctrl,Alt,Shi ft) tuşları dışında herhangi bir tuşa basılması sırasında meydana gelen olaydır. Bu olayda basılan tuşun Ascii değeri KeyAscii değişkenine atanır. Bu değişkeni kullanarak hangi tuşa basıldığını öğrenebilirsiniz. Aşağıdaki program, formun çalışması sırasında hangi tuşa basıldığını ekrana yazar. Private Sub Form_KeyPress(KeyAsc ii As Integer) Show Print Chr(KeyAscii) & " tusuna bastiniz." End Sub KeyDown(KeyCode As Integer, Shift As Integer) : Bu olay herhangi bir tuşa basıldığı anda meydana gelir. Bu olayda iki parametre kullanılır.Bu parametrelerin biri basılan tuşun Ascii değerini , diğeri ise bu tuşla birlikte Shift,Ctrl ve Alt tuşlarından herhangi birine basılıp basılmadığı konusunda bilgi tutar. Aşağıdaki tabloda Shift parametresinin alabileceği değerler ve açıklamalarını bulabilirsiniz. Shift Parametresinin Değeri Açıklama 0 Shift ,Ctrl ,Alt tuşlarından herhangi birisi basılı durumda değil. Aşağıdaki örnekte kullanıcı Ctrl tuşu ile birlikte A tuşuna basarsa kullanıcıya mesaj verecektir. Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 65 And Shift = 2 Then MsgBox "Ctrl+A tus kombinasyonunu kullandiniz." End If End Sub KeyUp(KeyCode As Integer, Shift As Integer) : Bu olay ise kullanıcının bastığı tuşu bırakması sırasında meydana gelir. Yukarıdaki tabloda Shift parametresi için gösterilen değerler bu olayda da geçerlidir. MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) : Bu olay formun üzerinde mouse'un herhangi bir tuşuna basılması sırasında meydana gelir. Bu olayda kullanılan parametrelerden Button parametresi,kullanıc ını mouse'un hangi tuşuna bastığı bilgisine tutar ve kullanıcı mouse'un sol tuşuna basmışsa 1,sağ tuşuna basmışsa 2,her iki tuşa birlikte basmışsa 3 değerini alır. İkinci parametre olan Shift ise mouse'un tuşlarına basıldığı sırada herhangi bir kontrol karakterine basılıp basılmadığı bilgisini tutar ve yukarıdaki tabloda açıklanan değerler bu olaydaki Shift parametresi için de geçerlidir.X ve Y parametreleri ise bu olayının meydana geldiği andaki mouse işaretçisinin yerinin Twip cinsinden değerlerini tutarlar. Aşağıdaki örnekte mouse'un sol tuşuna tıklandığı yerin Twip olarak değeri kullanıcıya mesaj olarak gösteriliyor. Private Sub Form_MouseDown(Butto n As Integer, Shift As Integer, X As Single, Y As Single) If Button = 1 Then MsgBox ("Mouse'un yeri :" & Str(X) & "," & Str(Y)) End If End Sub MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) : Bu olay kullanıcını mouse'un bastığı tuşunu serbest bırakması sırasında meydana gelir ve kullanılan parametreler MouseDown olayındakilerle aynıdır. MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) : Bu olay mouse işaretçisinin form üzerindeki yerinin değişmesi sırasında meydana gelir ve kullanılan parametreler MouseDown olayındakilerle aynıdır. Click() : Bu olay mouse ile formun herhangi bir yerine tek tıklama yapıldığında meydana gelir. DblClick() : Bu olay mouse ile formun herhangi bir yerine üst üste iki tıklama yapıldığında meydana gelir. Aşağıdaki programda kullanıcıya, formun herhangi bir yerine çift tıklaması durumunda bir mesaj gösterilecektir. Private Sub Form_DblClick() MsgBox "Mouse ile Çift Tıklama Yaptiniz.", , "Çift Tiklama" End Sub
__________________ imza yerine parmak bassam olmazmı İletişim Mail & Msn : azrailangel@sanalkam pus.org |
| | |
![]() |
| Tags |
| visual, basic, formlar |
| Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| Seçenekler | |
| Stil | |
| |
Benzer Konular | ||||
| Konu | Yazan | Forum | Cevaplar | son Mesaj |
| Visual Basic Derleyiciler | azrailangel | Programlama Dilleri | 2 | 21.09.08 12:13 |
| Visual Basic Menüleri ve Anlamları | azrailangel | Programlama Dilleri | 3 | 05.05.08 10:03 |
| Visual Basic Tanımı ve kullanımı | azrailangel | Programlama Dilleri | 0 | 19.05.07 07:47 |
| Visual basic uzman kitap linkleri | kampusgaleri | E-kitap | 3 | 05.05.07 01:59 |
| Html - Visual Basic - Asp | RuDeSpY | Web Tasarım | 0 | 28.04.07 10:23 |