[填空题] 程序是一个窗体双击事件代码,窗体的名称是Mywindow。窗体上有一个名为text1的文本框,用来显示文本。 程序段首先在文本框中显示“窗体能够触发双击事件”然后将该文本清除;重复上述过程5次。 Option Explicit Private ______ Dim k As Integer For k=1 To 100If k Mod 20 Then _______ElseText1.Text=" "End If Print“程序运行完毕,可再双击窗体” End Sub
[填空题] 程序是一个窗体双击事件代码,窗体的名称是Mywindow。窗体上有一个名为text1的文本框,用来显示文本。 程序段首先在文本框中显示“窗体能够触发双击事件”然后将该文本清除;重复上述过程5次。 Option Explicit Private ______ Dim k As Integer For k=1 To 100If k Mod 20 Then _______ElseText1.Text=" "End If Print“程序运行完毕,可再双击窗体” End Sub
Sub My window_DblClick()
Text1.text=“窗体可以触发双击事件” 本题考查考生对事件过程的理解。响应窗体及控件事件的程序代码格式为“Sub窗体或控件名称事件()”。本题需要响应Mywindow窗体的双击事件代码。双击事件用DblClick表示,故第一处空白填:Sub Mywindow_DblClick()。 第二处空白通过For循环,寻找1之100之间可以被20整除的数,找到了,则执行语句使文本框显示“窗体能够触发双击事件”,故本处应填: Text1.text=“窗体可以触发双击事件”。即把字符串“窗体能够触发双击事件”赋给Text1的text属性。
VIP截止日期:2025-01-02 00:23:21
←请使用支付宝扫码支付VIP截止日期:2025-01-02 00:23:21
←请使用微信扫码支付