• 26-08-2009, 04:23:42
    #1
    Üyeliği durduruldu
    İyi Günler ArkadaşLar Şimdi ÖnceLikLe Visual ßasic 6 Açıy0ruz.
    2 adet Textß0x ve ßir adet ßut0n oLuturalım.
    ßuttonumuza tıklayıp kod hanemize girip Şunları tanımıyoruz
    Önelikle Textimizi Tanımlıyalım
    s1 = text1.text
    s2 = text2.text
    ßöyLeLikLe napmış olduk diceksiniz
    oluşturudğumzuz TextLere İsim verdik Text1.Text Değilde s1 diye tanımlıyacağız.Kodumuza Dewam edeLim.
    s1 = text1.Text
    s2 = text2.Text
    If s1 = "Stres" and s2 = "123456" Then
    ßurdada dedikki s1 stres s2 123456 ise o zaman ( Diyelimki form2 yada ßir mesaj yazsın veyatta 2 sini ßirden yapsın )
    s1 = Text1.Text
    s2 = text2.Text
    If s1 = "Stres" And s2 = "123456" then
    Form2.show
    Msgbox "Başarıyla Giriş Yaptın" , vbInformation , "ßurayada ßaşlığımız"
    End If
    yukarda dedikki kullanıcı adı o ise şifre o ise ßana form2yi açıy0sun ve 0ndan s0nra ßana ßaşarılı Giriş Yaptın Diye vbInformation yani haßer ßilgi Uyarı Ver diy0sun ve 0ndan s0nra ßaşlığımız neyse yaz dedik taßikide ondan sonra açtığımız If'i end ıf olarak ßitiriy0ruz.
    Diyelimki ßir Yaratık GeLdi Hiç ßişi Yazmadı.
    Onada Sizlerle ßir Çözüm Üretelim.
    s1 = Text1.Text
    s2 = Text2.Text
    [COLOR="Blue"]If s1 = "" And s2 = "" Then
    MsgBox "Boş Bıraktın Kamil", vbCritical, "ßaşlık"[/COLOR]
    ElseIf s1 = "Stres" And "123456" Then
    Form2.Show
    MsgBox "Başarıyla Giriş Yaptın", vbInformation, "ßurayada ßaşlığımız"
    End If
    0raya ek olarak dedikki eğerki "" "" yani ßoşlık ßırakılırsa "ßoş ßıraktın Kamil" yazdır dedim.
    Kolay GeLsin (:
  • 26-08-2009, 04:47:03
    #2
    Üyeliği durduruldu
    Neyce konuşuyorsun ?

    Dostum burası R10 , forumtr değil.
  • 26-08-2009, 04:52:38
    #3
    Üyeliği durduruldu
    Forumtr Démédim.Sén ßir şéylér ßiliyor olaßilirsin ama sénLé hérkéz aynı séwyédé olamaz , Hérkézin anlıyacağı vé konuştuğu Dildén Tanımladım Yazdım.éméğé saygı ßu olsa gérék éywallah.
  • 26-08-2009, 04:59:18
    #4
    OkanK adlı üyeden alıntı: mesajı görüntüle
    Neyce konuşuyorsun ?
    Dostum burası R10 , forumtr değil.
    Katılıyorum dilini biraz düzelt.
  • 26-08-2009, 07:05:39
    #5
    ByStres adlı üyeden alıntı: mesajı görüntüle
    Forumtr Démédim.Sén ßir şéylér ßiliyor olaßilirsin ama sénLé hérkéz aynı séwyédé olamaz , Hérkézin anlıyacağı vé konuştuğu Dildén Tanımladım Yazdım.éméğé saygı ßu olsa gérék éywallah.
    Arkadaşın demek istediği kullandığın karakterlerin alakasızlığı. "é" falan nedir yahu? Dikkat biraz lütfen.
  • 26-08-2009, 07:58:47
    #6
    Türkçe İmla Kurallarına Uyarsan Herkes Ne Demek İstediğini Anlar
    Ama Böyle şekiLLi Yazı Yazarsan Okuyanı Yorar.Böylece Açtığın Konunun Anlamı kaLmaz
  • 27-08-2009, 00:40:39
    #7
    Türkçe konuşsan biraz anlamak için elimden geleni yaptım ama malesef hiç bir şey anlayamadım google'da eğitim dersleri diye aratabilirsin olmadı ben sana ders veririm eğitim dersi bi kere e yerine "é" kullanılmaz...
  • 27-08-2009, 21:12:39
    #8
    Üyeliği durduruldu
    DüzéLtildi.
  • 28-08-2009, 14:16:05
    #9
    Edit