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 -> [VB6] Fragen - Antworten
Autor
Nachricht
Primal_
Newbie
Newbie

Anmeldedatum: 23.02.2008
Beiträge: 19
Keygen
Verfasst am: 07.03.2008, 21:45
ja Ich habe die Suche genutzt aber nix gefunden...
also ich habe 12 Case's nun möchte ich das die Case's durch zufall in Textboxen Wiedergegeben Werden.
hier nen Beispiel

Case Is = 1
Text1.Text = "hi"
Case Is = 2
Text1.Text = "hallo"

so nun möchte ich das diese beiden Case's durch zufall bestimmt werden
wenn das prog fertig ist uppe ich es hier dann auch^^
 
sollniss_
Coder
Coder

Anmeldedatum: 08.09.2007
Beiträge: 212

Verfasst am: 07.03.2008, 21:56
Code:
zufälligezahlvon1bis12 = int((rnd * 12) + 1)

http://sollniss.1x.to/

 
Primal_
Newbie
Newbie

Anmeldedatum: 23.02.2008
Beiträge: 19

Verfasst am: 07.03.2008, 22:10
Ähhmm brauch ich da nicht den Dim befehl noch für??
kannst du mir BITTE deinen Code in meinen Einbinden und dann hier posten so als beispiel??
 
sollniss_
Coder
Coder

Anmeldedatum: 08.09.2007
Beiträge: 212

Verfasst am: 07.03.2008, 22:16
ich arbeite nicht mit case, desswegen kkann ich das ohne nachzugucken net machen.. ich bevorzuge if:

Code:

dim zufall as integer
zufall = int((rnd * 12) + 1)
if zufall = 1 then
text1.text = "blubb"
elseif zufall = 2 then
text1.text = "bla"

........

elseif zufall = 12 then
text1.text = "asd"
end if

http://sollniss.1x.to/

 
Primal_
Newbie
Newbie

Anmeldedatum: 23.02.2008
Beiträge: 19

Verfasst am: 07.03.2008, 22:17
k thx klappt perfekt ^^
 
DFJ_
Poster
Poster

Anmeldedatum: 15.10.2007
Beiträge: 156

Verfasst am: 08.03.2008, 12:07

sollniss hat Folgendes geschrieben:
ich arbeite nicht mit case, desswegen kkann ich das ohne nachzugucken net machen.. ich bevorzuge if:

Code:

dim zufall as integer
dim text(12) as integer

zufall  = int((rnd * 12) + 1)

text(1) = "hallo"
text(2) = "tschaui"
text(3) = "bubu

text1.text = text(zufall)





so finde ich es eigenlich besser Smile vom aus sehn Wink
Spam bot
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten

Tags: zufall

  
 Verwandte Themen   Aufrufe   Letzter Beitrag 
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 Code in text1 anzeigen. 590 06.12.2007, 15:01
Keine neuen Beiträge Wenn in Text1 vorhanden dann 292 28.09.2007, 20:29
 



[ Time: 0.0610s ][ Queries: 95 (0.0213s) ][ GZIP on - Debug on ]