掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
コマンドボタンをクリックしたらリストボックスにある数字の和をラベルに表示するには？ (ID:79119)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
先ほどのコードはダメダメですね、すみません(ペコリ) Private Sub Command1_Click() Dim i As Long Dim LngSum As Long LngSum = Val(Me.List1.List(0)) For i = 1 To List1.ListCount - 1 Debug.Print Me.List1.ListIndex LngSum = LngSum + Val(Me.List1.List(i)) Next i Me.Label1.Caption = "合計" & LngSum End Sub こちらに訂正しました。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.