• 24-07-2010, 22:34:22
    #1
    ———–Bu Derste Öğrenecekleriniz———
    * Yeni bir programın kullanıcı arabirimini yaratmak
    * Kullnıcı arabiriminde her nesnenin özelliklerini ayarlamak
    * Program kodunu yazmak.
    * Programı kaydetmek ve çalıştırmak
    * Çalıştırabilir Bir Dosya Yaratmak
    Ugurlu Yedil: İlk Visual Basic Programınız
    Olusturacagımız windows tabanlı uygulama kumar makinesine benzeyen bir oyun programı olan ugurlu yedi’dir.Ugurlu yedi’nin basit bit bir kullanıcı arabimi vardır ve visual basic kullanılarak bir kaç dakikada yaratılıp derlenebilir.

    Programlama Adımları
    Ugurlu yedi kullanıcı arabirimini iki komut düğmesi üç sans numarası penceresi bir bozuk para resmi ve ugurlu yedi etiketini içerir.Bu ogeler ugurlu yedi formunda yedi nesne yaratılıp her nesne için çeşitlik özellikler değiştirilkerek oluşturulmustur.Arabirim tasarlandıktan sonra kullanıcının dügme tıklamalarını gerçekleştirmesi ve rasgele sayılar ürtmesi için çevir ve sontıklamalarını gerçekleştirmesi ve rasgele sayılar ürütmesi için çevir ve son komut düğmeleri için gerekli program kodları eklenmişttir..
    Programlama Adımı Oge Sayısı
    1.Kullanıcı arabirimini yaratmak 7 nesne
    2.Özelikkleri ayarlamak 10 özellik
    3.Program kodunu yazmak 2 nesne
    Ugurlu Yedi Programı Aşagıdaki işlevleri yerine Getirmelidir
    ** Çevir ve son düğmeleri 3 adet çevirme penecersi bir tanımlayıcı etiket ve bir kazanan penceresi sagla
    ** Üç rasgele sayı al ve kullanıcı çevir düğmesine tıkladıgında göster
    ** Çevirme pencelerinden birinde 7 rakamı göründügünde bir bozuk para yıgını göster ve bib sesi çıkar
    ** Son dügmesine tıklandıgın da Programı Bitir..

    Formun tamamını görmek için prohect container penceresine kaydırma çubukları kaybolana kadar büyütn ve properties, project ve form layout pencelerini taşıyın ya da kapatın
    Şimdi Form üzerinde bir komut düğmesi nesnesine deneyeceksiniz..
    Araç Kutusundaji CommandButton denetimini tıklayın ve fare işaretçisinin formun üzerine yerleştirin..
    CommandButton denetimini seçilmiştir ve fare işaretçisi formun üzerinde durdugu sürece artı biçimine dönüşür
    Şimdi Komut Düğmesini yaratmayı deneyin
    Fare işaretçesini formun sol üst kösesine yerleştirin farenin sol düğmesini basılı tutun sonra asagı ve saga sürükleyin asagıda gösterin benzer bir komut dügmesi olusturdugumuzda süreklemeyi durdurun ve farenin dügmesine tıklayın…

    Fareyi kullanarak komut dügmesini saga taşıyın..
    İkinci Bir komut Dugmesi eklemek
    1.Araç kutusndaki commandButton denetimini tıklayın.
    2.Form üzerinde birincinin altına ikinci komt dügmesini çizin
    3.yeterleştirdikten sonra gereiyorsa dugmeyi taşıyın ya da yeniden boyutlandırın bir hata yaparsanız komut dugmesini kolayca ssilip bastan yaratabilirsiniz…

    Sayı Etiketleri Ekleyin
    Şmdi programdaki sayıları görüntülemek için kullanılan etiketleri ekleyin program çalıştıgında metin sayı ya da simgeler görüntülemek için tasarlanmıs özel bir kullanıcı arabirimi ogesidir Ugurlu yedi programının çevir dügmesinin tıkladıgınnda etiket kutularında üç tane rasgele seçilmiş sayı görüntülenir.Sayılardan biri yed ise kullanıcı oyunu kazanır..
    Araç kutusunda label denetimini tıklayın sonra fare işaretçisini formun üzerine getirin.
    Label denetimini seçilmiştir ve fare işaretçisini formun üzerinde artı biçimine dönüşür
    Asagıda gösterildigi giibi kücük bir dikdörtgen kutu yaratın..
    Yarattıgınız etiket nesnesi programdaki ilk etiket anlamına gelen label1 adını alır.
    Şimdi form üzerinde iki tane daha etiket yaratacaksınız Label2 ve label3.

    şimdi label denetimini formunuza açıklayıcı bir etiket eklemek için kullanacaksınız.Bu programdaki dördüncü ve son etiket olucak

    1.Araç kutusundaki label denetinimi tıklayın
    2.İki komut düğmesinin altında daha büyük bir dikdörtgen yaratın

    Bitirdiğinizde dört etiket asagıdaki şekildeki gibi görünmelidir.

    Şimdi Forma kullanıcı yedi rakamını buldugunuda ve oyunu kazandıgında alacagı paraları gösteren bozuk para resmini görüntüleyen bir görüntü kutusu ekleyeceksiniz.Bir götüntü kutusu bir programda bir eşlem simge ve diğer resimleri görüntülemek için tasarlanmısıtır.Bİr görüntü kutusunun en iyi kullanımalarından biri bir visual basic kucuk resmi görüntlemesidir..
    Görüntü Ekleyin
    1.Araç kutusunda image denetimini tıklayın
    2.İmage denetimini kullanarak üç sayı etiketinin altına büyük bir dikdörtgen kutu çizin
    Bitirdiğinizde görüntü kutunuz aşagıdaki gibi görünmelidir..

    Bu nesne programınızda image 1 adlandırılır bu adı daha sonra program kodunda kullanacaksınız..
    Şimdi bir kaç özelligi ayarlayarak arabiminizi özelleştirmeye hazırsınız..
    Özellikleri Ayarlamak
    Komut Dugmesi özelliklerini ayarlayın
    1. Form züerindeki ilk komut dugmesini (Command1) Tıklayın
    Komut Dugmesi seçim tutamaçlarıyla çevrelenir.
    2. Properties pencereleri başlık çubugunu çift tıklayın.

    Şimdi Resim yükleyeyelim

    Yazı Tipini time net roaman yazı tipini biçimini bold’A nokta boyutunu 24e değiştirini ve ok’i tıklayın..

    Kodu Yazmak
    Şimdi Ugurlu yedi programının kodunu yazmaya başalayabilirsiniz.Yarattıgınız cogu nesne program calıstıgında nasıl çalısıcaklarını bildikleri için kullanıcıdan veri almak ve onu otomatik olarak işlemek için hazırdır.
    Nesnelerin dogasından gelen işsevsellik visual basicin en büyük güclerinden biridir nesneler bir forma yerleştirildiginde ve özellikleri ayarlandıgında herhangi bir ek programla olmadan çalısmaya hazır..
    CODE PENCERESİNİ KULLANIN
    Form üzerindeki son komut dugmesine çift tıklayın
    Code penceresi asagıdaki gibi görüntülenir

    Pencere yukarıda gösterilenden kucukse pecereyi fareyle yeniden boyutlandırın
    private sub command2_click ()
    End Sub
    Yordamın gövdesi her zaman bu satırların arasında yerleşir ve kullanıcı yordamla ilişkili arabirim ogesini etkinleşrirdiginde çalıştırılı.Bu örnekte olay bir fare tıklamasıdır ama daha sonraki derslerde de göreceginiz gibi farklı türde bir olay da olabilir.
    End yazın ve asagı ok tusuna basın

    Private Sub Command1_Click()
    Image1.Visible = False ‘paraları gizle
    Labe11.Caption = Int(Rnd * 10) ’sayıları seç
    Labe12.Caption = Int(Rnd * 10)
    Labe13.Caption = Int(Rnd * 10)
    ‘resim yazılarından biri 7 ise paraları göster be biple
    If (Labe11.Caption = 7) Then
    Image1.Visible = True
    Beep
    End If
    Kodları yazıyoruz hemen

    Kodlarıda yerleştirdik hersey hazır sadece isimleri degistirmek kaldı size ve projeyi kaydetmek
    bilmeyen arkadaslar da olabilir resimli anlatımını yapalım..

    Ve Programın Son Hali
    Ugurlu yedi programını kaydedin
    File menüsünden save project as komutuna tıklayın
    Formun adını ve kaydilecegi yeri soran save file as iletişim kutusu görünür
    Proje dosyalarınızı adım adım microsoft visual bbasic uygulama dosyaları kurulum programın sabit diskinizde yarattıgı kalsöre kaydedeceksiniz.
    File name metin kutusununa benim şansım yazın ve entere basın..


    Ayrıntılar icin
  • 24-07-2010, 22:36:20
    #2
    Güzel anlatmışsın tbr + rep