【单选题】在窗体上绘制一个名称为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...
【单选题】切换备用泵前,必须( ),直到管线内的空气排尽。
【单选题】在窗体(名称为Form1)上绘制一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是。
A.
Private Sub Tex1_Change() Command1.Caption='计算机等级考试' End Sub
B.
Private Sub Command1_Click() Caption='计算机等级考试'
C.
Private Sub Command1_Click() Text.Caption='计算机等级考试' End Sub
D.
Private Sub Command1_Click() Text1.Text='计算机等级考试' End Sub
【单选题】在窗体上绘制一个名称为Commandl的命令按钮,然后编写如下程序: 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) Fori=1 To 6 1fx(i)>c Then d=d+x(i) c=x(i) Else
【判断题】杂货班轮中的装货单( S/O )和收货单( M/R )的作用相同
【单选题】在窗体上绘制一个名称为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...