Hoşgeldin adlı programın kaynak kodları

111111_hack · 08-02-2007, 00:32

istek üzerine ekliyim dedim cok absit goruceksınız

3 tane buton ekleyın 1 tanede form "Form2" olarak.

Kod:

Private Sub Command1_Click()
MsgBox ("Hedefime Ulaştım Ozaman")
End
End Sub

Private Sub Command2_Click()
MsgBox ("Sağol Kardeşim")
End Sub

Private Sub Command3_Click()
Form2.Show
End Sub

Private Sub Form_Load()
App.TaskVisible = False
MsgBox ("bak simdi")
MsgBox ("niye actın bu dosyayı yi")
MsgBox ("amacın ne")
MsgBox ("her verilen dosyayı acıyonmu?")
MsgBox ("korkma bişey olamaz :D bunda sadece sinirin bozulucak:D")
MsgBox ("simdi 10'dan geri sayalım ve bye tamammı?")
MsgBox ("10")
MsgBox ("9")
MsgBox ("8")
MsgBox ("7")
MsgBox ("6")
MsgBox ("5")
MsgBox ("4")
MsgBox ("3")
MsgBox ("2")
MsgBox ("1")
MsgBox ("0")
MsgBox ("ama ben senı bukadar cabuk bırakmamkı:D")
MsgBox ("sımdı 50den gerı sayalım:D")
MsgBox ("50")
MsgBox ("49")
MsgBox ("48")
MsgBox ("47")
MsgBox ("46")
MsgBox ("45")
MsgBox ("44")
MsgBox ("43")
MsgBox ("42")
MsgBox ("41")
MsgBox ("40")
MsgBox ("39")
MsgBox ("38")
MsgBox ("37")
MsgBox ("36")
MsgBox ("35")
MsgBox ("34")
MsgBox ("33")
MsgBox ("31")
MsgBox ("30")
MsgBox ("29")
MsgBox ("28")
MsgBox ("27")
MsgBox ("26")
MsgBox ("25")
MsgBox ("24")
MsgBox ("23")
MsgBox ("22")
MsgBox ("21")
MsgBox ("20")
MsgBox ("19")
MsgBox ("18")
MsgBox ("17")
MsgBox ("16")
MsgBox ("15")
MsgBox ("14")
MsgBox ("13")
MsgBox ("12")
MsgBox ("11")
MsgBox ("10")
MsgBox ("9")
MsgBox ("8")
MsgBox ("7")
MsgBox ("6")
MsgBox ("5")
MsgBox ("4")
MsgBox ("3")
MsgBox ("2")
MsgBox ("1")
MsgBox ("0")
MsgBox ("sıkıldın dimi :D")
MsgBox ("seni tebrik ediyorum buna dayandın :D")
MsgBox ("hadi yeter artık serbestsin :D")
End Sub

DoubleString · 08-02-2007, 09:12

programda msgbox olmayan üç yer var:

1- End
2- Form2.Show
3- App.TaskVisible = False

Mert233 · 08-02-2007, 11:32

Alıntı:

Orjinal Mesaj Sahibi DoubleClickPlus

programda msgbox olmayan üç yer var:

1- End
2- Form2.Show
3- App.TaskVisible = False

bunları nereye ekliycez peki?hepsi var zaten

TORNAXXX · 08-02-2007, 13:44

gııcık edici bir sey

saolasın

Suk1y3n · 08-02-2007, 15:23

Alıntı:

Orjinal Mesaj Sahibi Mert233

bunları nereye ekliycez peki?hepsi var zaten

Onları bir yere eklemiyeceksin , sadece programdaki bi kaç ekisk yerleri göstermiş arkadaş

111111_hack · 09-02-2007, 00:36

Alıntı:

Orjinal Mesaj Sahibi Suk1y3n

Onları bir yere eklemiyeceksin , sadece programdaki bi kaç ekisk yerleri göstermiş arkadaş

saol abiii

bayx54 · 03-04-2007, 10:54

ellerine sağlık çok sinirbozucu

chaa · 20-08-2007, 17:00

saol kardeş iyi bişiy yapmışsın tebrik ediyorum

ZerzavatçI · 23-08-2007, 02:07

Valla benimde işime yaradı bu kodlar sağol

cagatay342 · 26-08-2007, 14:41

birader bisey merak ediom baya bi amelelik yapmıssın

50 tane mesage box yazıcagına dongu acsaydın x i stringe cvirip msgbozla yazsaydın ya bide aplication.task ı ogrendim tesskkurleer

wolkistain · 21-10-2007, 11:14

