Wikipedia 2006 (Static HTML - No images) is on line here! [.7z dumps also available]
Sorry, English version is not working. Please, connect the Visual Basic - Vikipedi

Visual Basic

Vikipedi, özgür ansiklopedi

Visual Basic, Microsoft tarafından, Basic programlama dili üzerinde geliştirilmiş, olay yönlendirmeli, üst seviye, nesne tabanlı ve görsel bir programlama dilidir.

Konu başlıkları

[değiştir] Özellikleri

  • DAO, RDO ve ADO yöntemleri ile SQL, MySQL, Microsoft Access, Paradox ve Oracle gibi çeşitli veri tabanlarına bağlanabilir.
  • Active-X denetimleri ve nesneleri oluşturabilir.
  • Ascii ve İkili dosya biçemleriyle çalışabilir.
  • Nesne tabanlı bir dildir.
  • Wındows API çağrısı ve benzeri harici işlev çağrıları yapabilir.

[değiştir] Visual Basic türevleri

Microsoft Visual Basic dilinin değişik türevleri oluşturulmuştur.

  • VBA (Visual Basic for Applications )
Microsoft Office gibi, değişik yazılımlar içerisinde çalışabilecek yazılımlar geliştirilmesinde kullanılır.
Internet Explorer, ASP ve Windows Script Host üstünde Visual Basic betikleri çalıştırılmasında kullanılan türevi.
  • Visual Basic.NET
Visual Basic 6.0 Platformunun varisi olmakla birlikte farklı bir yapıdır ve .NET Framework üzerinde çalışır ve geriye doğru, Visual Basic 6.0 ve öncesi sürüm kodlarla uyumsuzdur.

[değiştir] Bakınız

[değiştir] Dış bağlantılar

[değiştir] Bir Not Ortalaması Örneği

Öncelikle formumuza Toolbox bölümünden 3 adet Label ekliyoruz. 3 adet TextBox ve bir adette Button ekliyoruz.

Labellerin İsimleri; Label1 = 1.not Label2 = 2.not Label3 = 3.not

Button1 = Hesapla olarak adlandırdıktan sonra kod bölümüne gelerek aşşağıdaki kodları yazıyoruz.

Public Class Form1

   Dim n1, n2, n3, ort As Integer
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       n1 = Val(TextBox1.Text)
       n2 = Val(TextBox2.Text)
       n3 = Val(TextBox3.Text)
       ort = (n1 + n2 + n3) / 3
       If (ort < 50) Then
           MsgBox(" Kaldınız " & ort)
       Else
           MsgBox(" Geçtiniz " & ort)
       End If
   End Sub

End Class