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

Private Sub Command1_Click( )

s=0

For i=0 To List1.ListCount-1

If （）=True Then

s=s+（）

End If

Next

Label2.Caption=（）

End Sub

s=s+（）

（４）不思議なことがある。 見るからに勉強している、練習している受験生やスポーツ部員に比べ、それほど勉 強しているように見えない、あるいは練習しているように見えない受験生やスポーツ部 員のほうが、より高度な試験に受かったり、活躍(かつやく)したりする。なぜ、そうなるのだろう。前者は勉強や練習を特別なことと位置づけているのではないか。後者は当たり前のこととして、日常生活の（注）一環(いっかん)として取り組んでいるのではな いか。日常、肩に力を入れて暮らしている人はあまり活躍できない。（国友隆一『帝国ホテル 王道のサービス』による）（注）一環(いっかん)：一部

A．常に全力で努力し、勉強や練習に必死になって取り組んでいる人

B．高度な試験に合格するように、特別な勉強を日常的に取り入れている人

C．勉強や練習を特別なこととは考えず、日常生活の中で普通に行っている人

D．ほかの人から見ても、がんばっていると判断されるような生活を送っている人