如果要在窗体上设计一个主菜单，首先要建立MainMenu对象。（)

在窗体上利用菜单编辑器设计一个主菜单项“菜单控制”(Name属性值为mnuMenu)，然后为其设计两个子菜单项“增加菜单”(Name属性值为mnuAdD)和“减少菜单”(Name属性值为mnuDel)，另外设置一个标题为空的菜单项＜控件数组)，其Name属性值为mnuDyn，Index值为0，Visible属性值为False；然后编写以下程序来实现增加和减少菜单项的功能，完成程序。 Dim Inxld As Integer Private Sub mnuAdd_Click() Dim mnuc As String mnuc=InputBox("input caption") InxId；InxId+1 【 】mnuDyn(InxID) mnuDyn(InxlD)，Calption=mnuc mauDyn(InxID).Visible=True End Sub Private SubmnuDel_Click() Dim i As Integer If【 】Then MsgBox "菜单项已全部被删除" Else Unload mnuDyn(InxID) InxId=InxId-1 End If End Sub

A.溜放1

B.溜放2

C.调车单

D.图形2

示输入整数的各位数字和。 Private Function fun(m As Integer) As Integer Dim k As Integer, n As Integer do n =【 】 k=k+ n m= m\10 Loop until m = 0 fun = k End Function Private Sub form_ Click() Dim n As Integer n = Val(Text1. Text) Print【 】 End Sub

A.“左箭头”

B.“右箭头”

C.“上箭头”

D.“下箭头”

A.在设计视图中建立新查询,在“字段”中以写公式的方法建立

B.在设计视图中建立新查询,在“准则”中以写公式的方法建立

C.用建立表对象中的设计视图,以增添新字段的方法建立

D.在设计视图中,用SQL建立新查询,以写SQL语句的方法建立

A、“左箭头”

B、“右箭头”

C、“上箭头”

D、“下箭头”

A.教学活动主要在课堂上进行

B.以教师为中心

C.以建构主义为理论基础

D.学习内容主要是书本教材

Text1，将其MultiLine属性设置为True，ScrollBars属性设置为3-Both。给定的程序不完整，请将程序补充完整。 Option Explicit Private Sub Form. _Click() Dim ch1 As String，fn As Integer Dim Str As String fn=【 】 Open "C:\Config.sys" For Input As fn Do While Not EOF(【 】) Line Input fn, ch1 Str = Str + chl+ vbCrLf Loop Text1.Text =【 】 End Sub

A.设计视图

B.窗体视图

C.数据表视图

D.数据图视图

请填空完成程序。在窗体上建立一个文本框，在属性窗口中把该文本框的Muhiline属性设置为True，然后编写如下的事件过程： Private Sub Form_Click() Open"d：\test\smtext1．txt"For lnput As1 Text1.Fontsize=14 Text1.FontName=“幼圆” Do While Not EOF(1) 【 】 whole＄=whole $ aspect $+Chr$(13)+Chr $(10) Loop Text1.Text=【 】。 Close Open"d：\test\smtexttxt"For Output As1 Print 1【 】 Close End Sub