-->

Sponsor Alanı

Slider

İlgi Çeken Videolar

Sağlık

Teknoloji

Sinema

Televizyon

Ne Nedir?

En5 Konular

ads

Girilen Sayıyı Büyükten Küçüğe Sıralamak

Bu derste basit bir ListBox'a yazılan 10 tane sayıyı büyükten küçüğe sıralayan basit bir program yapacağız.

Forma eklemeniz gereken araçlar:

1 Adet ListBox

Girilen Sayıyı Büyükten Küçüğe  Sıralama

Kod:

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim sayi(10), yedek, k, i, j As Long
        For i = 1 To 10
            sayi(i) = InputBox(i & ".Herhangi Sayı Girin...")
        Next i
        For i = 1 To 10
            For j = 1 To 10
                If sayi(i) > sayi(j) Then
                    yedek = sayi(j)
                    sayi(j) = sayi(i)
                    sayi(i) = yedek
                End If

            Next j
        Next i
        For k = 1 To 10
            ListBox1.Items.Add(sayi(k))
        Next k
    End Sub
End Class


Video

Doğum Günü Hesaplama Programı

Bu dersimizde visual basic ile doğum günü hesaplama  programı yapacağız.

Forma eklemeniz gereken araçlar:

1 tane Button
4 tane Label
4 tane TextBox

Tasarımı aşağıdaki gibi yapabilirsiniz.

Doğum Günü Hesaplama Programı

Kod:

Public Class Form1
    Dim a, b, c, g As Integer
    Dim d, f As String


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        a = Val(TextBox1.Text)
        b = Val(TextBox2.Text)
        c = Val(TextBox3.Text)
        If b = 1 Then
            d = "Ocak"
        ElseIf b = 2 Then
            d = "Şubat"
        ElseIf b = 3 Then
            d = "Mart"
        ElseIf b = 4 Then
            d = "Nisan"
        ElseIf b = 5 Then
            d = "Mayıs"
        ElseIf b = 6 Then
            d = "Haziran"
        ElseIf b = 7 Then
            d = "Temmuz"
        ElseIf b = 8 Then
            d = "Ağustos"
        ElseIf b = 9 Then
            d = "Eylül"
        ElseIf b = 10 Then
            d = "Ekim"
        ElseIf b = 11 Then
            d = "Kasım"
        ElseIf b = 12 Then
            d = "Aralık"
        End If
        If b = 12 Or b = 1 Or b = 2 Then
            f = "kış"
        ElseIf b = 3 Or b = 4 Or b = 5 Then
            f = "ilk bahar"
        ElseIf b = 6 Or b = 7 Or b = 8 Then
            f = "yaz"
        ElseIf b = 9 Or b = 10 Or b = 11 Then
            f = "son bahar"
        End If
        g = 2015 - c
        TextBox4.Text = a & " " & d & " " & c & " tarihinde bir " & f & " günü doğdunuz. " & g & " yaşındasınız."
    End Sub
End Class

Yaş Hesaplama Programı Video İzle




Bir önceki visual basic dresimizde Vb.Net 2010 ile Arka Plan Rengi Ayarlama programının yapımını anlattık.

Vb.Net 2010 ile Arka Plan Rengi Ayarlama

Visual Basic İle Arka Plan Rengini Değiştirme.


Bu dersimizde kolay bir şekilde form arka plan rengini değiştirmeyi göstereceğiz. Yeni başlayanlar için faydalı bir kodlama olacaktır.

Forma eklemeniz gereken nesneler:

1 Adet Combobox ekleyelim. Combobox seçili olduğu zaman sağ kısımda ok işareti çıkar ona  tıklayın.  Sonrasında ufak bir kutucuk açılacak orada en bulunan "Edit Items" yazana tıklayın. Ve yeni bir  boş kutucuk açılacak bu boş alanın içine renkleri yazacaksınız.

* Kırmızı
* Sarı
* Mavi
* Yeşil
* Siyah

Bu renkleri çoğaltabilirsiniz. Biz örnek olması açısından bu kadarla yetindik.

If ComboBox1.Text = "kırmızı" Then
            BackColor = Color.Red
        ElseIf ComboBox1.Text = "sarı" Then
            BackColor = Color.Yellow
        ElseIf ComboBox1.Text = "mavi" Then
            BackColor = Color.Blue
        ElseIf ComboBox1.Text = "yeşil" Then
            BackColor = Color.Green
        ElseIf ComboBox1.Text = "siyah" Then
            BackColor = Color.Black
        End If

Arka Plan Rengi Değiştirme Video İzle


3 Basamaklı Sayıların Farkını Bulmak

3 Basamaklı Sayıların Farkını Bulmak
Bu basit programla TextBox'a girilen 3 basamaklı sayıların farklarını gösteren kolay bir program yapacağız.


Forma eklemeniz gerekenler:

1 tane Label
1 tane Button
2 Adet TextBox ekleyin ve tasarımı resimdeki gibi yapabilirsiniz.

Button'a çift tıklayın ve içine aşağıdaki kodları yazın

a = TextBox1.Text  100
        b = TextBox1.Text Mod 10
        c = TextBox1.Text Mod 100
        d = c  10
        f = a + b + d
        g = TextBox2.Text  100
        h = TextBox2.Text Mod 10
        ı = TextBox2.Text Mod 100
        j = ı  10
        k = g + h + j


        If k > f Then
            Label1.Text = k - f
        Else
            Label1.Text = f - k
        End If

