-->

Sponsor Alanı

Slider

İlgi Çeken Videolar

Sağlık

Teknoloji

Sinema

Televizyon

Ne Nedir?

En5 Konular

Ads1

Visual Basic - Oyun Yapalım ( Zıplayan Top )

By: İbrahim Fırat on Pazartesi, Mayıs 20, 2013 / yorum : 0 ,

vb.net
Vb.Net ile  zıplayan top yapımını   göreceğiz.  Kendini yeni geliştiren programcı adayları için   oldukça  faydalı olacak bir dersi işleyeceğiz.

Forma eklemeniz gereken araçlarımız:

1 tane shape
1 tane timer

 Timer1'in interval özelliğini 10 olarak  ayarlayın
Shape1'in shape özelliğini circle olarak ayarlayın

Private Sub Timer1_Timer()
Static ax, ay
If IsEmpty(ax) Then
ax = 50
ay = 50
End If
If Shape1.Top <= 0 Or Shape1.Top >= Form1.ScaleHeight - Shape1.Height Then
ay = -ay
Beep
End If
If Shape1.Left <= 0 Or Shape1.Left >= Form1.ScaleWidth - Shape1.Width Then
ax = -ax
Beep
End If
Shape1.Left = Shape1.Left + ax
Shape1.Top = Shape1.Top + ay
End Sub

Karakter Güvenlik Fonksiyonu SQL

By: İbrahim Fırat on Pazartesi, Mayıs 20, 2013 / yorum : 0 ,

vb.net
Bugün SQL Fonksiyonlarından injectionu öğreneceğiz.  Genel olarak yazılımcılar injection  fonksiyonunu farklı metodlar  ( ',",% ) kullanarak kaldırma işlemi ile gerçekleştiriyorlar.  Biz ise farklı bir yöntemle  SQL güvenlik fonksiyonunu ( A-Z, 0-9 ) metodu ile    daha güvenli biçimde  halledeceğiz. 

 
Function guvenlik_ad(ByVal data As String) As String
 standart = "oksdalscvbç.-qgwex,.mnbvcopğzxvv_ ."
 son = ""
 If Len(data) = 0 Then
  guvenlik = ""
 Else
  For i = 0 to Len(data)
   For f = 1 To Len(standart)
    karakter = Mid(data,i+1,1)
    If karakter = Mid(standart,f, 1) Then son = son & karakter : Exit For
   Next
  Next
 End If
 data = son
 guvenlik_ad = data
End Function


Data deişkeninin güvenli halini döndürür bu fonksiyon. Örnek olarak "İbrahimFirat Net @ 1" yazdığımızı varsayalım fonksiyon bunu "ibrahimfiratnet1" olarak  döndürür. 

 
degisken = TextBox1.Text ' olsun
If degisken = guvenlik(degisken) Then
      MsgBox("Güvenlik doğrulandı")
Else
     MsgBox("Güvenlik doğrulanamadı")
End If

Visual Basic İle Site Açma Programı

By: İbrahim Fırat on Pazartesi, Mayıs 20, 2013 / yorum : 0 ,

Bu derste basit bir belirlediğiniz herhangi bir siteyi TextBox'a adını girerek tek tuşla açmaya yarayan bir program yapacağız.

Forma eklemeniz gereken malzemeler:

 1 Tane Button + 1 Tane TextBox Ekliyoruz.  Aşağıdaki örnek resimdeki gibi  tasarımınızı yapabilirsiniz.

vb.net

 Buttona çift tıklayın ve Click olayına  aşağıdaki kodları yazınız.

Public Class Form1

     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Select Case TextBox1.Text
            Case "google"
                Shell("explorer http://www.google.com.tr")
            Case "Youtube"
                Shell("explorer http://www.youtube.com")
            Case "iF"
                Shell("explorer http://www.ibrahimfirat.net")
            Case "Site Ekle"
                Shell("explorer http://www.alimvar.com")
            Case "Blogger"
                Shell("explorer http://www.bloggertasarimlari.blogspot.com")
            Case "proxy"
                Shell("explorer http://www.world34.blogspot.com")
            Case "Helal Gıda"
                Shell("explorer http://www.helalmarketim.com")
        End Select
    End Sub
End Class

Vb.Net Yazarak Form Rengini Değiştirmek

By: İbrahim Fırat on Pazartesi, Mayıs 20, 2013 / yorum : 0 ,

vb.net
Visual Basic ile TextBox'a eklediğimiz yazıya göre formun renginde değişiklikler öğreneceğiz.  Örnek olarak:   TextBox'a herhangi bir rengi yazdığımızda    formun rengi belirlediğimiz renkte olacak.  İki  seçenekli bir    kod yazılımı yapacağız.  Birincisi  renk ismi yazarak formun rengini değiştirmek için, ikincisi  renk kodları ile  formun rengini değiştirmek. 

 Forma eklemeniz gereken araçlar:

 1 Tane button bir tane  TextBox ekleyin

 Eklemeniz gereken kodlar:

 
Private Sub Command1_Click()
Command1.Caption = "değiştir"
If Text1.Text = "mavi" Then
Form1.BackColor = &HFF0000
End If
If Text1.Text = "kırmızı" Then
Form1.BackColor = &HFF&
End If
If Text1.Text = "yeşil" Then
Form1.BackColor = &HFF00&
End If
If Text1.Text = "sarı" Then
Form1.BackColor = &HFFFF&
End If
If Text1.Text = "turuncu" Then
Form1.BackColor = &H80FF&
End If
If Text1.Text = "kahverengi" Then
Form1.BackColor = &H40&
End If
If Text1.Text = "siyah" Then
Form1.BackColor = &H0&
End If
If Text1.Text = "turkuaz" Then
Form1.BackColor = &HFFFF00
End If
If Text1.Text = "gri" Then
Form1.BackColor = &H808080
End If
If Text1.Text = "mor" Then
Form1.BackColor = &HFF00FF
End If
If Text1.Text = "pembe" Then
Form1.BackColor = &HFFC0FF
End If
End Sub


Yukarıdaki kodlar yazarak Form rengini değiştirmenizi sağlıyor şimdi renk kodları ile forma renk vermeniz gereken kodlar aşağıdadır.

 
Private Sub Command1_Click()
Form1.BackColor = (Text1.Text)
End Sub

Visual Basic Resource Yapımı

By: İbrahim Fırat on Pazar, Mayıs 19, 2013 / yorum : 0 ,

vb.net

Vb.Net Resource Kullanımı 

Bu dersimizde  Visual Basic ile   Kaynak  gömmeyi, dosya, resim vs. kullanımı  ve buton yardımı ile dışarı  çıkartmayı öğreneceğiz.

Gerekli olan araçlarımız:

Bir adet button bir adet  PictureBox ekleyin yukarıdaki örnek resimdeki gibi tasarlayabilirsiniz.   İlk olarak My Project sekmesine tıklayarak  sol bölümde bulunan Resource yazan bölüme tıklayın. Açılan pencerede  ilk olarak  strings olarak karşınıza çıkacak o  değeri   Other olarak  değiştireceksiniz.

 Sonrasında aynı bölümde bulunan Add Resource > Add Existing File bölümünden masa üstünüzden herhangi bir resim veya icon seçip kayıt edin.  

 İlk olarak programın dosyaları dışarı çıkarmasını nasıl sağlarız onu öğrenelim. 

 Buttona çift tıklayın ve   click olayına aşağıdaki kodu yazın.

 My.Resource.Goodshield.Save"C:\resim.png"  kodunu ekledikten sonra  programı çalıştırın ve  dosyaları çıkar  butonuna bastığınızda dosyalar   belirlediğiniz bir   klasöre çıkartılmş olacaktır. 

VB.Net NotifyIcon Yapımı

By: İbrahim Fırat on Pazar, Mayıs 19, 2013 / yorum : 0 ,

vb.net 
Visual basic  derslerimize devam ediyoruz. Bu derste   NotifyIcon kullanımını  öğreneceğiz. Ekranın sağ alt bölümünde saatin hemen yanında bulunan simgeye verilen isime NotifyIcon denir.

 Bu yazılımı  Visual Basic 6.0 ile yapacağız.  İlk önce menü editörü bölümünden bir popup menü yapın. 



Popup > >> Ana Menü

 Showide > > > Göster Gizle


' NotifyIconData yapısını tanımladık
Private Type NotifyIconData
Size As Long
Handle As Long
ID As Long
Flags As Long
CallBackMessage As Long
Icon As Long
Tip As String * 64
End Type

' lAZIM olan değişkenleri tanımladık.  Bu değerleri "shell32.h" bölümünden ulaşabilirsiniz
Private Const Ekle = &H0
Private Const Duzenle = &H1
Private Const Sil = &H2

Private Const WM_MOUSEMOVE = &H200

Private Const WM_LBUTTONDOWN = &H201
Private Const WM_LBUTTONUP = &H202
Private Const WM_LBUTTONDBLCLICK = &H203

Private Const WM_RBUTTONDOWN = &H204
Private Const WM_RBUTTONUP = &H205
Private Const WM_RBUTTONDBLCLICK = &H206

Private Const MessageFlag = &H1
Private Const IconFlag = &H2
Private Const TipFlag = &H5

' Shell32.dll içinden API fonksiyonunu  tanımladık
Private Declare Function Shell_NotifyIcon Lib "shell32.dll" _
 Alias "Shell_NotifyIconA" (ByVal Message As Long, Data As NotifyIconData) As Boolean

' Notify Icon nesnesini tanımladık
Private Data As NotifyIconData

' İkon nesnesini ekleyebilmek için kullanabileceğiniz yöntem
Private Sub SimgeyiEkle()
Data.Size = Len(Data)
Data.Handle = hWnd
Data.ID = vbNull
Data.Flags = IconFlag Or TipFlag Or MessageFlag
Data.CallBackMessage = WM_MOUSEMOVE
Data.Icon = Icon ' Formun ikonu ile devam ediyoruz
Data.Tip = "Arkeolog NET - NotifyIcon" & vbNullChar ' Bilgi yazısı
Call Shell_NotifyIcon(Ekle, Data)
End Sub

' Forum ikonunu kaldırmak isterseniz aşağıdaki yöntem ile kaldırma işlemi gerçekleşecektir.
Private Sub SimgeyiKaldir()
Call Shell_NotifyIcon(Sil, Data)
End Sub

' Başlangıç fonksiyonu
Private Sub Form_Load()
SimgeyiEkle
End Sub

' Bitiş fonksyonu
Private Sub Form_Terminate()
SimgeyiKaldir
End Sub

'Menü tıklandığında
Private Sub ShowHide_Click()
Visible = Not (Visible)
End Sub


Gösterdiğimiz örnek için mutlaka gerekli olan kodlarımız.

Popup >>> Ana Menü
ShowHide >>> Alt Menü
Popup ve ShowHide bulunması şarttır.

4 İşlem Programı - Visual Basic

By: İbrahim Fırat on Pazar, Mayıs 19, 2013 / yorum : 0 ,

Visual Basic derslerimize bir süreliğine yoğunluktan dolayı ara vermiştik. Vb.Net derslerimize kaldığımız yerden devam ediyoruz. Bu dersimizde   yeni başlayanlar için basit bir  4 işlem yapan  program yazımını  anlatacağız. 

 Toplama, çıkarma, bölme, çarpma işlemlerini işleyeceğiz.

 Form'a gerekli olan araçlarımız:

 * 2 tane textBox ekleyin
* 4 tane button ekleyin

 Aşağıdaki resimdeki gibi tasarlayabilirsiniz.

 vb.net

1 - )  Toplama butonuna çift tıklayın ve aşağıdaki kodları yazın.

