[*]Profan

- Page 1 -

Oliver
Schmidt

Hallo
Wie kann ich mit Whileloop eine 1 mal 1 Tabelle darstzellen ?

MfG
Oliver Schmidt

Kompilieren Markieren Separieren

Christian
Schneider

WhileLoop 1

    Print "Zelle "+str$(&loop)

Endwhile

Wait

Denke allerdings nicht das wir das Gleiche meinen. Tabelle 1x1 wäre eine Zelle. Dazu brauchts eigentlich kein WhileLoop.

XProfan 11| Vista(64) SP2

Kompilieren Markieren Separieren declare x&,y& cls whileLoop 10 y&=&loop whileLoop 10 x&=&loop setpixel x&,y&,0 wend wend
	08.12.2009 ▲ Vollständiges Zitat Absatzweise Citazione Zeilenweise Citazione

Christian
Schneider

@IF: Musst mir mal verraten wo du deine Kristallkugel gekauft hast

XProfan 11| Vista(64) SP2

Nix gekauft, gefleißt. -.-

Oliver
Schmidt

Ich glaube,ihr habt mir nicht richtig verstanden.

[offtopic]Ich glaube eher, Du hast Dich nicht richtig ausgedrückt. Du meinst eine Einmaleins-Tabelle:
Sorry!!! Hab hier versehentlich was gelöscht!!
Jörg[/offtopic]

Achso: Kompilieren Markieren Separieren Gemerkt/Separiert von http://xprofan.com/thread.core?t=7965 declare x&,y& cls whileLoop 10 y&=&loop whileLoop 10 x&=&loop setpixel x&,y&,0 wend wend
	08.12.2009 ▲ Vollständiges Zitat Absatzweise Citazione Zeilenweise Citazione

Oliver
Schmidt

Hallo
Nach deinem Code kommt sowas raus,guck anchang:
aber kein ein mal eins
MfG
Oliver Schmidt

1mal1.jpg	13 kB

Hochgeladen:	08.12.2009

Downloadcounter:
		Download

Oliver Schmidt, Beitrag=55341, Zeitpunkt=08.12.2009

Jörg
Sellmeyer

Hallo
Nach deinem Code kommt sowas raus,guck anchang:
aber kein ein mal eins
MfG
Oliver Schmidt

Welchen Code, von wem meinst Du?

So gehts bei mir:
Kompilieren Markieren Separieren

Declare x%
Window 0,0 - 400,830
Set("Decimals",0)
Declare Liste&
Liste& = Create("Listbox",%hwnd,0,5,5,200,770)

whileLoop 10

    x% =&loop

    whileLoop 10

        AddString(Liste&, Str$(x%) + " * " + Str$(&Loop) + " = " + Str$(x% * &Loop))

    wend

    AddString(Liste&,"")

wend

waitkey

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

- Page 2 -

Oliver
Schmidt

sorry,den Code habe ich übersehen
Kompilieren Markieren Separieren

Declare x%
Window 0,0 - 400,830
Set("Decimals& quot;,0)
Declare Liste&
Liste& = Create("Listbox",%hw nd,0,5,5,200,770)

whileLoop 10

    x% =&loop

    whileLoop 10

        AddString(Liste&, Str$(x%) + " * " + Str$(&Loop) + " = " + Str$(x% * &Loop))

    wend

    AddString(Liste&,&qu ot;")

wend

waitkey

Noch eine Frage:vielleicht hast du ahnung, wie kann ich circa die Soundkarte Frequenzen messen ? die am eingang des Mikrofon kommen
MfG
Oliver Schmidt

Jörg
Sellmeyer

Da würde ich Dir empfehlen, mal im Profan-Foro die Suchfunktion zu bemühen.

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

Oliver
Schmidt

Jörg Sellmeyer
Hab ich schon gemacht,leider nichs gefunden
MfG
Oliver Schmidt