Visual Basic Örnekler | DonanımHaber Forum

Visual Basic Örnekler - Sayfa 10

serseri · 2005-04-30T16:51:01.0000000+03:00

Başlangıç olarak şu yazıyı eklemekte fayda var: VISUAL BASIC Nedir? Microsoft vb microsoftun gelistirdiği bir yazılım derleyicisidir.Programlamayla biraz olsun ilgilenenlerin hemen hemen hepsi Qbasic hakkinda birşeyler öğrenmiştir.İşte sizin de gözlemleyebileceğiniz gibi,dil gene aynı dil sadece bir iki ekleme var(tabi ole,ado,activex,dll ve daha sayamıyacağim kadar ileri uygulamalar icin kullandiğimiz komutlari saymazsak)ama programın derlendigi alan tamamen görsel,herşeyi mousenizle yapiyorsunuz.Yani programınıza 1 buton koymak,buton simgesi işaretliyken mousenizle çizmeniz kadar kolaydır.Kısaca özetlersek Visual Basic adından da anlaşılacağı gibi Qbasici temel almış ancak ondan çok daha gelişmiş(benzer) dile sahip ileri uygulamalı bir dildir. Neden Visual Basic Yukarıda vb'nin ne olduğunu tanımınladıktan sonra bu yazıda neden vb'yi tercih edelim sorusuna yanıt arıyacağız.Vb bir Microsoft ürünüdür.Bu yüzden burada yazacağınız programların databaseleri windowsla tamamen uyumlu olacaktir çünkü aynı firma tarafından destekleniyor,bunun gibi birçok Microsoft ürününü vb ile etkinleştirme imkanımız var örnegin accessde yaptiğiniz basit öğrenci kayıt programını VB'den açıp onu VB'de daha görsel daha gelişmiş hale getirebilirsiniz.Atlanmaması gereken bir ayrıntı da şu: Vb'de program derlemek birçok dile göre daha kolaydır.Çünkü VB'de görsellik ön plandadır ve dil olarak da kolaydır,demek istediğim; komut ezberlemek için çok uğraşmıyorsunuz,biraz ingilizce biliyorsanız işiniz çok kolay; komutlar genelde ingilizce ya da ingilizce kısaltmaları.Şu var ki bazıları bunu abartır ve der ki: "Bilgisayarı yeni açanlar bile vb'de program yazabilir,vb çocuk işidir.." Evet vb'nin kolay olduğunu ben de söylüyorum ama programlama mantığı hep aynıdır,ekran başında kafa çatlatırsınız.Ben de herzaman diyorum, gene en kolayı VB dir ama iş çok sonraki derslerimde anlatacağım dll,actixex.. gibi uygulamalara geldiğinde herkes biraz zorlanır.Dünya üzerinde 3,5 milyonun üzerinde insan VB kullanmakta,ayrica birçok yazılım şirketi de vb bilen yazılımcılar aramakta.Özetliyecek olursak programlamaya yeni başlamışsanız ve gelişmek istiyorsanız şiddetle VB tavsiye ederim,VB yi iyice kaptiktan sonra size delphi veya Microsoft c++ tavsiye ederim... Alıntıdır, kaynak : http://www.mutasyon.net/dersoku.asp?id=83 Elimde olan bazı örneklerin kodlarını buraya aktarmaya calısacağım Malum mühendislik okuyan arkadaşlar basic konusunda zorlanıyor (kendimde dahil) Kabarcık Sıaralama Yöntemi Bir listede rassal olarak atanmıs sayıların diğer listeye sıralı halde gecmesine yarayan program kodları Option Explicit Private Sub Command1_Click() Const max = 200 Dim x(1 To max) As Integer Dim k, n As Integer n = 500 n = Text1.Text For k = 1 To max x(k) = 1 + Int(n * Rnd()) Next k List1.Clear For k = 1 To max List1.AddItem x(k) Next k sırala x(), max List2.Clear For k = 1 To max List2.AddItem x(k) Next k End Sub Sub sırala(a() As Integer, ByVal n As Integer) Dim j, gecici As Integer Dim değişmedi As Boolean değişmedi = False Do Until değişmedi değişmedi = True For j = 1 To n - 1 If a(j) > a(j + 1) Then gecici = a(j + 1) a(j + 1) = a(j) a(j) = gecici değişmedi = False End If Next j n = n - 1 Loop End Sub

