当发生Form_ Click 事件后,下面这段程序代码的执行结果为在窗体中输出______。 Option Explicit Private Sub Form. Click () Dim num As String * 1, n As Integer Open "C:\ Check. txt" For Random As #10 For n = 1 To 6 num = Chr(n + 64) Put %10, n, num Next n Seek #10, 3: Get #10, , num Print Loc(10); Seek(10) End Sub
A.3 4
B.4 5
C.5 3
D.3 3
第1题:
在程序运行时,下面的叙述中正确的是( )。
A. 用鼠标右键单击窗体中无控件的部分,会执行窗体的Form_Load事件过程
B. 用鼠标左键单击窗体的标题栏,会执行窗体的Form. Click事件过程
C. 只装入而不显示窗体,也会执行窗体的Form. Load事件过程
D. 装入窗体后,每次显示该窗体时,都会执行窗体的Form. Click事件过程
第2题:
表单里有一个选项按钮组,包含两个选项按钮Optionl和Option2,假设Option2没有设置Click事件代码,而Optionl以及选项按钮组和表单都设置了Click事件代码,那么当表单运行时,如果用户单击Option2,系统将( )。
A.执行表单的Click事件代码
B.执行选项按钮组的Click事件代码
C.执行Optionl的Click事件代码
D.不会有反应
第3题:
窗体的单击事件过程如下,当单击窗体3次后,在标签 Label1中输出的结果是__________。 Dim k% = 2 Private Sub Form1_Click(......) Handles Me.Click k = k +3 Label1.Text = k End Sub
A.11
B.2
C.5
D.8
E.14
第4题:
执行下面这段程序后,单击命令按钮,窗体中输出结果是 ______。 Private Sub Command1_Click() a=1 : b=4 : c = 9 : d = 5 If a < b Then If c<d Then x=True Else If a<c Then x=False Else x=True End If End If End If Print Val(x) End Sub
A.True
B.False
C.0
D.1
第5题:
( 25 )表单里有一个选项按钮组,包含两个选项按钮 Option1 和 Option2 。假设 Option2 没有设置 Clic k事件代码 , 而 Option1 以及选项按钮组和表单都设置了 Click 事件代码 , 那么当表单运行时 , 如果用户单击 Option2 ,系统将:
A) 执行表单的 Click 事件代码
B )执行选项按钮组的 Click 事件代码
C )执行 Option1 的 Click 事件代码
D )不会有反应