Yazılım

Basic Dili

BASIC (İngilizce: Beginner’s All-Purpose Symbolic Instruction Code Türkçe: Yeni başlayanların her işe yarayan simgesel öğretim kodu) 1964’te John George Kemeny ve Thomas Eugene Kurtz tarafından New Hampshire, ABD’de icat edilmiş, günümüzde de çeşitli türevleri kullanılmakta olan yüksek düzey bir programlama dili. Farklı türevleri birçok işletim sisteminin parçası olarak sunulmuştur.

BASIC öğrenmesi ve yazılımları kolay olan bir dildir. Genelde amatörce ve hobi uğraşıları için kullanılmıştır. Microsoft daha sonra Kişisel bilgisayarlar için Quick Basic derleyicisi piyasaya sürmüştür. Bununla yazılan BASIC metinlerini makine koduna çevirilebilmiş böylece sürat kazanmıştır. Bugün halen geniş bir kullanım alanına sahip olan Visual Basic dili var olup bununla hatta Windows’un belirli bölümleri yazılmıştır. Her Microsoft Office paketinde bir türevi var olup makro programlamada büyük kolaylıklar getirmektedir.

Basic programlama dili algoritma’ya çok yakın bir yapıya sahiptir. Bu yüzden öğrenilmesi ve uygulanması kolaydır.

Değişken isimleri aşağıdaki kurallara uyan her şey olabilirler:

  1. Değişken ismi en fazla 255 karakterden oluşmalıdır.
  2. Değişkenler arasında : ; , . / ‘ # [ ] ! ” $ % ^ & * ( ) { } karakterleri kullanılamaz. Ancak _ kullanılabilir.
  3. Değişken isminin ilk karakteri mutlaka harf olmalıdır. Yani değişkenler rakamla başlamaz.
  4. Değişken isimlerinde büyük küçük harf ayrımı yoktur. “AbCdE” ile “Abcde” veya “ABCDE” aynı değişkenleri belirlerler.
  5. Belirli bir prosedürde aynı değişken birden fazla tanımlanamaz.
  6. En önemlisi de herhangi bir komutu olamayacaklarıdır.

Bir değişken “Dim degisken_ismi as tür” seklinde tanımlanır.

  Dim damdaki_kedi as byte
  Dim Burak, gonen, kedi, damdaki as boolean
  Dim İsmail, cerban, temel, egitim as string

Görüldüğü gibi VB’de de değişkenler arası virgül ile ayrılıp birden çok aynı türde değişken aynı anda tanımlanabilir.

Örnek program

Merhaba Dünya çıktısı

  10 PRINT "Merhaba Dünya!"
  Dim cerban, ismail as string
  cerban=textbox1.text
  ismail=textbox2.text
  if cerban" " or ismail=" " then
  msgbox("Lütfen Parolanızı Giriniz", msgboxstyle.critical)
  EndIf''
  End Sub
# Bir siteye bağlanmak ve veri akışı

site$ = "tr.wikipedia.org"
port = 80
NETCONNECT site$, port
print "connected to " + site$ + ":" + port

get$ = "GET http://" + site$ + "/ HTTP/1.0" + chr(13) + chr(10)
get$ = get$ + chr(13) + chr(10)
NETWRITE get$
print "request written"

s$ = ""
do
   chunk$ = netread
   print "chunk  '" + left(chunk$,10) + "..." + right(chunk$,10) + "'" + length(chunk$)
   s$ = s$ + chunk$
   # bekleyin / yavaş bağlantılar için bazı ayarlamalar gerekebilir
   pause .2
until not netdata
NETCLOSE

print "response"
print s$
print length(s$)
Etiketler
Daha Fazla Göster

İlgili Makaleler

Bir cevap yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir

Göz Atın

Kapalı
Başa dön tuşu
Kapalı
Kapalı

Reklam Engelleyici Algılandı

Lütfen reklam engelleyiciyi devre dışı bırakarak bizi desteklemeyi düşünün