未知题型 在窗体上画一个名称为command1的命令按钮，然后编写如下程序； Option Base 1 Private Sub Command1_Click() Dim arr(4)As String For i=1 To 4 arr(i) = Chr(Asc('A')+(i-1)) Next i For Each b1 In arr Print b1； Next End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为 ______。2 3 4

单项选择题 正时传动带的作用就是当发动机运转时，活塞的行程（上下的运动）、气门的开启与关闭（时间）、点火的顺序（时刻）在正时传动带的作用下，时刻保持“（      ）”运转。 A、相差360度 B、同步 C、相差180度 D、异步

未知题型 假定有如下的Sub过程： Sub Func(x As Single， y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=6 b=5 Func(a, B) Print a, b End Sub 程序运行后，单击命令按钮，输出结果为 ______。A.6 5B.1 1C.1.2 5D.1.2 1

未知题型 在窗体上画一个文本框，然后编写如下事件过程。当该程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress＜KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) Text1.Text=String(5，KeyAscii) End SubA.aaaaaB.AAAAAC.aaaaaaD.AAAAAA

未知题型 在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() CommonDialogl.Flags=cdlOFNHideReadOnly commonDialogl.Filter='All Files(*.*)|*.*| Text Files'&_ '(*.txt)|*.txt|Batch Files(*.bat)|*.bat' CommonDialogl.Filterlndex=1 CommonDialogl.ShowOpen MsgBox CommonDialogl.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是 ______。A.AllFiles(*.*)B.TextFiles(*.txt)C.BatchFiles(*.bat)D.不确定

单项选择题 设A(0,1,0), B(1,0,1),C(1,2,1),D(1,2,2),则过直线AB且将四面体ABCD分成两个等积部分的平面方程为( ).

未知题型 编写如下事件过程： Private Sub Form. KeyDown(KeyCode As Integer，Shift As Integer) If(Button And 3)=3 Then Print 'AAAA' End If End Sub 程序运行后，为了在窗体上输出'AAAA'，应按下的鼠标键为 ______。D.按什么键都不显示

未知题型 在下列各句横线处，依次填入最恰当的词语。①我们见到的农村妇女主任，就是电影中女主角的______。②据报道，电子邮件已跃升为计算机病毒最主要的传播______。③由于环境污染，著名的阿尔卑斯山羊绒的品质正在______。A.原形 媒介 蜕化B.原形 媒体 退化C.原型 媒介 退化D.原型 媒体 蜕化

单项选择题 如果对一个建设工程的项目管理进行诊断,首先应分析其( )方面存在的问题。 A. 技术 B. 合同 C. 经济 D. 组织

未知题型 控制包括的基本步骤有E.反馈控制结果