Hediye Excel Kitabı Ve Altın Üyelik Çekiliş Sonuçları İçin [Tıklayınız]

ÖNEMLİ

  • Forumumuzda bilgi alışverişinde bulunabilmeniz için Üye olmalısınız. Üye olmayanlar forumumuzdan yararlanamazlar.
  • Eğer daha önceden üye olduysanız lütfen kullanıcı adınız ve şifreniz ile Giriş yapınız.
 Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
25/11/2008 19:12
Konu Sahibi
chopper07
Yorumlar
2
Okunma
2131
Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 5/5 - 1 oy

chopper07

Uzman
Kullanici Avatari
Uzman
E....
1.803
29/01/2008
376
Aydın
Ofis 2003
02/11/2017,22:45
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 https://www.accesstr.net", vbNormal ) 
Case vbNo 
Exit Sub 
End Select 


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

resim
resim
resim
Cevapla

Puletin


Kullanici Avatari
Altın Üye
1.715
01/11/2008
416
-
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.803
29/01/2008
376
Aydın
Ofis 2003
02/11/2017,22:45
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.
Forum use Krzysztof "Supryk" Supryczynski addons.