forma exit buttonu ekleme

forma exit buttonu ekleme
yani cıkış butonu kodunu bilen warmı ?

çıkışı eskiden biliyordum ama unuttum. şimdi şuan sadece formu gizlemeyi biliyorum.çıkış olarak kullanabilirsin.ama ram yer.

örnek kod:

Private Sub Command11_Click()
Form1.Hide
End Sub

form1 i gizler

bir command button koy.ona çift tıkla ve form1.hide yaz. tmmdır (form gizlenir ama ram yer :S)

exit butonu koymak istiyosan
buton ekle
adını cik yap

private sub cik_click()
end
end sub

niye ben bunu düşünemedim xD gizlemekten daha iyidir.hiç degilse ram yemez

nasıl yapılıyor

command button ekle.ekledigin command buttona end yaz bitti

androma kardeş bana koxp u açtıgında kingoftheknight üyeleri için yapılmıştır yazmasını istiyorum nasıl yapabilirim onu dıyorum anlamadım gıttı bide koxp u kapadıgında site açılmasını istiyorum teker teker soylermısın sana zahmet kardeş

formun load olayına

MsgBox "kingoftheknight üyeleri için yapılmıştır"

bunu kopyala^^

ornek :

Private Sub Form_Load()
MsgBox "ahanda budur "

kapatınca site acılması

Private Sub form_unload(Cancel As Integer)
MsgBox ("Nuri Alço Koxp v1 Kullandığınız İçin Teşekkürler"), vbInformation, "Jackal"
Shell ("explorer.exe www.pegasuskoxp.forummum.net"), vbNormalNoFocus
End Sub


kendin editlersin

explorer olmaz o iexplorer olcaq xD

farketmez
yine acar ayrıca iexplorer deil iexplore

jackal13_5 demiş ki:

exit butonu koymak istiyosan
buton ekle
adını cik yap

private sub cik_click()
end
end sub

sagolasın tesekkurler dostum

androad demiş ki:

kapatınca site acılması

Private Sub form_unload(Cancel As Integer)
MsgBox ("Nuri Alço Koxp v1 Kullandığınız İçin Teşekkürler"), vbInformation, "Jackal"
Shell ("explorer.exe www.pegasuskoxp.forummum.net"), vbNormalNoFocus
End Sub


kendin editlersin

MsgBox ("Nuri Alço Koxp v1 Kullandığınız İçin Teşekkürler"), vbInformation, "Jackal" oluyorda Shell olmuyor sıteye gırmıyor

nereye ekledin sen bu kodları

yani X ya basınca çıkar bunlar. eklediğin butondan kapatınca çıkmaması lazm bu yazının

Braveheart demiş ki:

androad demiş ki:

kapatınca site acılması

Private Sub form_unload(Cancel As Integer)
MsgBox ("Nuri Alço Koxp v1 Kullandığınız İçin Teşekkürler"), vbInformation, "Jackal"
Shell ("explorer.exe www.pegasuskoxp.forummum.net"), vbNormalNoFocus
End Sub


kendin editlersin

MsgBox ("Nuri Alço Koxp v1 Kullandığınız İçin Teşekkürler"), vbInformation, "Jackal" oluyorda Shell olmuyor sıteye gırmıyor

Private Sub form_unload(Cancel As Integer)
MsgBox ("Nuri Alço Koxp v1 Kullandığınız İçin Teşekkürler"), vbInformation, "king O xD"
Shell ("iexplore.exe www.pegasuskoxp.forummum.net"), vbmaximumNoFocus
end
End Sub

O Kadar Kişi Yazmış Biri Bile Doğru Cevabı Vermemiş Yazıklar Olsun!.
Dediklerinizin Hepsi Gizlemeye Yarıyor.
Unload Kodunu Kullanıcaksın Kardeşim form1_unload
Form1 Yerine Form Adı Neyse Onu Yazıcaksın.
(Unload.Me Değil Çünkü Buda Bellekte Yer Tutuyor.)
Pardon Şimdi Farkettim En Sonda Biri Göndermiş.