Структура За / Следваща

За Следваща отнема повторения (контур) определена сума. Вие ще поддържа променлива, която съхранява стойност, съответстваща на броя на повторение.

 Дим и като цяло число

 За I = 1 до 10
     MsgBox ("Replay Брой:" и аз)
 До

8 коментара към "Структура За / Next"

  1. zynid3as казва:

    Хей, това е ако искате постепенно да се увеличава
    изтъняваща и как??

    • Елисей казва:

      За да направите това използването на клауза за намаляване стъпка (стъпка) и ви преминават отрицателно параметър. Както и в този пример:

      Защото аз като Integer = 10 към 1 Стъпка -1
      MsgBox ("Replay Брой:" и аз)
      До

  2. Рубен Гонсалес Аарон казва:

    се приема като факториела на брой, до структура за Visual Basic?

    • Gransensei казва:

      Interfas създаден и двойно кликнете btncalcular
      кодът е

      полутъмни х като цяло число, Е като цяло число, цяло число N като
      , помрачени като цяло число = 1 Cum
      N за = cint (txtN.text)
      X = 2 до N +1 стъпка X
      F = Натрупана + X
      ACU = F
      До
      txtN.text = F

      Опитайте го, ако ви свършат добре

  3. Нандо казва:

    jodist ajaj истината? не помогна, когато става дума за тези неща ... ако знаете каква dirria ... е по-добре да се учат сами .. информатика егоизъм е това, което получавате по-р ... доверие? самостоятелно-папа

  4. Tavares казва:

    чуят и на нормите за допустими, за да бъде всеки път, когато кликнете или не ви препоръчваме

  5. Франсис (CR), каза:

    БЕНА Дема ... T поздравя вашия сайт! Е г muxa Помощ!

  6. Нориега казва:

    Уча се да програмирате имам тази програма и имам нужда, когато влизам дублираните данни, които вече съществуват р ми каже и аз оставете празно на cambos да влезе в друга

    Общественото клас Form1

    Лично за Sub Button1_Click (ByVal подателя като System.Object, ByVal Е, System.EventArgs) Дръжки Button1.Click

    Ако TextBox1.Text = "" и TextBox2.Text = "" Тогава
    MessageBox.Show (код и наименование не може да отиде в бяло ")
    Крайна сметка, ако

    ListView1.Items.Add (TextBox1.Text). SubItems.Add (TextBox2.Text)

    За I = 0 с ListView1.Items.Count - 1

    Ако TextBox1.Text = ListView1.Items (I). Тогава Текст
    MessageBox.Show ("Запис вече съществува")
    Крайна сметка, ако

    До

    End Sub
    Край клас

Коментар