Visual Basic Örnekler | DonanımHaber Forum

Tüm Forumlar
  • Tüm Forumlar
  • Web Tasarım - Programlama
  • Yazılım Geliştirme
  • Delphi / C++ /Vb
  • Bu Konuda
Şimdi Ara Visual Basic Örnekler Sıcak Fırsatlarda Tıklananlar Editörün Seçtiği Fırsatlar Amazon.com.tr: Sana Özel 40 TL Fırsatı https://www.amazon.com.tr/b?node=93936617031 7 sa. önce paylaşıldı ASUS RT-AX57 GO Travel Router AX3000 WIFI6 Dual-Band AiProtection Router : Amazon.com.tr: Bilgisayar https://www.amazon.com.tr/dp/B0BRXZKWXJ 4 sa. önce paylaşıldı Laptop Fiyatları & Modelleri - Dizüstü Bilgisayar - n11 https://www.n11.com/urun/hp-15s-fq2048nt-2n2r1ea-i3-1115g4-4-gb-256-gb-ssd-156-free-dos-dizustu-bilgisayar-1952052?magaza=notisteknoloji 3 yıl önce paylaşıldı Büyük Boy Metal Pegasus Atları Satranç Takımı Parlak ve Katlanır Mermer Desenli MDF Ahşap Satranç Tahta (43x43 cm.) : Amazon.com.tr: Oyuncak https://www.amazon.com.tr/dp/B07RFM5W65?th=1 4 sa. önce paylaşıldı Migros Sanal Market: Online Market Alışverişi https://www.migros.com.tr/chefpack-strec-film-100-m-p-1dc1458 3 ay önce paylaşıldı Lenovo Legion Pro 5 16IRX9 i9-14900HX 32GB DDR5 1TB SSD RTX4070 GDDR6 8GB (140W) 16" WQXGA IPS HDR400 240Hz G-Sync FreeDos Gaming Notebook | ITOPYA https://www.itopya.com/lenovo-legion-pro-5-16irx9-i9-14900hx-32gb-ddr5-1tb-ssd-rtx4070-gddr6-8gb-140w-16-wqxga-ips-hdr40_u26223 6 sa. önce paylaşıldı TCL 50C755GTV 4K MINI LED 50'' GOOGLE TV : Amazon.com.tr: Elektronik https://www.amazon.com.tr/dp/B0CZ4DX38D 5 sa. önce paylaşıldı Daha fazla göster butonu Daha fazla göster butonu {{Title}} {{Description}} {{Price}} {{PriceUnit}} {{DiscountInformation}} Daha Fazla Bu Konudaki Kullanıcılar: Daha Az 2 Misafir - 2 Masaüstü 5 sn 191Cevap 4Favori 94.418Tıklama Daha Fazlaİstatistik
  • Konu İstatistikleri Yükleniyor
Konudaki Resimler Mesaj Tarihine Göre En Beğenilen Son Ekleneneler Seçimimi Hatırla Mesaj Tarihine Göre Konuya Özel
  • Favorilerime Ekle
  • Konuyu Açandan
  • Popüler Mesajlar
  • Linkli Mesajlar
  • Yazdır
  • E-Posta Aboneliği
  • Konuyu Gizle
0 oy Öne Çıkar x İlgini çekti mi? Öne çıkar, anasayfadadaha üstte görünsün. Daha Fazla Bilgi Cevapla Tüm Forumlar >> Web Tasarım - Programlama >> Yazılım Geliştirme >> Delphi / C++ /Vb >> Visual Basic Örnekler | DonanımHaber Forum Sayfa: 12345 Sayfaya Git Git sonraki Giriş Mesaj
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 30 Nisan 2005 16:51:01 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    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
    < Bu mesaj bu kişi tarafından değiştirildi serseri -- 31 Ocak 2006 1:56:57 >
  • irfanmatak Binbaşı 1240 Mesaj müdavim "müdavim": En az 1.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 1. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. binbaşı "binbaşı": Geleneksel rütbe sistemi koşulları geçerlidir. Tüm Başarılarını Gör 02 Mayıs 2005 04:15:07
    • Mesaj Linkini Kopyala
    • Şikayet
    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
  • mandelbrot Teğmen 129 Mesaj vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. teğmen "teğmen": Geleneksel rütbe sistemi koşulları geçerlidir. Tüm Başarılarını Gör 02 Mayıs 2005 04:52:04
    • Mesaj Linkini Kopyala
    • Şikayet
    Kod sıralama işlemi yapıyor. Zaten yukarda yazılmış. Hem Basic basit de kime göre neye göre?
  • Palin Majere Er 1 Mesaj er "er": Geleneksel rütbe sistemi koşulları geçerlidir. Tüm Başarılarını Gör 02 Mayıs 2005 11:47:36
    • Mesaj Linkini Kopyala
    • Şikayet
    aynen bencede ayrica işin mantiği aynıdır genelde anlad-ıyssan hepsi kolay
  • irfanmatak Binbaşı 1240 Mesaj müdavim "müdavim": En az 1.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 1. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. binbaşı "binbaşı": Geleneksel rütbe sistemi koşulları geçerlidir. Tüm Başarılarını Gör 03 Mayıs 2005 00:18:49
    • Mesaj Linkini Kopyala
    • Şikayet
    quote:Orjinalden alıntı: mandelbrot Kod sıralama işlemi yapıyor. Zaten yukarda yazılmış. Hem Basic basit de kime göre neye göre?
    Bana göre basit, bir şeyi bildiğin zaman bilmeyenin gözüyle bakmak zordur bende az bilen bir insan olarak böyle yorumladım.
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 05 Mayıs 2005 15:34:45 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    Arkadaşlar yukarıda zaten belirttim mühendislik okuyan arkadaşlar bilir vb dersinin zorluğunu bana normalde cok basit geliyordu ama sınavlara girdiğim zaman neyin ne olduğunu anlıyordum. o yüzden zorluğunu belirttim. Yoksa herkes bilir basic ne var ki "dim t as integer" der gecersin. bu arada kodlara devam edeceğim elinde örnek kodlar olan arkadaşlar varsa yazabilirler
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 30 Temmuz 2005 12:15:52 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    Uzun bir aradan sonra tekrar yeni kod yazalım. Bu sefer konu binom hesaplama n, x ve p değerlerini atadığımızda hesapla butonuyla p(x) değerini buluyoruz. İşte kodlar: Public Function fak(a) Dim i, r r = 1 For i = 1 To a r = r * i Next i fak = r End Function Public Function Binom() n = Val(Text1.Text) x = Val(Text2.Text) Binom = fak(n) / (fak(x) * fak(n - x)) End Function Public Function b() x = Val(Text2.Text) p = Val(Text3.Text) b = (1 - p) ^ (n - x) End Function Public Function e() x = Val(Text2.Text) p = Val(Text3.Text) e = p ^ x End Function Private Sub Command1_Click() Dim sonuc sonuc = Binom * b * e Text4.Text = Str(sonuc) End Sub
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 30 Temmuz 2005 12:18:48 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    Okek hesaplama iki sayının okekini bulmaya yarıyan vb kodları: Buradaki önemli nokta obeb isminde bir alt fonksiyonu görebilmektir... Option Explicit Private Sub Command1_Click() Dim a, b, k As Double a = Val(Text1.Text) b = Val(Text2.Text) k = (a * b) / obeb(a, b) Text3.Text = Str(k) End Sub Function obeb(ByVal a As Integer, ByVal b As Integer) Dim w While b <> 0 w = a a = b b = w Mod a Wend obeb = a End Function
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 30 Temmuz 2005 12:24:00 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    Sıcaklık Dönüştürme : Adı üzerinde C ve F sıcaklık değerleri arasında geçişi yapabiliroyruz. Buradaki amç ise resimde görülen scrollbar butonunu kullanabilmektir:  Visual Basic Örnekler işte kodlar: Private Sub VScrollBar_Change() Function CdenFye(isiC As Integer) As Integer CdenFye = CInt(isiC * 9 / 5 + 32) End Function Sub Gosterge() Dim Sıcaklık As Integer Sıcaklık = CInt(vscTermo.Value) Text2.Text = Str(Sıcaklık) Text1.Text = Str(CdenFye(Sıcaklık)) End Sub Private Sub VStermo_Change() Gosterge End Sub Private Sub vscTermo_Scroll() Gosterge End Sub
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 31 Temmuz 2005 21:28:31 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    Bu seferki programımız baslangıca hitap edecek sekilde : basit bir hesap makinesi Programın ekran görüntüsü resimdeki gibidir;  Visual Basic Örnekler Programın kod kısmı işe su sekilde: Private Sub Command1_Click() Dim sayı1, sayı2, sonuç As Double sayı1 = Val(Text1.Text) sayı2 = Val(Text2.Text) If Option1 = True Then sonuç = sayı1 + sayı2 If Option2 = True Then sonuç = sayı1 - sayı2 If Option3 = True Then sonuç = sayı1 * sayı2 If Option4 = True Then sonuç = sayı1 / sayı2 Text3.Text = Str(sonuç) End Sub
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 01 Ağustos 2005 17:07:52 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    Alan hesaplama:  Visual Basic Örnekler kodlar: Private Sub Command1_Click() Dim a, b, c As Double If Option1.Value = True Then a = Val(Text1.Text) b = 3.14 * a ^ 2 Text3.Text = b End If If Option2.Value = True Then a = Val(Text1.Text) b = a ^ 2 Text3.Text = b End If If Option3.Value = True Then a = Val(Text1.Text) b = Val(Text2.Text) c = a * b Text3.Text = c End If If Option4.Value = True Then a = Val(Text1.Text) b = Val(Text2.Text) c = (a * b) / 2 Text3.Text = c End If End Sub Private Sub option1_click() Text1.Text = "" Text2.Text = "" Text3.Text = "" Label2.Visible = False Text2.Visible = False Label1.Caption = "yarıçap(r)" Label3.Caption = "Alan" End Sub Private Sub option2_click() Text1.Text = "" Text2.Text = "" Text3.Text = "" Label2.Visible = False Text2.Visible = False Label1.Caption = "Kenar(a)" Label3.Caption = "Alan" End Sub Private Sub option3_click() Text1.Text = "" Text2.Text = "" Text3.Text = "" Label2.Visible = True Text2.Visible = True Label1.Caption = "Kenar(a)" Label2.Caption = "Kenar(b)" Label3.Caption = "Alan" End Sub Private Sub option4_click() Text1.Text = "" Text2.Text = "" Text3.Text = "" Label2.Visible = True Text2.Visible = True Label1.Caption = "Taban(a)" Label2.Caption = "Yükseklik(h)" Label3.Caption = "Alan" End Sub
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 10 Ağustos 2005 13:44:54 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    Sesli Harf sayısını sayan program: Bu program için iki text kutusu ve bir command tusu yeterlidir buna göre ilk text kutusu icine yazılan yazı içindeki sesli harf sayısı ikinci text boxda sayı olarak cıkacaktır... Option Explicit Private Sub Command1_Click() Text2.Text = Seslisay(Text1.Text) End Sub Function Seslisay(Metin As String) As Integer Dim sayac, i As Integer Const Harfler = "aeıioöuü" For i = 1 To Len(Metin) If InStr(Harfler, LCase(Mid(Metin, i, 1))) <> 0 Then sayac = sayac + 1 End If Next i Seslisay = sayac End Function
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 10 Ağustos 2005 13:47:52 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    Koordinat sisteminde verilen iki nokta arasındaki mesafeyi hesaplama:  Visual Basic Örnekler Option Explicit Private Sub Command1_Click() Dim BirX, BirY, İkiX, İkiY As Integer BirX = Val(Text1.Text) BirY = Val(Text2.Text) İkiX = (Text3.Text) İkiY = Val(Text4.Text) Text5.Text = Str(Mesafe(BirX, BirY)) Text6.Text = Str(Mesafe(İkiX, İkiY)) Text7.Text = Str(Mesafe(BirX, BirY, İkiX, İkiY)) End Sub Function Mesafe(ByVal x1, ByVal y1 As Integer, Optional x2, Optional y2 As Integer) As Double If IsMissing(x2) Then x2 = 0 If IsMissing(y2) Then y2 = 0 Mesafe = Sqr((x2 - x1) ^ 2 + (y2 - y1) ^ 2) End Function
  • sewim Teğmen 192 Mesaj teğmen "teğmen": Geleneksel rütbe sistemi koşulları geçerlidir. Tüm Başarılarını Gör 10 Ağustos 2005 15:10:24
    • Mesaj Linkini Kopyala
    • Şikayet
    örnekler güzel olmuş ellerine sağlık bunları saymayız devamını da bekleriz
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 10 Ağustos 2005 20:23:26 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    quote:Orijinalinden alıntı: sewim örnekler güzel olmuş ellerine sağlık bunları saymayız devamını da bekleriz
    İnsan kendi kendine konusuyormus gibi hissediyordu yazın için sağol
  • sewim Teğmen 192 Mesaj teğmen "teğmen": Geleneksel rütbe sistemi koşulları geçerlidir. Tüm Başarılarını Gör 10 Ağustos 2005 20:30:17
    • Mesaj Linkini Kopyala
    • Şikayet
    bizim de v.basic dersimiz var ve normaldekiyle sınavdaki gerçekten farklı oluyo daha zor birşey sorucam ben daha birkaç form la program yapmadım sadece next butonuyla yapılabiliniyo mu?yöntemi nedir?
    < Bu mesaj bu kişi tarafından değiştirildi sewim -- 10 Ağustos 2005, 20:35:58 >
  • sewim Teğmen 192 Mesaj teğmen "teğmen": Geleneksel rütbe sistemi koşulları geçerlidir. Tüm Başarılarını Gör 11 Ağustos 2005 23:11:07
    • Mesaj Linkini Kopyala
    • Şikayet
    yani mesela bir formda kullanıcı bilgilerini sorucam next e tıkladığında ikinci form açılıcak orada hesap yapıcak sonra diğer form ve ... işte böyle nasıl yapabilirim?
  • serseri Yarbay 4602 Mesaj konu açıcı "konu açıcı": En az 500 konu açtı. 4 seviyeli bu başarı rozetinin 3. seviyesine sahip. müdavim "müdavim": En az 10.000 mesaj yazdı. 3 seviyeli bu başarı rozetinin 3. seviyesine sahip. vefalı "vefalı": En az 50 mention yanıtladı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. gececi "gececi": En az 100 farklı gece DH'ye giriş yaptı. 1 seviyeli bu başarı rozetinin 1. seviyesine sahip. Tüm Başarılarını Gör 29 Eylül 2005 16:06:56 Konu Sahibi
    • Mesaj Linkini Kopyala
    • Şikayet
    Hmm sahi bu sorunun cevabını bulabildin mi? Bişeyler söylemiştim ama... Bu arada topici hortlatmakta fayda var malum üniversiteler acıldı ve vb dersleri basladı umarım örnekler bir işe yarar....
  • Floyt Onbaşı 24 Mesaj onbaşı "onbaşı": Geleneksel rütbe sistemi koşulları geçerlidir. Tüm Başarılarını Gör 02 Ekim 2005 20:54:35
    • Mesaj Linkini Kopyala
    • Şikayet
    saol serseri işime yaradı bende daha yeni baslıyorum lise 3 programlamada vB gösteriyolar baslangıc için iyi oldu
  • sewim Teğmen 192 Mesaj teğmen "teğmen": Geleneksel rütbe sistemi koşulları geçerlidir. Tüm Başarılarını Gör 04 Ekim 2005 09:49:42
    • Mesaj Linkini Kopyala
    • Şikayet
    bize 2. sınıfta gösterdiler :)
  • yeni mesaja git Yeni mesaj Cevapla
Sayfa: 12345 Sayfaya Git Git sonraki Cevapla Hızlı Cevap Mesajım Bulunsun Tüm Forumlar >> Web Tasarım - Programlama >> Yazılım Geliştirme >> Delphi / C++ /Vb >> Visual Basic Örnekler | DonanımHaber Forum

Benzer içerikler

  • nesne başvurusu bir nesnenin örneğine ayarlanmadı
  • güvenli arama kapatma
  • google önbellek
  • en çok kullanılan yazılım dilleri
Reklamlar takipçi satın al cami halısı instagram takipçi satın al PUBG Mobile UC , PUBG Mobile UC Satın Al SMM Panel Bu sayfanın Mobil sürümü Mini Sürümü

BR80,4211.2.165

Reklamlar Mesaj linki kopyalandı. Bir sorun oluştu. Ip işlemleri Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara KAPAT X x %40Kazan %2,8Kazan %5Kazan %6,8Kazan %1,6Kazan %3,2Kazan %5,5Kazan %1,2Kazan %5Kazan %3,2Kazan %6,4Kazan %2Kazan Alışveriş Yaptıkça Para Kazan Harekete Geç » - x Bildirim
  • X
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz. Hizmet kalitesi için çerezleri kullanabiliriz. DH’ye girerek kullanım izni vermiş sayılırsınız. Anladım Veri Politikamız

Từ khóa » Visual Basic örnek Kodlar