Giriş

Mesaj

Virinom

Yarbay

3565 Mesaj

"konu açıcı": En az 100 konu açtı. 4 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"çok beğenilen": En az 10.000 beğeni aldı. 7 seviyeli bu başarı rozetinin 7. seviyesine sahip.

"müdavim": En az 1.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"takdirci": En az 1.000 beğeni verdi. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip.

Tüm Başarılarını Gör

01 Ağustos 2011 22:42:04

Mesaj Linkini Kopyala
Şikayet

quote:

Orijinalden alıntı: mekatronik54

arkadaşlar bana 2 tane program lazım ben kütahya gediz ilçesinde mekatronik okuyorum ve visual basic ten bir sey gösterilmeden bizden program yazılması isttenddi evet side öğrencisiniz lütfen yardımcı olun arkadaşlar

me gibi bir program istiyorsun pm den detayları yazarsan yardımcı olabilirim belki ama sizden yazılması istenmiş sende bizden mi istiyon klasik öğrenci üşengeçliği

neyse yinede yardımcı olurum pm at

Bu mesaja 2 cevap geldi

_____________________________

Birilerinin bu soyguna dur demesi lazım.Dünyadan internet fiyatları.Yorum sizin...
http://vivacom.bg/en/residential/prices_and_services/internet_connections/vivacom_fiber_net_/vivacom_fiber_net_15
http://starnet.md/ro/internet-alone
http://www.upc.ro/internet/
https://www.megalan.bg/internet_pon.html
Bulgaristan'da 100Mbit sınırsız internet 42 TL

mekatronik54

2 Mesaj

"er": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

05 Ağustos 2011 14:28:52

Mesaj Linkini Kopyala
Şikayet

slm hesap makınası olacak bır tane de bilgi kaydı programı olacak

_____________________________

ayse01

2 Mesaj

"er": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

15 Mayıs 2012 00:59:25

Mesaj Linkini Kopyala
Şikayet

bir textbox'a yazılan metni ve saati enter tuşuna basınca veritabanına kaydeden programı yazınız? bu konuda acil cavap atabilirmisiniz yarın sınavım var :(
ipuçlarını veriyorum.

*program herhangi bir hazır companent kullanmadan ADO.NET veri erişim nesneleri kullanılarak kodlanacak.
*metin kayıt edildikten sonra textbox'un içeriği silinecek.
*tarih ve saati öğrenmek için new fonksiyonu kullanabiliriz.

_____________________________

ayse01

2 Mesaj

"er": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

15 Mayıs 2012 01:02:36

Mesaj Linkini Kopyala
Şikayet

bir komut tuşuna basılınca arka plan rengi rastgele değişen bir form için gerekli kodları yazınız? bu konuda acil yardım edebilirmisiniz?

*renk rgb renklerinden biri olarak seçilecek.
*rgb rengi için colorfrom.arg...... metodunu kullanabiliriz.

Bu mesaja 1 cevap geldi

_____________________________

turkformen

2 Mesaj

"er": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

15 Mayıs 2012 10:22:40

Mesaj Linkini Kopyala
Şikayet

Merhabalar herkese lütfen yardım acil falan demiyorum ama yardımcı olursanız sevinirim

klavyeden ve ya butona tıklandığında 10 sayıdan en büyük ve en küçük değeri bulan VİSUAL BASİC kodları lazım arkadaşlar lütfen c c# kodları yazmayın basic kodu lazım...

< Bu mesaj bu kişi tarafından değiştirildi turkformen -- 15 Mayıs 2012; 10:24:01 >

_____________________________

www.hakanuslu.com.tr

swat474

1 Mesaj

"er": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

23 Aralık 2012 00:22:52

Mesaj Linkini Kopyala
Şikayet

http://visualbasic25.blogspot.com/

bu ADRESTEN BANA ULAŞIP BİLGİ ALABİLİRSİNİZ

_____________________________

mcbozan

12 Mesaj

"er": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

17 Aralık 2013 00:48:17

Mesaj Linkini Kopyala
Şikayet

Mrba ben visual basic de bilgisayar kapatma programı yapacmda yardımcı olabilirmisiniz acaba

_____________________________

123456789musa

Çavuş

41 Mesaj

"çavuş": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

12 Mayıs 2014 17:52:00

Mesaj Linkini Kopyala
Şikayet

irfanmatak İ kullanıcısına yanıt

1-Hesapla butonuna basıldıgında başlangıç ve bitiş degeerlerinin arasındaki sayıların toplamını hesaplayan labeye yazan programı yazınız?

2-Birden text kutusuna kadar olan sayılardan çift olanlarının toplamını yazdıran program?

_____________________________

Baggwell

Yüzbaşı

340 Mesaj

"vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"gezgin": En az 50 foruma mesaj yazdı. 4 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"geek": En az 100 teknoloji forumu mesajı yazdı. 4 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"yüzbaşı": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

02 Kasım 2014 01:08:22

Mesaj Linkini Kopyala
Şikayet

quote:

Orijinalden alıntı: irfanmatak

quote:

Elimde olan bazı örneklerin kodlarını buraya aktarmaya calısacağım
Malum mühendislik okuyan arkadaşlar basic konusunda zorlanıyor (kendimde dahil)

Hocam Basic 'te zorlanacak bi durum yok ! En basit dil. Kod için saol bu arada ne işe yaradığını çözemedim ama

Böyle bir yorum olamaz yaw ne demek en basit dil zorlanacak bi durum derken programı açıp kapamakta zorlanmıyoruz hiç :D

Bu mesaja 1 cevap geldi

_____________________________

irfanmatak

Binbaşı

1240 Mesaj

"müdavim": En az 1.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"binbaşı": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

19 Kasım 2014 17:12:52

Mesaj Linkini Kopyala
Şikayet

quote:

Orijinalden alıntı: Baggwell

quote:

Orijinalden alıntı: irfanmatak

quote:

Elimde olan bazı örneklerin kodlarını buraya aktarmaya calısacağım
Malum mühendislik okuyan arkadaşlar basic konusunda zorlanıyor (kendimde dahil)

Hocam Basic 'te zorlanacak bi durum yok ! En basit dil. Kod için saol bu arada ne işe yaradığını çözemedim ama

Böyle bir yorum olamaz yaw ne demek en basit dil zorlanacak bi durum derken programı açıp kapamakta zorlanmıyoruz hiç :D

2005 yılında yazdığım mesajı alıntılamışsınız. Okuyunca Nostalji yaptım Teşekkürler. O günden bu güne fikirlerim baya değişti emin olabilirsin.

Bu mesaja 1 cevap geldi

_____________________________

"Data: Hayat Like Ref Null."

Baggwell

Yüzbaşı

340 Mesaj

"vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"gezgin": En az 50 foruma mesaj yazdı. 4 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"geek": En az 100 teknoloji forumu mesajı yazdı. 4 seviyeli bu başarı rozetinin 1. seviyesine sahip.

"yüzbaşı": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

19 Kasım 2014 17:45:21

Mesaj Linkini Kopyala
Şikayet

quote:

Orijinalden alıntı: irfanmatak

quote:

Orijinalden alıntı: Baggwell

quote:

Orijinalden alıntı: irfanmatak

quote:

Elimde olan bazı örneklerin kodlarını buraya aktarmaya calısacağım
Malum mühendislik okuyan arkadaşlar basic konusunda zorlanıyor (kendimde dahil)

Hocam Basic 'te zorlanacak bi durum yok ! En basit dil. Kod için saol bu arada ne işe yaradığını çözemedim ama

Böyle bir yorum olamaz yaw ne demek en basit dil zorlanacak bi durum derken programı açıp kapamakta zorlanmıyoruz hiç :D

2005 yılında yazdığım mesajı alıntılamışsınız. Okuyunca Nostalji yaptım Teşekkürler. O günden bu güne fikirlerim baya değişti emin olabilirsin.

Hiç düşünürmüydünüz 9 yıl sonra biri yorumunuzu alıntılayacak :))

_____________________________

yeni mesaja git

Yeni mesajları sizin için sürekli kontrol ediyoruz, bir mesaj yazılırsa otomatik yükleyeceğiz. Bir Daha Gösterme

Visual Basic Örnekler (10. sayfa)