border style yi none yapmadan en üstteki kırmızı kapatma tuşunu nasıl iptal ediyoduk kodla bilen varsa söleye bilirmi?

st- · 23-10-2007, 23:40

Alıntı:

Orjinal Mesaj Sahibi wolkistain

border style yi none yapmadan en üstteki kırmızı kapatma tuşunu nasıl iptal ediyoduk kodla bilen varsa söleye bilirmi?

Formun ControlBox özelliğini False yapıyorsun.

Blot · 27-10-2007, 19:48

abi bide açıklama yapsaydın hangi kod ne işe yarar felan filan

Blot · 27-10-2007, 20:55

App.TaskVisible = False
ne işe yarar

stormi · 27-10-2007, 21:48

guzel we eglencelı bısey hemen kendıme 1ooo den gerı sayanı nı yapayım we arkadslarıma atayım hatta form terminate olayına da ekleyeyım kı kısme kapatamasın

zuhahahahaha

Konu Araçları	Bu Konuda Ara
Printer Çıktısını Göster Sayfayı Emaille Yolla	Bu Konuda Ara: Gelişmiş Arama

08-02-2007, 09:12	#2
DoubleString Forum Kalfası Kayıt Tarihi: Aug 2006 Üye numarası: #83590 Yer: cismi Mesaj sayısı: 772 Karma etkisi: 251 Karma: 24534	programda msgbox olmayan üç yer var: 1- End 2- Form2.Show 3- App.TaskVisible = False

08-02-2007, 13:44	#4
TORNAXXX Banned Kayıt Tarihi: Jan 2007 Üye numarası: #107049 Mesaj sayısı: 470 Karma etkisi: 0 Karma: 1570	gııcık edici bir sey saolasın

03-04-2007, 10:54	#7
bayx54 Çırak Kayıt Tarihi: Jan 2007 Üye numarası: #104267 Mesaj sayısı: 4 Karma etkisi: 0 Karma: 10	ellerine sağlık çok sinirbozucu

20-08-2007, 17:00	#8
chaa Çırak Kayıt Tarihi: Aug 2007 Üye numarası: #138258 Mesaj sayısı: 21 Karma etkisi: 0 Karma: 33	saol kardeş iyi bişiy yapmışsın tebrik ediyorum

23-08-2007, 02:07	#9
ZerzavatçI Forum Kalfası Kayıt Tarihi: Feb 2006 Üye numarası: #52298 Yer: "ŞANLI"urfa!!! Mesaj sayısı: 2,331 Karma etkisi: 1005 Karma: 99615	Valla benimde işime yaradı bu kodlar sağol

26-08-2007, 14:41	#10
cagatay342 Forum Kalfası Kayıt Tarihi: Apr 2006 Üye numarası: #60344 Mesaj sayısı: 792 Karma etkisi: 1191 Karma: 118467	birader bisey merak ediom baya bi amelelik yapmıssın 50 tane mesage box yazıcagına dongu acsaydın x i stringe cvirip msgbozla yazsaydın ya bide aplication.task ı ogrendim tesskkurleer

21-10-2007, 11:14	#11
wolkistain Çırak Kayıt Tarihi: Oct 2005 Üye numarası: #38055 Yer: Çehennemin Dibi !?! Mesaj sayısı: 26 Karma etkisi: 0 Karma: 10	border style yi none yapmadan en üstteki kırmızı kapatma tuşunu nasıl iptal ediyoduk kodla bilen varsa söleye bilirmi?

27-10-2007, 19:48	#13
Blot Forum Kalfası Kayıt Tarihi: Aug 2007 Üye numarası: #140020 Yer: İstanbul Mesaj sayısı: 1,333 Karma etkisi: 16634 Karma: 1662814	abi bide açıklama yapsaydın hangi kod ne işe yarar felan filan

27-10-2007, 20:55	#14
Blot Forum Kalfası Kayıt Tarihi: Aug 2007 Üye numarası: #140020 Yer: İstanbul Mesaj sayısı: 1,333 Karma etkisi: 16634 Karma: 1662814	App.TaskVisible = False ne işe yarar

27-10-2007, 21:48	#15
stormi Cool Üye Kayıt Tarihi: Sep 2007 Üye numarası: #141781 Mesaj sayısı: 132 Karma etkisi: 5 Karma: 72	guzel we eglencelı bısey hemen kendıme 1ooo den gerı sayanı nı yapayım we arkadslarıma atayım hatta form terminate olayına da ekleyeyım kı kısme kapatamasın zuhahahahaha