Konu: Visual Basic.net 2005 Öğrenim Kursuna Hoşgeldiniz :)

Arkadaşlar bildiğiniz gibi visual basic.net 2005 öğreteceğim diye bir konu açmıştım ve şükürler olsun faaliyete geçiriyorum

Hadi Bismillah,

VİSUAL BASİC.NET 2005 BAŞLANGIÇ

Hiç bilmeyenler için ufak bir örnek ve kodlama

File--> New Project--> Windows Application ve Ardından Form1'imiz geliyor ekrana bu ekran yazdığımız kodların oluştuğu ekrandır. Toolbox'ımızda gelsin.

View--> Toolbox diyerek sol tarafımızda bir menü göreceğiz gördüğümüz menü bize çok lazım olacak sakın kapamayın veya gizlemeyin

Properties Kısmımız'da lazım olacak. Oradan gerekli ayarlamalar ve uygulamamız için gerekli isimlendirmeler yapacağız.

Formumuza 1 tane Buton ekliyoruz ve Properties penceresi Text Kısmından "Hoşgeldiniz Vb.net 2005'e" Yazıyoruz. Ardından Form1'e tıklıyoruz. Yine properties penceresinden Text Kısmından "Visual Basic.Net 2005 Öğreniyoruz" Yazıyoruz ve burada işimiz bitiyor.

Şimdi Buton'a 2 kere çift tıklıyoruz kodlama bölümümüz geliyor. Oraya şu kodları yerleştiriyoruz.

Kod:

PublicClass Form1 PrivateSub Button1_Click(ByValsender AsSystem.Object, ByValeAs System.EventArgs) HandlesButton1.Click MsgBox " Visual Basic.net 2005 Öğrenim Kursu " EndSub EndClass

Ardından Play yani F5 tuşumuza basıp uygulamamızı başlatıyoruz ve Butonumuza tıkladığımızda herşey hazır

VİSUAL BASİC.NET 2005 ÖĞRENİYORUZ.

Bölüm 1: Visual Basic Başlangıç Uygulamalarımız

Aşağıdaki Örnek uygulamalar kitap içerisindeki diğer kodların anlaşılabilmesi ve uygulanabilmesi için gereklidir. Bu amaçla tamamını anlamaya çalışırsanız sevinirim

Konu 1: Kontrol İçerisindeki Veriyi Matematiksel İşlemlerde Kullanmak

İlk Olarak 1 Buton ve 1 TextBox ekleyin. İlk konumuzu tamamlayalım

Arkadaşlar hepsi ayrı bir uygulamadır. Mesela bir konu işliyorsanız onunla ilgili kodlar yazın. O konu bitince diğer konuya geçin. Eski konudaki kodları butonları temizleyip, yeni kodlama için gerekli alanı oluşturun.

Kodumuz:

Kod:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim Mat_Deger As Decimal
Dim Veri_Icerik As String
Veri Icerik = Textboxt1.Text 'Kontrol İçeriğini Al
Mat_Deger = Convert.ToDecimal(Veri_Icerik)
End Sub

Veya

Kodumuz:

Kod:

Private Sub Button2_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim Mat_Deger As Decimal Dim Veri_Icerik As StringVeri Icerik = Textboxt1.Text
Mat_Deger = Convert.ToInt32(Veri_Icerik)
 End Sub

Üstteki Satırlardan sonra uygulamamızı çalıştırıyoruz " Button " kontrolüne tıklarsanız forumumuzda herhangi bir değişiklik olmayacaktır.

Sebebi basittir, henüz yazdırma işlemi gerçekleştirilmemiştir. 2. konumuzda yazdırma işlemimize geçiyoruz

Konu 2: Matematiksek İfadeye Sahip Değişkeni Yazdırmak

Kullanıcının form üzerinde okuyabildiği tüm değerler "String" sınıfına ait değerlerden oluşur. Bu amaçla sayısal bir değerre sahip değişkenin değerini yazdırmak için yine dönüşüm işlemini uygulayacağız

Kodumuz:

Kod:

Private Sub Button2_Click(ByVal sender As System.Object,ByVal e As System.EventArgs)Handles Button2.Click

Kod:

 
Dim Mat_Deger As Integer

Dim Veri_Icerik As String
Veri_Icerik = TextBoxt1.Text
Mat_deger = Convert.ToInt32(Veri_Icerik)
Me.Text = Mat_Deger.ToString() 'Yazdır
 
 
End Sub

Yazdırma İşlemimizde böylece bitti. Sıra 3. konumuzda

Konu 3: Kontrol İçerisindeki Değeri Reel Bir Değişkene Aktarmak

Bu işlem decimal tipli değişkene nasıl uygulandıysa aynı şekilde "Double" veya "Single" tip değişkenede uygulanabilir.

Kodumuz:

Kod:

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Kod:

 
Dim Mat_Deger As Double 
 
 
 

[LEFT]
Dim Veri_Icerik As String
Veri_Icerik = Textbox1.Text
Mat_Deger = Convert.ToDouble(Veri_Icerik)
 
Me.Text = Mat_Deger.ToString() 
End Sub
 
 

Konu 4: Kontrollere String Veri Aktarmak

"Visual BASIC .Net 2005" uygulamalarında kontrol içerisine aşağıdaki şekilde veri aktarabiliriz.

Kodumuz:

Kod:

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click 
TextBox1.Text = "Gazi Üniversitesi"
 

Kod:

Kod:

 
End Sub
 

Veya

Kodumuz:

Kod:

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handless Button4.Click 
Dim Deger As String
 

Kod:

Kod:

 
Deger = "Gazi Üniversitesi" 
TextBox1.Text = Deger 
End Sub
 
 

Not: Arkadaşlar hepsi ayrı bir uygulamadır. Mesela bir konu işliyorsanız onunla ilgili kodlar yazın. O konu bitince diğer konuya geçin. Eski konudaki kodları butonları temizleyip, yeni kodlama için gerekli alanı oluşturun.

Desteğinizi hissediyorum. Duanızı esirgemeyin benim için en büyük mutluluktur

Ayrıca Resimlide anlatıcam Paint bozulmuş yarına resimleride ekleyeceğim