Dim sayi1, sayi2, sonuc As Integer
        sayi1 = TextBox1.Text
        sayi2 = TextBox2.Text
        sonuc = Val(TextBox1.Text) + Val(TextBox2.Text)
        MsgBox(sonuc)

2 - )  Çıkarma Butonuna çift tıklayarak aşağıdaki kodları yazın.

Dim sayi1, sayi2, sonuc As Integer
        sayi1 = TextBox1.Text
        sayi2 = TextBox2.Text
        sonuc = Val(TextBox1.Text) - Val(TextBox2.Text)
        MsgBox(sonuc)

3 - ) Çarpma Butonuna  çift  tıklayın ve aşağıdaki kodu yazın.

Dim sayi1, sayi2, sonuc As Integer
        sayi1 = TextBox1.Text
        sayi2 = TextBox2.Text
        sonuc = Val(TextBox1.Text) * Val(TextBox2.Text)
        MsgBox(sonuc)

4 - ) Bölme butonuna çift tıklayın ve aşağıdaki kodu yazın.

Dim sayi1, sayi2, sonuc As Integer
        sayi1 = TextBox1.Text
        sayi2 = TextBox2.Text
        sonuc = Val(TextBox1.Text) / Val(TextBox2.Text)
        MsgBox(sonuc)

