程序是一个窗体双击事件代码，窗体的名称是Mywindow。窗体上有一个名为text1的文本框，用来显示文本。
程序段首先在文本框中显示“窗体能够触发双击事件”然后将该文本清除；重复上述过程5次。
Option Explicit
Private ______
Dim k As Integer
For k=1 To 100
If k Mod 20 Then
_______
Else
Text1.Text=" "
End If
Print“程序运行完毕，可再双击窗体”
End Sub

下列事件中，承包商不可以向业主提出索赔费用的是（）。

A.业主指定的分包商违约，造成承包商费用的增加

B.货币出现贬值，导致承包商实际费用的增加

C.业主延期支付工程款，造成利润损失

D.施工中出现了承包商难以预计的地下暗河，导致费用增加