Ping Programi

PİNG GÖNDERİCİ

IP yerine istediğiniz web site ve ya ıp yi yazın.

Ms(MiliSaniye) yerine 10000 yazabilirsiniz.

Başlata tıklayın program ping göndermeye başlasın.

GEREKENLER

2 TEXT BOX
2 LABEL
2 BUTTON

Public Class Form1

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Timer1.Interval = TextBox2.Text
        Timer1.Start()
    End Sub

    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        Timer1.Stop()
    End Sub

    Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
        Shell("Ping (TextBox1.Text")
        MsgBox("Gönderiliyor")
    End Sub
End Class

Devamını Oku

Butona tıklayınca ProgressBar Dolsun

GEREKENLER

2 TANE BUTTON

TİMER

PROGRESS BAR

Public Class Form1
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Timer1.Start()
    End Sub
    Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
        ProgressBar1.Increment(2)
        If ProgressBar1.Value = ProgressBar1.Maximum Then
        End If
    End Sub
    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        Timer1.Stop()
    End Sub
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Process.Start("chrome.exe", "http://www.visualbasicdersleri.com/")
        Process.Start("iexplore.exe", "http://www.visualbasicdersleri.com/")
        Process.Start("browser.exe", "http://www.visualbasicdersleri.com/")
    End Sub
End Class

Devamını Oku

Duvar Kağıdı Ekle

Duvar Kağıdı Ekle Programı VB.NET 

Programın adından da anlaşılacağı üzerine duvar kağıdı ekleme

programıdır.kendinizi geliştirebilecek bir proje.

Duvar Kağıdı Ekle Programı VB.NET 

PROJEYİ İNDİRMEK İÇİN TIKLA

 RAR PASS :www.visualbasicdersleri.com

KAYNAK: http://eraslancemil.blogspot.com.tr/

Devamını Oku

Ekranı Kilitle

Ekranı Kilitleme Programı

Ekranı kilitleme programı,önce Gözattan .exe rastgele bir dosya seçilir.

daha sonra texte şifre girilir.

şifre girildikten sonra Etkinleştir e basılır.

ekran kilitlenir hiç bir yere girmesine program izin vermez.

görev yöneticisine girmesine bile izin vermemektir.

acmak için ise f12 basıp şifre girmek zorundasınız.

aksi taktirde yeniden başlatırsınız.

Ekranı Kilitleme Programı

PROJEYİ İNDİRMEK İÇİN TIKLA

RAR PASS : www.visualbasicdersleri.com

KAYNAK: http://eraslancemil.blogspot.com.tr/

Devamını Oku

Reklam Pencereli Program

Reklam Pencereli Program

Programınıza 2 tane Form koyun. Form1 re Picturebox ekleyin.

pictureboxun FormBorderStyle sini None yapın.

daha sonra kodu kendinize göre ayarlayın.

Kullanıcı Sizin reklamınıza bastıktan sonra form2 ye yönlenecektir.

EKLENECEKLER:

2 FORM

1 PİCTUREBOX

Public Class Form1
    Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
        Form2.Show()
        Dim process As New System.Diagnostics.Process
        process.StartInfo.FileName = "www.visualbasicdersleri.com"
        process.StartInfo.Verb = "Open"
        process.StartInfo.WindowStyle = ProcessWindowStyle.Normal
        process.Start()
    End Sub
End Class

Devamını Oku