Visual Basic ?
- Konbuyu başlatan NmDahmeT
- Başlangıç tarihi
Form'a 1 buton 2 tane text ekle & verdiğim kodları butona gir.
kodları oku mantığını anlamaman için bir sebep kalmicak
ve nası yapamadığına şaşırıcaksın :RpS_wink:
Kod:
Private Sub Command1_Click()
If Text1.Text = "TurkHackTeam" And Text2.Text = "NmDahmeT" Then
MsgBox "Tebrikler Giriş İşlemi Başarılı " & Text1.Text & " Hoşgeldiniz.", vbInformation, "Hoş Geldiniz"
Me.Hide
Form2.Show
Else
MsgBox "Kullanıcı Adı Yada Şifre Hatalı", vbCritical, "Bildiri!"
End If
End Sub
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'#############################################Black-King TurkHackTeam.Net###############################################################
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''kodları oku mantığını anlamaman için bir sebep kalmicak
ve nası yapamadığına şaşırıcaksın :RpS_wink:
ben arkadasın sorusunu anlayamadım ki (
ben arkadasın sorusunu anlayamadım ki (
benim anladığım kadarıyla sunu dedi ;
Programın kodlarına girdiğim kodlama yani text1'e TurkHackTeam yazıcak Text2'yede şifreyi yazıcak sonra giriş yapıcak form2 alıcak yada vs. ama misal text1 farklı yazarsa form2 atmicak demek istiyor. kısacası mysql kurmadan sadece kodla 1 giriş koymak istiyor. geliştire bilirsin 3 deneme hakkı vere bilirsin vs. vs.
Nasıl olmadı kardeşim butona yazıcaksın bu kodu form değil
Kod:
If Text1.Text = "TurkHackTeam" And Text2.Text = "NmDahmeT" Then
MsgBox "Tebrikler Giriş İşlemi Başarılı " & Text1.Text & " Hoşgeldiniz.", vbInformation, "Hoş Geldiniz"
Me.Hide
Form2.Show
Else
MsgBox "Kullanıcı Adı Yada Şifre Hatalı", vbCritical, "Bildiri!"
End If
Form'a 1 buton 2 tane text ekle & verdiğim kodları butona gir.
Kod:Private Sub Command1_Click() If Text1.Text = "TurkHackTeam" And Text2.Text = "NmDahmeT" Then MsgBox "Tebrikler Giriş İşlemi Başarılı " & Text1.Text & " Hoşgeldiniz.", vbInformation, "Hoş Geldiniz" Me.Hide Form2.Show Else MsgBox "Kullanıcı Adı Yada Şifre Hatalı", vbCritical, "Bildiri!" End If End Sub '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '#############################################Black-King TurkHackTeam.Net############################################################### ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
kodları oku mantığını anlamaman için bir sebep kalmicak
ve nası yapamadığına şaşırıcaksın :RpS_wink:
Teşekkürler
