Merhaba oncelikle şimdiden tşk ediyorum yapmak istedigim şu bende bir yazı var mesela 286-1 yazınca o yazının anlamını verecek yani bende kodlara gore hata acıklamaları var ben 286-1 yazınca benim vermiş oıldugum kodlrdan 286-1 olanını vermesini istiyoreum boyle birşey mum kun mu mumkunse kodları nı bana bir zahmet yazın iyi günler For Die For Every

'ay pardon dalgınlıma gelmis düzelttim :)Private Sub Command1_Click Select Case text1. TextCase "286-1"MsgBox "Bilmemne bilmemne"Case "560-9"MsgBox "ıvır zıvır"Case ElseMsgBox "Bulunamadi, lutfen atmasyon yapmayin :P"End SelectEnd Sub'herseyi sil bu kodlari kopyala sonra devam ettir, basarilar ;) The king is bleeding.

Oke dostum sağol ircede gel orda konuşuruz For Die For Every

'hmm anladiim kadariyla bi textbox yani text1, bi command1 eklediini farz edersek'case ile hepsini ayarla tek tek :)Private Sub Command1_Click Select Case text1. TextCase "286-1"MsgBox "Bilmemne bilmemne"Case "560-9"MsgBox "ıvır zıvır"Case ElseMsgBox "Bulunamadi, lutfen atmasyon yapmayin :P"End SelectEnd Sub'al iste bunun gibi dewam et biseler yaparsin hepsine karsilik bir mesaj kutusu cikar.. Edit:Düzelttim.. The king is bleeding.

Kardeş Oyle yaptım olmadı compile error dedi basştaki Private Sub Command1_Click yazısı sarı oldu birde End case yazınca da hata verdi lutfen yardım et For Die For Every

Ben yeniyim kardeş kusura bakma yani acıklamak istedigim 368-1 yazdıgımda bana acıklamasını verecekyani 381-1 neymiş düşük yag basıncı benim demek istedigim 381-1 yazdıgımda bana düşük yag basıncı desin tabi bunlar bende sayfa haalinde var ama program haline getirmek istiyorum For Die For Every

Dediinden pek bise anlamadim biraz detaylı aciklarsan yardimci olmaya calisirim.. Sen ne anlatmak istedin yani361 yazdiin yere msgbox "361. error da su bu olmustur"bunumu istedin hacı function yap.. ii acikla tam kod vermeye calisayim The king is bleeding.