Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
 
RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten
Autor
Nachricht
SpanhkX_
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 4

Code in text1 anzeigen.
Verfasst am: 05.12.2007, 18:53

Hey, kenn mich noch nicht so gut mit VB6 aus.
also meine frage:
Wenn ich auf "OK" Klicke soll code 345345 oder 45456 etc. eingezeigt werden..
mfg
 
Blue!Sky!_
Coder
Coder



Anmeldedatum: 06.10.2007
Beiträge: 227


Verfasst am: 05.12.2007, 19:06

command1_click()
text1.text = "dein code"
end sub
wenn de das meinst
 
xXCoP-KillaXx_
Tutorial Leser
Tutorial Leser

Anmeldedatum: 30.11.2007
Beiträge: 30


Verfasst am: 05.12.2007, 19:14

Bei .NET

Code:
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = "deincode"
    End Sub
End Class


Also einfach :

Code:
TextBox1.Text = "deincode"


du brauchst natürlich nen button und ne textbox
 
SpanhkX_
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 4


Verfasst am: 05.12.2007, 19:20

Und was ist mit mehreren codes?
 
xXCoP-KillaXx_
Tutorial Leser
Tutorial Leser

Anmeldedatum: 30.11.2007
Beiträge: 30


Verfasst am: 05.12.2007, 19:24

soll er einfach frei einen generieren?....also das zufällig irgendeiner kommt?
 
SpanhkX_
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 4


Verfasst am: 05.12.2007, 19:25

Nein z.b. die codes 436 56456 5645 oder so sollen angezeigt werden
 
xXCoP-KillaXx_
Tutorial Leser
Tutorial Leser

Anmeldedatum: 30.11.2007
Beiträge: 30


Verfasst am: 05.12.2007, 19:43

hintereinander oder in einzelnen textboxen? ich versteh dich nicht.

so oder was?

Code:
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       
TextBox1.Text = "436 56456 5645"
   
End Sub
End Class
 
King of Chaos_
Coder
Coder

Anmeldedatum: 26.09.2007
Beiträge: 235


Verfasst am: 05.12.2007, 19:49

text1.text = "dein code" das in button was is da so schwer zu erklären/kapieren?
 
SpanhkX_
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 4


Verfasst am: 05.12.2007, 20:15

Ich meine es so:
Wenn man auf "OK" klickt soll erstmal der code zb. code 456 kommen und dann wenn man nochmal klickt 452 etc. ...
 
King of Chaos_
Coder
Coder

Anmeldedatum: 26.09.2007
Beiträge: 235


Verfasst am: 05.12.2007, 21:30

dann wählt man bei doppel klick
oder machts über mehrere buttons

-.-
 
Bahamut_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 12.12.2006
Beiträge: 250


Verfasst am: 06.12.2007, 15:01


Code:

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dim rnd as string
rnd = randomnumber(10)
Select Case rnd
  Case 0
    label1.text = "a"
  Case 1
    label1.text = "b"
    'usw..
  End Select
End Sub

Public Function RandomNumber(ByVal MaxNumber As Integer, _
    Optional ByVal MinNumber As Integer = 0) As Integer
     
      'initialize random number generator
        Dim r As New Random(System.DateTime.Now.Millisecond)
 
      'if passed incorrect arguments, swap them
        'can also throw exception or return 0

        If MinNumber > MaxNumber Then
            Dim t As Integer = MinNumber
            MinNumber = MaxNumber
            MaxNumber = t
        End If

        Return r.Next(MinNumber, MaxNumber)

    End Function
End Class


Erklärung: Es wird einfach eine zufällige Zahl erstellt (google -> random vb.net) und je nach dem wie die Zahl lautet etwas anderes ausgegeben.

Untested, sollte aber gehn. Lern aber lieber mal die Basics anstatt nen Keygen Copy&Pasten. Naja is sowieso kein echter Keygen, es werden halt nur vorgefertigte Keys ausgegeben.

Wenn diese Unterstellung unberechtigt ist dann sorry, aber es sieht einfach danach aus ^^
VB.Net-Compiler: http://www.microsoft.com/germany/express/download/default.aspx
VB.Net-eBook: http://www.galileocomputing.de/openbook/visual_basic/
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten

Tags: anzeigen

 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge text1.text in .txt speichern 761 18.09.2008, 11:07
Keine neuen Beiträge text1 replace ? 293 31.08.2008, 09:17
Keine neuen Beiträge RegKey auslesen und in Text1.... 403 01.07.2008, 16:10
Keine neuen Beiträge Text1.text enter? 307 17.03.2008, 13:55
Keine neuen Beiträge Wenn in Text1 vorhanden dann 292 28.09.2007, 20:29
 


[ Time: 0.1230s ][ Queries: 112 (0.0520s) ][ GZIP on - Debug on ]