Butonla Web adresini Açtırma
Tarih
25/11/2008 19:12
Konu Sahibi
chopper07
Yorumlar
2
Okunma
1771
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
24/11/2016,13:02
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
29/10/2016,20:35
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
24/11/2016,13:02
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, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya