[填空題] 窗體上有一個(gè)名稱為List1的列表框，一個(gè)名稱為Text1的文本框，一個(gè)名稱為Labe11、 Caption屬性為"Sum"的標(biāo)簽，一個(gè)名稱為Com
2021-07-20
[填空題] 窗體上有一個(gè)名稱為List1的列表框，一個(gè)名稱為Text1的文本框，一個(gè)名稱為Labe11、 Caption屬性為"Sum"的標(biāo)簽，一個(gè)名稱為Command1、標(biāo)題為“計(jì)算”的命令按鈕。程序運(yùn)行后，將把1～100之間能夠被7整除的數(shù)添加到列表框中。如果單擊“計(jì)算”按鈕，則對List1中的數(shù)進(jìn)行累加求和，并在文本框中顯示計(jì)算結(jié)果，如下圖所示。以下是實(shí)現(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ī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。