[填空題] 窗體上有一個名稱為List1的列表框，一個名稱為Text1的文本框，一個名稱為Labe11、 Caption屬性為"Sum"的標簽，一個名稱為Com
2021-07-20
[填空題] 窗體上有一個名稱為List1的列表框，一個名稱為Text1的文本框，一個名稱為Labe11、 Caption屬性為"Sum"的標簽，一個名稱為Command1、標題為“計算”的命令按鈕。程序運行后，將把1～100之間能夠被7整除的數(shù)添加到列表框中。如果單擊“計算”按鈕，則對List1中的數(shù)進行累加求和，并在文本框中顯示計算結(jié)果，如下圖所示。以下是實現(xiàn)上述功能的程序，請?zhí)羁铡?/p>
Pfivate Sub Form_Load()
Fori=1 To 100
If iMod7=0 Then
[6]
End If
Next
End Sub
Private Sub Commandl_Crick()
Sum=0
Fori=0 To List1.List Count-1或14
Sum=Sum+ [7]
Next
Textl:Text=Sum
End Sub
正確答案：Ust1.List(i)或Val(Listl.List(i))或CInt1(List1.ist(0)
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。