Butonla Web adresini Açtırma
Tarih
25/11/2008 19:12
Konu Sahibi
chopper07
Yorumlar
2
Okunma
1800
Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 5/5 - 1 oy



chopper07
Uzman
Kullanici Avatari
Uzman
E....
1.798
29/01/2008
365
Aydın
Ofis 2003
03/01/2017,10:40
Sponsor Reklam
Bir Butonun veya Labelın Click Olayına Ekleyin


Kod:
1
2
3
4
5
6
7
8
9
Dim iRet As Long 
Dim Cevap As Integer 
Cevap = MsgBox("www.accesstr.net adresini açmak istiyor musunuz?", vbInformation + vbYesNo, www.accesstr.net ) 
Select Case Cevap 
Case vbYes 
iRet = Shell("start.exe http://www.accesstr.net", vbNormal ) 
Case vbNo 
Exit Sub 
End Select 


™Hiç Birimiz, Hepimiz Kadar Akıllı Olamayız...®

resim
resim
resim
Cevapla

Puletin
Uzman
Kullanici Avatari
Uzman
1.716
01/11/2008
416
Ülke Dışı
Ofis 2003
24/12/2016,00:18
Hocam Kodlar için teşekkürler devamını bekliyoruz ...
Sayenizde ufak bir kod arşivi oluşturuyoruz...
Kaplumbağa ya dikkat et...
Sadece başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla

chopper07
Uzman
Kullanici Avatari
Uzman
E....
1.798
29/01/2008
365
Aydın
Ofis 2003
03/01/2017,10:40
Sponsor Reklam
rica ederim. elimden geldikce eklemeye, paylaşmaya devam...
™Hiç Birimiz, Hepimiz Kadar Akıllı Olamayız...®

resim
resim
resim
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi



Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya