窗体上有一个名称为List1的列表框,一个名称为Text1的文本框,一个名称为Label1、Caption属性为“Sum”的标签,一个名称为Command1、标题为“计算”的命令按钮。程序运行后,将把1~100之间能够被7整除的数添加到列表框中。如果单击“

admin2006-08-25  41

问题 窗体上有一个名称为List1的列表框,一个名称为Text1的文本框,一个名称为Label1、Caption属性为“Sum”的标签,一个名称为Command1、标题为“计算”的命令按钮。程序运行后,将把1~100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮,则对
List1中的数进行累加求和,并在文本框中显示计算结果,如图所示。

以下是实现上述功能的程序,请填空。
Private Sub Form_Load(  )
For i=1 To 100
If i Mod 7=0 Then
【  】
End Ibf
Next
End Sub
Private Sub Command1_Click(  )
Sum=0
For i=0 To【  】
Sum=Sum+【  】
Next
Text1.Text=Sum
End Sub

选项

答案List1.AddItem I, List1.ListCunt-1 , List1.List(i)

解析
转载请注明原文地址:https://jikaoti.com/ti/zV80FFFM
0

最新回复(0)