[VBA] Zahlen ausgeben

Dieses Thema im Forum "Programmieren" wurde erstellt von Eun, 21. August 2005.

Status des Themas:
Es sind keine weiteren Antworten möglich.
  1. Eun

    Eun Byte

    Registriert seit:
    4. August 2005
    Beiträge:
    11
    Hallo,

    wies jemand wie man ein script schreibt wo alle zahlen von zum Beispiel 1 bis 100 asusgegeben werden?

    Wäre echt cool.

    Danke shon vorraus. :)
     
  2. lazyjo

    lazyjo Byte

    Registriert seit:
    19. August 2005
    Beiträge:
    88
    Hi EUN,

    Ich bin mir nicht sicher in wieweit es unterschiede zwischen VB und VBA gibt. Hier ein Prog in VB, ich denke es geht auch in VBA:

    Private Sub Form_Load()

    Dim n As Integer

    ' *************************
    ' Beispiel für eine TextBox
    ' *************************

    ' Bei einer Textbox sollten zwei Eigenschaften
    ' beachtet/geändert werden:
    ' MultiLine auf True
    ' ScrollBars auf 2-Vertikal

    Text1.Text = "" ' Textfeld löschen
    For n = 0 To 100 ' Zahlen ausgeben
    Text1.Text = Text1.Text + Str(n) + vbNewLine
    Next n

    ' *************************
    ' Beispiel für eine ListBox
    ' *************************

    List1.Clear
    For n = 0 To 100
    List1.AddItem (Str(n))
    Next n

    End Sub

    Gruß
    JO
     

    Anhänge:

    • $VB.jpg
      $VB.jpg
      Dateigröße:
      31 KB
      Aufrufe:
      73
  3. Eun

    Eun Byte

    Registriert seit:
    4. August 2005
    Beiträge:
    11
    Danke :)
    Du bist der beste :bet:
    mist das ich nich so schlau bin :heul:

    Aber egal danke für alles!!
     
Status des Themas:
Es sind keine weiteren Antworten möglich.

Diese Seite empfehlen