正视挫折，学会坚强（12分）

材料一：“万事如意”“心想事成”只是人们的一种美好愿望，在现实生活中我们不可能时时幸运，事事顺利。

材料二：梅花虽寄身于万芳凋零的寒冬之际，但其百折不回、傲霜斗雪，终于芳香满园；河蚌虽被沙粒侵入体内痛苦异常，但其坚忍不拔、无畏伤痛，终于孕育耀眼明珠；蛹虽自缚于茧中不见天日，但其锲而不舍、心向光明，终于破茧成蝶，飞舞于蓝天绿水间。……

阅读材料，结合所学知识回答下列问题：

分析我们不可能时时幸运，事事顺利的原因。（6分）

阅读材料二中的各种自然奇迹，你懂得一个什么道理？（3分）

面对挫折，不同态度有不同的结果，什么样的人能成为胜利者？（3分）

【说明】
某机动车驾驶员模拟考试系统的“交通禁令标志识别”窗体中，共有1个按钮(CmdTest)、6个标签、 1个包含10个单选按钮的控件数组(OptPicture)，如图2-15所示。其中，标签(LblPrompt1)“禁令标志”与标签(LblTest)相对应，标签(LblPrompt2)“图片答案”与标签(LblAnswer)相对应，标签(LblEvaluate)为结果提示。

窗体(Frm001)对象和单选按钮控件数组(OptPicture)对象的部分属性及属性值如表2-15所示。
表2-15 窗体、单选按钮控件数组的部分属性及属性值

【Visual Basic 程序】
Dim (4) As String
Private Sub cmdTest_Click()
Dim i As Integer
For i = 0 To 9
(5)
Next i
lblPrompt2.Visible = False
lblAnswer.Visible = False
lblEvaluate.Visible = False
i = Int(Rnd * 10)
lblTest.Caption = tname(i)
End Sub
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 9
optPicture(i).Value = False
(6)
lblPrompt2.Visible = False
lblAnswer.Visible = False
lblEvaluate.Visible = False
tname(0) = "禁止向左向右转弯"
tname(1) = "禁止直行和向右转弯道"
tname(2) = "禁止直行和向左转弯"
tname(3) = "禁止驶入"
tname(4) = "禁止掉头"
tname(5) = "禁止车辆长时停放"
tname(6) = "禁止机动车通行"
tname(7) = "禁止非机动车通行"
tname(8) = "禁止超车"
tname(9) = "禁止车辆临时或长时停放"
End Sub
Private Sub optPicture_Click(Index As Integer)
lblPrompt2.Visible = True
lblAnswer.Visible = (7)
lblEvaluate.Visible = True
lblAnswer. Caption= (8)
If (9) Then
lblEvaluate.ForeColor = vbRed
lblEvaluate.Caption = " 恭喜你!回答正确!"
Else
lblEvaluate.ForeColor = vbBlue
lblEvaluate.Caption= "很遗憾，回答错误。"
End If
End Sub
1. 【问题1】
请根据图2-15和图2-16的显示效果和【Visual Basic程序】，将表2-15中窗体对象、单选按钮控件数组对象的(1)～(3)空缺处的属性值填写完整。