窗体上有一个名称为Listl的列表框,列表框中有若干数据项,列表框Style属性为l;有一个名称为Label2的标签:还有一个名称为Commandl,Caption属性为“计算”的命令按钮(见图)。运行程序,在列表框中选中某些数据项后,单击命令按钮,则可以

admin2013-04-11  32

问题 窗体上有一个名称为Listl的列表框,列表框中有若干数据项,列表框Style属性为l;有一个名称为Label2的标签:还有一个名称为Commandl,Caption属性为“计算”的命令按钮(见图)。运行程序,在列表框中选中某些数据项后,单击命令按钮,则可以计算所选数据之和,并将结果显示在标签Label2中。以下是实现上述功能的程序,请填空。

    Private Sub Commandl Click()
    s=0
    For i=0 To Listl.ListCount—l
    If    =True Then
    s=s+
    End If
    Next i
    Label2.Caption=_________
    End Sub

选项

答案Listl.selected(i),Val(Listl.1ist(i)),str(s)

解析 第9空是将字符串强制转换为数值,这样才能进行加值计算。第10空是填写输出。
转载请注明原文地址:https://kaotiyun.com/show/r6Qp777K
0

最新回复(0)