.
ÜYE OLDUKTAN SONRA REKLAM KALKACAKTIR !!!



 
AnasayfaSSSAramaÜye ListesiKayıt OlGiriş yapİletişim
Reklam Alanı
Reklam Vermek İçin Tıklayınız
Arama
 
 

Sonuç :
 
Rechercher çıkıntı araştırma
Giriş yap
Kullanıcı Adı:
Şifre:
Beni hatırla: 
:: Şifremi unuttum
En son konular
» Headquarters Gaming PRO [sXe] - 178.211.51.12
Ptsi Ara. 15, 2014 1:31 pm tarafından nonofthem

» Çok Uzun Zaman Aradan Sonra Geri Dönüş : mem1998
Çarş. Mayıs 23, 2012 7:37 pm tarafından mem1998

» Moderatör Alımı
C.tesi Mart 10, 2012 6:11 pm tarafından Pyrokinezi

» Gold k1 kodu :)
C.tesi Tem. 02, 2011 3:35 pm tarafından Reis61

» Warrock Bedava K1 İlk Kapan Alır ArkadaşLar Yöneticiler Lütfen Siz Almayın Kodu...
C.tesi Mayıs 21, 2011 9:16 pm tarafından darkus2

» Muhteşem bir forum
Cuma Şub. 25, 2011 11:35 pm tarafından apachibebetto

En iyi yollayıcılar
★ÅDMÌN★ (702)
 
kadirselen (550)
 
★Mǿяpнiпé★ (355)
 
ByCeo35 (314)
 
Darth Vader (286)
 
KaRaeL (197)
 
NharkoZ (185)
 
samsafi (174)
 
Lucho~ (101)
 
bucalii35 (97)
 
Kimler hatta?
Toplam 6 kullanıcı online :: 0 Kayıtlı, 0 Gizli ve 6 Misafir

Yok

Sitede bugüne kadar en çok 221 kişi Ptsi Eyl. 06, 2010 1:15 pm tarihinde online oldu.

Online Sayaç
Anahtar-kelime
silah

Paylaş | 
 

 VIsual Studio ile şaka programı basit :D

Aşağa gitmek 
YazarMesaj
kadirselen
[By_Admin İyi Forumlar Diler]
[By_Admin İyi Forumlar Diler]
avatar


<b>Mesaj Sayısı</b> Mesaj Sayısı : 550
<b>Kayıt tarihi</b> Kayıt tarihi : 15/08/10
<b>Yaş</b> Yaş : 27
<b>Nerden</b> Nerden : Denizli
<b>Cinsiyet</b> Cinsiyet : Erkek


MesajKonu: VIsual Studio ile şaka programı basit :D   Perş. Ağus. 19, 2010 9:28 am

ormunuza 1 adet tımer 1 adet progressbar koyun.progressbarın properties ayarından value yi 100 yapın.timerin interval özelliğini 1000 yapın.

enabled özelliğinide ture yapın.1 adet label koyup içine "bilgisayarınız 10 sn.sonra kaydedilen bütün bilgileri silecektir" yazın ve aşağıdaki kodu

kopyalayın.basit bir şaka programıdır belki bir işinize yarayabilir.kolay gelsin..

 

 

Private Sub Timer1_Elapsed(ByVal sender As Object, ByVal e As System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed

If ProgressBar1.Value > 20 Then

ProgressBar1.Value = ProgressBar1.Value - 10

Else

Timer1.Enabled = False

MsgBox("AHA!!!", MsgBoxStyle.OKOnly, "VİRÜS")

ProgressBar1.Value = 100

End If

End Sub

Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing

MsgBox("Bu programı sonlandıramazsınız!!", MsgBoxStyle.OKOnly, "VİRÜS")

End Sub

Private Sub Form1_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed

MsgBox("Tamam,tamam korkma kapanıyor...", MsgBoxStyle.OKOnly, "VİRÜS")

End Sub








| KADİR SELEN -HAKAN ŞEN |
Sayfa başına dön Aşağa gitmek
Kullanıcı profilini gör http://tazeforum.123.st
 
VIsual Studio ile şaka programı basit :D
Sayfa başına dön 
1 sayfadaki 1 sayfası

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
 :: Bilgisayar & İnternet :: Web Tasarım ve Programlama :: Visual Basic-
Buraya geçin: