VISUAL BASIC DERSLERI 1 Visual basic yakin bir zamana kadar kullanilan diger program gelistirme araclarindan oldukca farklidir. Visual basic te bir cok islem gorsel olarak yapilabilmektedir. Visual basic programciyi menu hazirlarken ve programin kullaniciya yansiyan sekli icin kod yazmak zorunda birakmiyor. Bu nedenle kullanimi oldukca basite indirilmiş oluyor. Bu derste ayrintiya girmeden VBasic ile nasil program yazilacagini anlatacagim.. Programi actiginizda otomatik olarak "Project 1" adinda bir proje hazirlanip icerisine "form 1" nesnesi eklenmektedir. Bu formu cift tikladiginizda ya da project menusunden form1 i secip view code u tikladiginizda karsiniza "form1" adli formun kod penceresi acilir. Ilk satirda Private Sub Form_Load bilgisi war. Qbasicte oldugu gibi visual basicte de program ve yordamlar sub deyimiyle basliyip end sub deyimi ile biter. Private deyimi yordamin gecerlilik alanini belirlemektedir. Form_Loadyordaminda bulunan program satirlari form yuklenince otomatik olarak isletilir. Oyleyse form load edilince yapilmasini istediginiz islemler icin sub ile end sub bildiri deyimleri arasina program satiri yazmaniz gerekiyor. Proje calistiginda form1 uzerine bir sabit bilgi yazdiralim. Bunun icin visual basic deyimlerinden printi kullandim. Private sub form_load show print "starhack. org sanal alemin krali" end sub Printdeyiminden once ek olarak show deyimini olayimiza ekledim. Eklememin sebebi su:windowsla uyumlu programlar bir pencere icinde ekrana gelmektedirler. Ayni anda bircok program calistirilabildigi icin windows ortamina uygun program yazarken ek olarak o anda hangi pencerenin cikis ortami olarak kullanilacagi belirtilmelidir. Bunu saglamak icin show deyimini kullandik. Bu kodlari run menusunden start la calistirdiginizda ekrana "starhack. org sanal alemin krali" yazisi gelecektir. Yazinin satir ve sutun degerini font degisikligini veya punto degisikligini vb. yapabilirsiniz. INPUTBOX Simdide inputbox tan yararlanarak forma nasil bilgi girildigini gosterelim. Private sub form_load show Ad$=InputBox("Mail adresinizi giriniz" CurrentX=550 CurrentY=1800 FontName="comic sans MS" fontsize=20 fontbold=true print Ad$ end sub Burda Ad$ degiskenine InputBox fonksiyonu ile bilgi girisi yapiliyor. Sonra bu degiskendeki bilgi Print deyimi ile belirtilen forma belirtilen sekilde uzerine yaziliyor. MSGBOX ile Kullaniciyi Sorgulamak MsgBox fonksiyonuna 3 parametre aticagim. Birincisi verilecek mesaj ikincisi diyalog kutusuna koyacagimiz butonlar ve mesajimizin onune koyulan simgenin sayisal toplamlari ucuncu parametre ise mesaj diyalogunun basligi olarak kullandim. Ben konunun daha iyi anlasilmasi icin bi de "if-then-end if" islem blogunu kullandim. Bu deyimlerle ilgili ayrinti daha sonra werilecektir. private sub form_load sorgu=MsgBox("Bildirdiginiz saldiri baslatilsin mi?",20,"Attacker" Show CurrenX=1600 CurrenY=1800 fontsize=18 if sorgu= 6 then print "islem baslatildi" end if if sorgu=7 then print "islem gerceklestirilmeyecek" end if end sub Programcigimiz load edildiginde ekrana msj gelecek bu msgboxta mesaj evet we hayir butonlariyla 16 sayisal degerine sahip simge bulunacak. Eger biz eweti tiklarsak aktif forma "islem baslatildi" yazilacak hayiri tiklarsak forma "islem gerceklestirilemeyecek"yazilacak.

berkee : Dostum sanada katkım olsun, VB Türkçe kaynak linki aşağıdadır. http://www.hemenpaylas.com/download/596396/Visual_Basic_Ders_Notlar_. rar.html Bir Türkçe kaynak linki daha http://www.hemenpaylas.com/download/596440/VISUAL_BASIC_T_RK_E_KAYNAKLAR. rar.html -

güzeL döküman arşive aLıyom. +2 karma

Visual Basic Dersleri 2 Visual basic te programcinin kullanma olasiligi olan her islem icin onceden hazirlanmis moduller bulunmaktadir. Bu modullere kontrol adi verilir. Projeye dahil edilen her kontrol nesne olarak degerlendirilmektedir. Bu bolumde visual basicte verilen kontrollerin bazilarini nasil kullanacaginiz hakkinda bilgi verecegim. LABELS Daha once formun uzerine print deyimi ile yazilar yazmistik ve inputbox ile forma bilgi girmistik. Simdi label kontrolunu kullanarak nasil yazildigini gosterelim. Toolbox menusunden uzerinde "A" harfi bulunan nesnemiz labeldir. Bunu secip formumuzun uzerine herhangi bi boyutta cizdigimizde nesnemizin basligi olan label1 yazisi forma yazilir. Bu yaziyi silip degistirmek icin kodlara veya properties menusundeki caption ozelligine basvurulur. Private sub form_load label1. Caption="starhack. org" end sub Bu kodlar label1 nesnesinin captionini "starhack. org" yapar. Bunu propertiesteki caption ozelligini silerekte yapabilirsiniz. Burda bileceginiz en onemli sey once nesne adi sonra nesnenin degistirilecek olan ozelligini yazmaktir. Nesne. Ozelligi="?" seklinde olmalidir. TEXTBOX inputbox fonksiyonu arka arkaya bilgi girisi acisindan kullanisli degildir. Bu nedenle projelere disardan bilgi girmek icin textbox kontrolunden yararlanilir. Toolboxta uzerinde "ab" yazan dugme textbox nesnesidir. Simdi bilgi girisinde kullanmak uzere bir label ve bir textbox ekleyin formunuza. Calisma aninda textboxa girilen bilgiyi ornek olmasi icin msgbox deyimi ile bir diyalog kutusu icinde ekrana yazdiracagim. Private sub form_load label1. Caption="hacklemek istediginiz site" text1. text="" end sub private sub text1_keypress if keyascii=13 then msgbox "sisteme baglanildi",48,"attacker" end if end sub Burda once labelin basligini degistirip textboxin icerigini sifirladim. Daha sonra text1 in uzerine keypress yordamini uyguladim. Basilacak tusun ascii kodunun tamsayi olacagini bildirdim. Ben burda ascii kodu 13 olan enter tusuna basildiginda msgbox in ekrana gelmesini istedim. COMMAND Nerdeyse her programda kullandiğimiz kontrollerden biri de command lardir. Toolbox menusunde buton simgeli nesnemizdir. Ben ornek olmasi acisindan 1 label 1 textbox 1de command button ekleyeceğim forma. Private Sub Command1_Click MsgBox "sisteme baglanildi: " & Text1. Text, 48, "attacker" End Sub Private Sub form_load Label1. Caption = "hedef site" Text1. Text = "" End Sub Burda textboxa girilen bilgi msgbox sayesinde ekrana yazilmaktadir..

Cok SaĞolasin...