Not Defteri Yapımı

    Not defteri yapılırken kullanacağımız Toollar;

Open File Dialog
Save File Dialog
Font Dialog
Color Dialog
Folderbrowser Dialog

Open File Dialog

OFD,bildiğimiz AÇ (Open) penceresidir. OFD 'da dosya yükleme işlemleri yapılır.


Save File Dialog
SFD, Kaydet dialog penceresidir. Dosyayı kaydetme işlemi yapılır.


                                                   Not Defteri Yapımı

New (Yeni Dosya Açma İşlemi)

Yeni dosya açmak aslında olan dosyayı temizlemek anlamına da gelir. Bunu düşünerek TextBox1'i temizleyerek Yeni Dosya açmış oluruz.

TextBox1.Text=""

Open(Aç)

OpenFileDialog1.Title = "Aç" 'Açılan dialog penceresinin başlığını değiştirdik.
        OpenFileDialog1.Filter = "Metin Dosyaları(*.txt)|*.txt|Resim Dosyaları(*.jpg)|*.jpg|Tüm Dosyalar(*.*)|*.*" 'Dialog penceresinde txt,jpg,tüm dosyalar diye uzantılar oluşturduk.
        OpenFileDialog1.ShowDialog()' Dialog penceresini açtık.
        OpenFileDialog1.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.Desktop ' Ofd penceresini açtığımız zaman ilk olarak Desktop karşımıza gelmesini sağlıyoruz.
        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then 'Eğer Ofd'dan dönen gerek OK' ise 
            TextBox1.Text = My.Computer.FileSystem.ReadAllText(OpenFileDialog1.FileName) 'Açılan dosyayı TextBox1'e yazmasını sağladık 
        End If

Save File Dialog(Kaydet)
Save File Dialog,Open File Dialog'un özelliklerini taşımaktadır.

SaveFileDialog1.Title = "Kaydet"
        SaveFileDialog1.Filter = "Metin Dosyaları(*.txt)|*.txt|Resim Dosyaları(*.jpg)|*.jpg|Tüm Dosyalar(*.*)|*.*"
        SaveFileDialog1.ShowDialog()
        SaveFileDialog1.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.Desktop
        If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            My.Computer.FileSystem.WriteAllText(SaveFileDialog1.FileName, TextBox1.Text, False)' Svf'den dönen değer OK' ise  TextBox1'de yazılan veriyi kaydeder. 
        End If

Exit
Çıkış için ;
End yazmak yeterlidir.

Edit Menüsü


Undo(Geri Al)
TextBox1.Undo()

Redo(İleri Al)
TextBox1.ClearUndo()

Cut(Kes)
TextBox1.Cut()

Copy(Kopyala)
TextBox1.Copy()

Paste(Paste)
TextBox1.Paste()

Select All(Tümünü Seç)
TextBox1.SelectAll()

Özel Olarak 
Seçileni Sil
TextBox1.SelectedText=""

Sözcük Kaydır
If TextBox1.WordWarp=True
    TextBox1.WordWrap=false
Else
    If TextBox1.WordWrap=True

Not defterinde yazı rengini değiştiremiyoruz fakat biz yaparsak olur :)


Yazı Tipi
 If FontDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            TextBox1.Font = FontDialog1.Font
            TextBox1.ForeColor = FontDialog1.Color
        End If

Yazı Rengi
  If ColorDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            TextBox1.ForeColor = ColorDialog1.Color
        End If

Not defterimizi daha sonra tekrar geliştirmek üzere buluşmak dileğiyle =)

Formlar Form İşlemleri

                          FORMLAR

Bu yayınım da Form nesnesiyle ilgili olarak

Yeni form oluşturma
Form kapatmak işlemleri
ShowDialog()
Mdi Formlar'dan bahsedeceğim.

Formlar; üzerine istediğimiz nesneyi koyabileceğimiz ve bu nesnelerle yazılım geliştirmemize olanak sağlayan arayüzlerdir.
Öncelikle kod ile yeni bir form oluşturmak için;

Dim frm As New Form
frm.Show()

komutlarını çalıştıralım.

frm.Show() --> Oluşturduğumuz formu göstermeye yarar. Oluşturduğumuz frm formu Form classından türetilmiştir. Projemizde Form2 adlı formumuz olsaydı eğer;
Dim frm as New Form2
diyerekten Form2 den yeni bir form oluşturabilirdik.

Ayrıca:
Project menüsünden Add Windows Form diyerek istenilen formu kod kullanmadan oluşturabiliriz.

Formu kapatmak istediğimizde ise ;
frm.Close() dememiz yeterlidir.

ShowDialog()
ShowDialog 'un yeni oluşturduğumuz Form'dan ayıran bir özelliği bulunmaktadır. Ana form üzerinden butona basıldığında yeni bir form oluşturmasını istediğimiz zaman yeni form açılacaktır. Bu yeni açılan formu kapatmadan ana formu kapatabiliriz.
Fakat ShowDialog oluşturduğumuz zaman yeni oluşan formu kapatmadan ana formu kapatmak mümkün değildir.

Mdi Formlar
Mdi formlar bildiğim kadarıyla bir form içerisinde bir den çok form açmaya yarayan formlardır.
Bir projede sadece bir tane mdi form olabilir.
Formun IsMdiContainer özelliğini True yaparak mdi form elde edebiliriz.

Visual Basic

           Vb (Visual Basic) bilindiği gibi dillerin basit olanıdır. Bazı farklılık dışında mantık C dillerine benzer.

            Hello World!

Dim mesaj as String
mesaj="Hello World"
label1.Text=mesaj


İki Sayıyı Toplamak;

Dim sayi1 as Integer
Dim sayi2 as Integer
Dim sonuc as Integer
sonuc=sayi1+sayi2
label1.Text=sonuc

Vb'nin en güzel tarafıda noktalama ve büyük-küçük düzeltmesini yapmasıdır.

   İF KULLANIMI

If Textbox1.Text=3 then  ' TextBox'a girilen sayının 3'e eşit olup olmama durumunu kontrol eder.
   MsgBox("Sayı 3 'e eşit")
Else
   MsgBox("Sayı 3'e eşit değildir")
(İç-içe if kullanımı mevcuttur)

FOR DÖNGÜSÜ

Dim i as Integer
For i=0 to 10
label1.Text=i
Next
MsgBox(i)

For döngüsünü daha kısa kullanımı olarak;

For i as Integer=0 to 10
.
.(İşlemler)
.
.
Next


Do While
1.Kullanım
Dim sayi as Integer=1
Do While sayi<5
.
.
.
Loop

2.Kullanım
Dim sayi as Integer=1
Do
sayi+=1
Loop While sayi<5

3.Kullanım
Dim sayi as Integer=1
Do Until sayi>=5
sayi+=1
Loop

4.Kullanım
Dim sayi as Integer=1
Do
sayi+=1
Loop Until sayi>=5

              NESNE OLUŞTURMA
Form üzerinde kullandığımız bütün nesneleri kod ile kendimiz oluşturabiliriz. Kolay bir örnek olarak;

Dim btn as Button
btn=new Button
me.Controls.add(btn)

Değişken tanımlar gibi btn nesnesi tanımlayıp Button classından türettik ve yeni bir buton oluştur. Bunun gibi istediğimiz nesneyi kod ile oluşturabiliriz. İleri de daha ayrıntılı örnekler vereceğim.