ve son olarak değişkenleri tamamlayın program hazırdır.

Dim a, b, c, d, f, g, h, ı, j, k As Integer

Ödeme Hesaplama Programı

Yemek, lokanta veya cafe sahipleri için  kullanışlı bir cafe ödeme hesaplama yazılımı yapımı.  Oldukça basit olan bu program yeni başlayanlar için ön ders olarak kendilerini geliştirmeleri için faydalı olacaktır.

Form'a eklemeniz geraken nesneler:

Form üzerinde görülen nesneleri ekleyiniz:

Ödeme Hesaplama Programı


Tasarımınızı yaptıktan sonra aşağıdaki adımları takip edin.

RadioButton1_Click Olayına aşağıdaki kodları yazınız.

If CheckBox1.Checked = True Then
a = 2

End If
If CheckBox2.Checked = True Then
b = 3

End If
If CheckBox3.Checked = True Then
c = 2.5

End If
If CheckBox4.Checked = True Then
d = 1.5

End If
If CheckBox5.Checked = True Then
f = 0.5

End If
TextBox1.Text = (a + b + c + d + f) * 0.8



RadioButton2_Click Olayına aşağıdaki kodları yazınız

If CheckBox1.Checked = True Then
a = 2

End If
If CheckBox2.Checked = True Then
b = 3

End If
If CheckBox3.Checked = True Then
c = 2.5

End If
If CheckBox4.Checked = True Then
d = 1.5

End If
If CheckBox5.Checked = True Then
f = 0.5

End If
TextBox1.Text = (a + b + c + d + f)



Değişkenleri tanımlayınız:


Dim a, b, c, d, f As Double

Büyükten Küçüğe Doğru Sayı Sıralama (Vb.Net)

Bu konumuzda Visual Basic ile Sayıları büyükten küçüğe doğru sıralama yapan basit ve kolay bir program yapımını öğreneceğiz.
Büyükten Küçüğe Doğru Sayı Sıralama (Vb.Net)

TextBox'lara girilen herhangi bir sayıların Button'a basarak büyükten küçüğe doğru en basit şekliyle sıralanışını hep beraber yapalım.

Form'a eklemeniz gereken nesneler aşağıda:

3 Tane TextBox ve bir adet Button ekleyelim.

İlk olarak değişken tanımlayacağız. Değişkeni tanımlamak için aşağıdaki kodu, form'da  Public Class Form1'in hemen altına yazınız.

Dim a, b, c, d As Integer

Sonrasında Buttona çift tıklayarak button1_click olayına aşağıdaki kodları yazın.

a = TextBox1.Text
b = TextBox2.Text
c = TextBox3.Text

If a > b Then
a = b
b = d
End If

 If a > c Then
d = a
a = c
c = d
End If

If b > c Then
d = c
c = b
b = d
End If



TextBox1.Text = a
TextBox2.Text = b
TextBox3.Text = c


Vb.Net İle 4 Basamaklı Sayının Toplamını Hesaplamak

Bu Konumuzda Visual basic İle 4 Basamaklı herhangi bir sayının her basamağında olan sayının tümünü hesaplamak.

Forma eklemeniz gereken araçlar:

1 tane textbox: 4 basamaklı sayımızı girmenize yaracak nesne
1 adet  label: sonuçları ekrana yansıtacak
1 adet button: Button ile işlem hesaplayacağız

Yukarıdaki nesneleri ekledikten sonra Button'a çift tıklayarak click olayın aşağıdaki kodu yazmanız yeterli olacaktır. Ancak bu kodlar Visual basic 6.0 a göre düzenlenmiştir.

a = TextBox1.Text Mod 10
b = TextBox1.Text  1000
c = (TextBox1.Text  100) Mod 10
d = (TextBox1.Text Mod 100)  10
label1.Text = a + b + c + d

vb.net


Visual Studio Eski Ayarlara Geri Dönmek

Microsof Visual Studio Programını Varsayılan Ayarlara Geri döndürmek  Reset Atmak.


Microsof Visual Studio dünyadaki en iyi yazılım programıdır. Ve bununla bilgisayarlarınızda kullandığınız neredeyse tüm programlar dahildir. Eğer sizde Visual Studio programı ile program yazıyorsanız, bazen bazı hatalar ile programda değişiklikler yapmış olabilirsiniz bu yüzden bazı aksaklıklar çıkabilir. Bundan dolayı programı tamamen varsayılan ayarlara döndürmeyi anlatacağım.

Ben anlatımı Vb.Net 2010'a göre anlatacağım hemen hemen her sürümünde ayarlar aynıdır. Menülerin yerleri değişik olabilir.

Visual Studio 2010 üst menü kısmından Tools olana tıklayın ve ardından açılan menüde Import and Export Settings tıklayın. Karşınıza bir pencere çıkacak içerisinde 3 seçenek var biz en alttakini işaretleyeceğiz. "Reset All Setting" işaretleyerek ileri (Next) butonuna tıklayın bir kaç kere Next butonu çıkacak hepsini tıklayarak geçin ve en sonunda Finish butonuna tıklayarak sonlandırın.

Bu ayarları yaptıktan sonra "Microsof Visual Studio" programınız varsayılan ayarlara geri dönmüş olacak.

Ayalarları yapmak için sizler için video hazırladım aşağıdaki video ile daha rahat işlemleri yapabilirsiniz.

Vb.Net 2010 reset Atmak Video izle