Register for your free account! | Forgot your password?

You last visited: Today at 10:17

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Captcha

Discussion on Captcha within the General Coding forum part of the Coders Den category.

Reply
 
Old   #1
 
Chain Reaction's Avatar
 
elite*gold: 252
Join Date: Oct 2009
Posts: 3,975
Received Thanks: 1,223
Captcha

Hey Leute
ich bin grade bei visual basic 2010 an einem captcha dran

Ich habe einen Button, der einen Zahlencode in einer Textbox generiert.
dieser text der generiert wird, soll in eine zweite textbox eingegeben werden.
dann soll per if geguckt werden ob der text in textbox 1 und in textbox 2 gleich sind.
wenn dies der fall ist soll das panel unsichtbar werden.

soweit bin ich schon

zahlengenerator :
PHP Code:
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
        Dim rnd 
As Random
        Dim number 
As Integer
        rnd 
= New Random
        number 
rnd.Next(1300000)
        
TextBox1.Text number.ToString
    End Sub 
Dann habe ich es mit dem folgendem code beim panel versucht:
PHP Code:
If TextBox1.Text TextBox2.Text Then 
Panel
.Visible False 
ich glaub es klappt nicht, weil ja direkt am anfang beim debuggen die textboxen ja leer sind und dann das programm sich halt denkt, dass die texte gleich sind und dann halt das panel " unsichtbar macht"

habt ihr eine bessere lösung?
danke
Chain Reaction is offline  
Old 05/23/2010, 21:58   #2
 
Chain Reaction's Avatar
 
elite*gold: 252
Join Date: Oct 2009
Posts: 3,975
Received Thanks: 1,223
Alles klar hat sich erledigt:

habs so gemacht:
PHP Code:
Public Class Form1





    
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
        Dim rnd 
As Random
        Dim number 
As Integer
        rnd 
= New Random
        number 
rnd.Next(1300000)
        
TextBox1.Text number.ToString
    End Sub

   
    
Private Sub TextBox1_TextChanged(ByVal sender As System.ObjectByVal e As System.EventArgsHandles TextBox1.TextChanged

    End Sub

    
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.ObjectByVal e As System.EventArgsHandles CheckBox1.CheckedChanged
        
If CheckBox1.Checked True Then
            TextBox2
.Enabled True
        End 
If
    
End Sub

    
Private Sub Panel1_Paint(ByVal sender As System.ObjectByVal e As System.Windows.Forms.PaintEventArgsHandles Panel1.Paint
        
If CheckBox1.Checked True Then
            
If TextBox1.Text TextBox2.Text Then
                Panel1
.Visible False
            End 
If
        
End If
    
End Sub
End 
Class 
trotzdem hab ich noch eine frage.

ich hätte es jetzt gerne so, dass wenn in textbox2 was anderes als in textbox1 drin steht, dass dann ein label sichtbar wird wo z.b. steht "falscher code"
ich habe es mit
PHP Code:
If TextBox2.Text Not TextBox1.Text Then 
Label1
.Visible True 
Klappt aber nicht

edit: k ich habs
hab es mit else gemacht
PHP Code:
  If CheckBox1.Checked Then
            
If TextBox2.Text TextBox1.Text Then
                Panel1
.Visible False
            
Else : Label1.Visible True


            End 
If 
Chain Reaction is offline  
Reply


Similar Threads Similar Threads
[Captcha]Warrock Korea Captcha
12/21/2009 - WarRock - 15 Replies
Hallo liebe e*pvp.. Ich mache für euch eure Warrock Korea Captchas einfach Bild einfügen und ich erstelle es für euch... Wie spielt man Warrock Korea? Korean Warrock !! Beispiel:
Captcha
08/19/2009 - Metin2 Private Server - 1 Replies
kann jmd von euch mir diesen captcha lösen vielen danke bekommt ein dickes thx
[Look Captcha]Captcha Code Programme
04/03/2009 - Metin2 Private Server - 4 Replies
Hallo bins mal wieder^^ Naja ich benutze diese Seite um den Captcha heraus zubekommen Link:nciku - Online English Chinese Dictionary, Learn Chinese Mandarin Online Suche aber ein einfacheres Programm um die Suche der anderen Foren mitglieder zu erleichtern das Programm und der Download Link Posten=) Thx sind bst garantiert ein Link zur Erklärung wäre auch hilfreich^^ Ps:bin der König der Rechtschreib fehler^^ also nicht meckern:D



All times are GMT +1. The time now is 10:17.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.