程序是一个窗体双击事件代码，窗体的名称是Mywindow。窗体上有一

问题填空题

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

答案

参考答案：[12]Sub Mywindow_DblClick( )
[13] Text1.text=“窗体可以触发双击事件”

解析：响应窗体及控制事件的程序代码格式为“Sub窗体或控件名称—事件( )”。本题需要响应Mywindow窗体的双击事件代码。双击事件用DblClick表示，故[12]处填：Sub Mywindow_DblClick( )。
[13] 通过For循环，寻找1至100之间可以被20整除的数，找到了，则执行语句使文本框显示“窗体能够触发双击事件”，故本处应填：Textl.text；“窗体可以触发双击事件”。即把字符串“窗体能够触发双击事件”赋给Text1的text属性。