Kodların açıklaması

 İnteger türünde  sayi1, sayi2 ve sonuç ile beraber  sayısal değişken tanımladık.  Sornasında sayi1 değişkenini  TextBox1'e  eşitledik.   Sayi2 değişkenini ise   aynı işlemlerle TexBox2 ile eşitliyoruz. 

Devamında sonuç değişkeninin  içine Textbox1 ile Textbox2'nin içindeki değerlerin tümünü atama işlemini gerçekleştiriyoruz. Kodlarımızın en başına  eklediğimiz  Val ifadesi eklememizin  nedeni ise, virgüllü sayı çıkmaması içindir.  Örnek:  sayı 99,99 olduğunu varsayalım, program bu değeri  ototmatikmen 100'e çevirir. 

 Kodlamamızın devamında, MsgBox'ın içine  yazdığımız kelime ile işlem sonucunda bize   mesaj olarak bildirmesi içindir. 

Visual Studio 2010 Kurulumu

By: İbrahim Fırat on Pazar, Mayıs 19, 2013 / yorum : 0

Visual Studio 2010 Programı Yükleme ( Kurulum ) 

Vb.Net Kurulumu Resimli Anlatım

Visual Studio programını Microsoft'un sitesinden edinebilirsiniz.  Programı  bilgisayarınıza kurmak aslında oldukça  basit. Zor gibi  görünebilir aşağıda anlattığım  gibi eksiksiz  yaparsanız tek seferde   programı bilgisayarınıza kurmuş olacaksınız.  Bazıları için bu işkence haline gelebilir.  Aşağıda  resimde anlattığım gibi  eksiksiz kurulumun adımlarını izleyerek  kurulumu gerçkelşetirebilirsiniz.


1 - ) Stup.exe  veya kurulum exe  dosyasına çift  tıklayın ve karşınızda aşağıda bulunan birinci resimdeki gibi ekran çıkacaktır.  Karşınıza  çıkan ekranda kurulum ile ilgili ilk talimat soruluyor.   Aşağıdaki resimde Install Microsoft Visual Studio 2010 linkine tıklayın..

 2 - ) Yukarıdaki  seçeneğe tıkladıktan  sonra karşınıza  çıkan ekran aşağıdaki resimdeki gibi olacak.   Karşınızdaki ekran 30 saniye gibi bir bekleme süresi ile bir sonraki aşamaya geçmeniz için Next  butonuna basmanız yeterlidir.

 3 - ) Bir sonraki aşamada  ise 3. resimdeki ekran karşınıza gelecektir. Bu bölümde lisans sözleşmesini kabul edip veya etmek istemediğinizi  soruyor. "I have read and accept the license terms" seçeğini  seçerek kabul etmiş oluyorsunuz. Next diyerek devam ediyoruz. 

 4 - ) Next dedikten sonra karşınıza  4. resimdeki gibi ekran  çıkacaktır.  Burada   full olarak yükleme seçeneği ve custom seçeneği mevcut herhangi birini seçerek kuruluma başlayabilirsiniz ancak  daha profesyonel şekilde   kullanmak isterseniz  full seçeneğini işaretleyerek devam ediniz. Biz full olarak kurulmu  anlatacağız.  İnstall butonuna  başarak bir sonraki   ekrana geliniz.

 5 -) Bu aşamada  artık kuruluma başlamış bulunuyoruz.  Aşağıda 5. resimdeki ekran gelecektir ve bir süre  yaklaşık 15 dakika  ile 25 dakika arasında bekleme ( yükleme ) süresi olacaktır.  programa  hiç bir şey yapmadan  kurulumun bitmesini bekleyin. Bu süre bilgisayarınıza hızına göre değişecektir. 

 6 - ) Kurulum tamamlandıktan sonra Next butonuna basarak kurulum tamamlanmış olacaktır. En sonra resimdeki gibi bir ekran karşınıza çıkacak ve Finish butonu ile kurulumu bitiriniz.  Bilgisayarınızı yeniden başlatın  ve kullanıma hazır hale gelsin. 

 vb

Etiketler:  Visual Basic, Visual Studio, Vb,Net, Visual Basic Kurulumu, Resimli Anlatım, Vb.Net 2010, VB.Net 2008, Vb.Net Kurulumu, Program Yükleme, Visual Studio Kurulumu, Resimli Kurulum Anlatımı
Kaydol: Kayıtlar (Atom)
Copyright © 2012 - Bazı konularımızda insanları kötü alışkanlıklardan çaydırmak ve bilgilendirmek için yazılmıştır.