home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 December / Chip_2003-12_cd2.bin / oo / download / f_0019 / sbasic.jar / text / sbasic / common / 03090202.xml < prev    next >
Extensible Markup Language  |  2003-08-29  |  6KB  |  77 lines
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <html><head><title>P┼Ö├¡kaz For...Next [Runtime]</title><meta name="filename" content="text/sbasic/common/03090202"/><meta name="language" content="en-US"/><help:css-file-link xmlns:help="http://openoffice.org/2000/help"/><!--The CSS style header method for setting styles--><style type="text/css">
  3.  
  4.         p.P1{
  5.                 }
  6.         p.P2{
  7.                 }
  8.         span.T1{
  9.                 font-weight:bold;}
  10.         </style></head><body>
  11.   
  12.   
  13.   <help:to-be-embedded Eid="fornext" xmlns:help="http://openoffice.org/2000/help">
  14.   <p class="Head1"><help:link Id="66556">P┼Ö├¡kaz For...Next [Runtime]</help:link></p>
  15.   <p class="Paragraph">Podle zadan├⌐ho po─ìtu opakov├ín├¡ zopakuje p┼Ö├¡kazy v bloku For....Next.</p>
  16.   </help:to-be-embedded>
  17.   <p class="P2">Syntaxe:</p>
  18.   <p class="Paragraph"><help:key-word value="For" tag="kw66556_1" xmlns:help="http://openoffice.org/2000/help"/>For Po─ì├¡tadlo=Za─ì├ítek <help:key-word value="Do" tag="kw66556_4" xmlns:help="http://openoffice.org/2000/help"/>To Konec [<help:key-word value="Step" tag="kw66556_3" xmlns:help="http://openoffice.org/2000/help"/>Step Krok]</p>
  19.   <p class="Paragraph">blok_p┼Ö├¡kaz┼»</p>
  20.   <p class="P2">[Exit For]</p>
  21.   <p class="Paragraph">blok_p┼Ö├¡kaz┼»</p>
  22.   <p class="Paragraph"><help:key-word value="Next" tag="kw66556_2" xmlns:help="http://openoffice.org/2000/help"/>Next [Po─ì├¡tadlo]</p>
  23.   <p class="P2">Prom─¢nn├⌐:</p>
  24.   <p class="Paragraph">Po─ì├¡tadlo: Po─ì├¡tadlo smy─ìek, kter├⌐mu je p┼Öi┼Öazena hodnota napravo od rovn├¡tka (Za─ì├ítek). Platn├⌐ jsou pouze ─ì├¡seln├⌐ prom─¢nn├⌐. Hodnota po─ì├¡tadla se zvy┼íuje nebo sni┼╛uje podle prom─¢nn├⌐ Krok, dokud nen├¡ dosa┼╛eno hodnoty Konec.</p>
  25.   <p class="Paragraph">Za─ì├ítek: ─î├¡seln├í prom─¢nn├í ur─ìuj├¡c├¡ po─ì├íte─ìn├¡ hodnotu, ve kter├⌐ m├í smy─ìka za─ì├¡nat.</p>
  26.   <p class="Paragraph">Konec: ─î├¡seln├í prom─¢nn├í ur─ìuj├¡c├¡ koncovou hodnotu, ve kter├⌐ m├í smy─ìka kon─ìit.</p>
  27.   <p class="Paragraph">Krok: Nastav├¡ hodnotu, o kterou se zv├╜┼í├¡ nebo sn├¡┼╛├¡ hodnota po─ì├¡tadla smy─ìky. Pokud nen├¡ hodnota Krok zad├ína, hodnota se bude zvy┼íovat o 1. Hodnota Konec mus├¡ b├╜t v tomto p┼Ö├¡pad─¢ vy┼í┼í├¡ ne┼╛ hodnota Za─ì├ítek. Pokud chcete sn├¡┼╛it hodnotu prom─¢nn├⌐ Po─ì├¡tadlo, mus├¡ b├╜t hodnota prom─¢nn├⌐ Konec men┼í├¡ ne┼╛ hodnota prom─¢nn├⌐ Za─ì├ítek a prom─¢nn├⌐ Krok mus├¡ b├╜t p┼Öi┼Öazena z├íporn├í hodnota.</p>
  28.   <p class="Paragraph">Smy─ìka For...Next se pou┼╛├¡v├í k opakov├ín├¡ v┼íech p┼Ö├¡kaz┼» mezi t─¢mito dv─¢ma kl├¡─ìov├╜mi slovy podle zadan├╜ch parametr┼».</p>
  29.   <p class="Paragraph">P┼Öi sn├¡┼╛en├¡ hodnoty prom─¢nn├⌐ po─ì├¡tadla aplikace <help:productname xmlns:help="http://openoffice.org/2000/help">%PRODUCTNAME</help:productname> Basic testuje, zda byla dosa┼╛ena koncov├í hodnota. Jakmile po─ì├¡tadlo p┼Öekro─ì├¡ koncovou hodnotu, smy─ìka se automaticky ukon─ì├¡.</p>
  30.   <p class="Paragraph">P┼Ö├¡kazy For...Next mohou b├╜t pou┼╛├¡v├íny jako vno┼Öen├⌐. Pokud za p┼Ö├¡kazem Next nezad├íte prom─¢nnou, bude tento p┼Ö├¡kaz automaticky odkazovat na posledn├¡ zpracovan├╜ p┼Ö├¡kaz For.</p>
  31.   <p class="Paragraph">Pokud zad├íte p┼Ö├¡r┼»stek 0, budou se p┼Ö├¡kazy mezi p┼Ö├¡kazy For a Next opakovat nep┼Öetr┼╛it─¢.</p>
  32.   <p class="Paragraph">P┼Öi odpo─ì├¡t├ív├ín├¡ prom─¢nn├⌐ po─ì├¡tadla aplikace <help:productname xmlns:help="http://openoffice.org/2000/help">%PRODUCTNAME</help:productname> Basic kontroluje, zda nedoch├íz├¡ k p┼Öete─ìen├¡ nebo podte─ìen├¡. Nemus├¡te zajistit, aby hodnota prom─¢nn├⌐ Po─ì├¡tadlo byla shodn├í s hodnotou prom─¢nn├⌐ Konec. Smy─ìka se ukon─ì├¡, jakmile p┼Öekro─ì├¡ hodnota prom─¢nn├⌐ Po─ì├¡tadlo hodnotu prom─¢nn├⌐ Konec (kladn├⌐ hodnoty prom─¢nn├⌐ Krok) nebo bude ni┼╛┼í├¡ ne┼╛ hodnota prom─¢nn├⌐ Konec (z├íporn├⌐ hodnoty prom─¢nn├⌐ Krok).</p>
  33.   <p class="Paragraph">P┼Ö├¡kazem Exit For lze smy─ìku ukon─ìit nepodm├¡n─¢n─¢. Tento p┼Ö├¡kaz mus├¡ b├╜t ve smy─ìce For..Next. Podm├¡nku ukon─ìen├¡ lze testovat p┼Ö├¡kazem If...Then n├ísleduj├¡c├¡m zp┼»sobem:</p>
  34.   <p class="Paragraph">For...</p>
  35.   <p class="Paragraph">p┼Ö├¡kazy</p>
  36.   <p class="Paragraph">If Podm├¡nka = True Then Exit For</p>
  37.   <p class="Paragraph">p┼Ö├¡kazy</p>
  38.   <p class="Paragraph">Next</p>
  39.   <p class="Paragraph">Pozn├ímka: Ve vno┼Öen├╜ch smy─ìk├ích For...Next se p┼Öi nepodm├¡n─¢n├⌐m ukon─ìen├¡ smy─ìky p┼Ö├¡kazem Exit For ukon─ì├¡ pouze jedna smy─ìka.</p>
  40.   <p class="P2">P┼Ö├¡klad</p>
  41.   <p class="Paragraph">V n├ísleduj├¡c├¡m p┼Ö├¡klad─¢ jsou pou┼╛ity dv─¢ vno┼Öen├⌐ smy─ìky k se┼Öazen├¡ skupiny ┼Öet─¢zc┼» s 10 prvky ( sEntry() ), kter├⌐ jsou nejprve vypln─¢ny r┼»zn├╜m obsahem:</p>
  42.   <p class="Paragraph">Sub ExampleSort</p>
  43.   <p class="Paragraph">Dim sEntry(10) As String</p>
  44.   <p class="Paragraph">Dim iCount As Integer</p>
  45.   <p class="PropText">Dim iCount2 As Integer</p>
  46.   <p class="PropText">Dim sTemp As String</p>
  47.   <p class="PropText">sEntry(1) = "Patty"</p>
  48.   <p class="PropText">sEntry(2) = "Kurt"</p>
  49.   <p class="PropText">sEntry(3) = "Thomas"</p>
  50.   <p class="PropText">sEntry(4) = "Michael"</p>
  51.   <p class="PropText">sEntry(5) = "David"</p>
  52.   <p class="PropText">sEntry(6) = "Cathy"</p>
  53.   <p class="PropText">sEntry(7) = "Susie"</p>
  54.   <p class="PropText">sEntry(8) = "Edward"</p>
  55.   <p class="PropText">sEntry(9) = "Christine"</p>
  56.   <p class="PropText">sEntry(10) = "Jerry"</p>
  57.   <p class="PropText"/>
  58.   <p class="PropText">For iCount = 1 To 10</p>
  59.   <p class="PropText">For iCount2 = iCount + 1 To 10</p>
  60.   <p class="PropText">If sEntry(iCount) > sEntry(iCount2) Then</p>
  61.   <p class="PropText">sTemp = sEntry(iCount)</p>
  62.   <p class="PropText">sEntry(iCount) = sEntry(iCount2)</p>
  63.   <p class="PropText">sEntry(iCount2) = sTemp</p>
  64.   <p class="PropText">End If</p>
  65.   <p class="PropText">Next iCount2</p>
  66.   <p class="PropText">Next iCount</p>
  67.   <p class="PropText"/>
  68.   <p class="PropText">For iCount = 1 To 10</p>
  69.   <p class="PropText">Print sEntry(iCount)</p>
  70.   <p class="PropText">End Sub</p>
  71.   <p class="PropText">For iCount = 1 To 10</p>
  72.   <p class="PropText">Print sEntry(iCount)</p>
  73.   <p class="PropText">Next iCount</p>
  74.   <p class="PropText">End Sub</p>
  75.   <p class="PropText"/>
  76.  </body></html>
  77.