VB for Application (Listenfelder)

Dieses Thema VB for Application (Listenfelder) im Forum "Webentwicklung, Hosting & Programmierung" wurde erstellt von DJRico0503, 26. Jan. 2004.

Thema: VB for Application (Listenfelder) Ich habe folgendes Problem: Unter Excel wird mit dem VB-Ecitor eine Listenbox mit Werten gefüllt: Bsp:...

  1. Ich habe folgendes Problem:
    Unter Excel wird mit dem VB-Ecitor eine Listenbox mit Werten gefüllt:
    Bsp: listbox1.additem = (12250)
    Davon gibt es ca 16 Füllanweisungen. Nun sollen diese Werte in ein Label zusammengerechnet werden. Leider bekomme ich das nicht hin, weil es ja auch Strings sind. Auch mit mid(...), oder ähnlichen ist es nicht möglich.

    Vielleicht hat ja jemanden einen Tipp für mich!

    Danke ???
    ???
     
  2. z.B
    Integer =CInt(String1) + CInt(string2)
     
  3. leider funktioniert das auch nicht, denn es kommt die Fehlermeldung:
    Laufzeitfehler 6: Überlauf
    Private Sub CommandButton1_Click()
    Dim n As Integer
    Dim sum As Integer
    Dim i As Integer
    Dim wert As Integer
    n = ListBox4.ListCount
    For i = 0 To n - 1
    wert = CInt(ListBox4.List(i))
    sum = sum + wert
    Next i

    Label6.Caption = sum
    End Sub
    ::)
     
  4. doch jetzt funktioniert es... folgender Code ist der Richtige!

    Private Sub CommandButton1_Click()
    Dim n As Integer
    Dim sum As Single
    Dim i As Integer
    Dim wert As Single
    n = ListBox4.ListCount
    For i = 0 To n - 1
    sum = sum + Int(ListBox4.List(i))
    Next i

    Label6.Caption = sum

    Trotzdem danke für die Hilfe!
    ;D
     
  5. Laufzeitfehler 6: Überlauf soll heissen das der Wert zu gross für eine Int- Variable ist. Der long-Datentyp wäre sicherer.
     
Die Seite wird geladen...

VB for Application (Listenfelder) - Ähnliche Themen

Forum Datum
Microsoft Application Error Reporting deinstallieren Windows XP Forum 17. Dez. 2015
Application Cache Webentwicklung, Hosting & Programmierung 1. Dez. 2014
Eventlog Application (Anwendung) ändern Windows XP Forum 16. Juli 2012
Application Error Windows XP Forum 21. März 2008
application has generated an exception that could not be handled ^^ Windows XP Forum 17. Feb. 2008