【单选题】在窗体上绘制一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Click() Dim i As Integer,s As Intege...
【单选题】在窗体上绘制一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() Dim c As Integer,d As Integer d=0 c=6 x=Array(2,4,6,8,10,12) For i=1 To 6 If x(i)>c Then d=d+x(i) c=x(i) Else d=d-c End If...
【单选题】在窗体上绘制一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()c='ABCD'For n=1 To 4 Print__Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容:DCDBCDABCD 则在横线处应填入的内容为
【单选题】在窗体上绘制一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Sub Command1_Click() Dim i As Integer, s As Integer s = 0 For i = 1 To 5 s = s + fun(i) Next Print s End Sub Private Function fun(ByVal m As Inte...