重型病毒性肝炎出血的最主要原因是A.血小板减少B.毛细血管脆性增加C.凝血因子

A、A、<标签名 属性1="属性值1" 属性2="属性值2" …> 内容 </标签名>

B、B、<title>属性</title>

C、C、<meta http-equiv="Content-Type" content="text/html; charset=gbk" />

D、D、<meta name="author" content="属性" />

在窗体上利用菜单编辑器设计一个主菜单项“菜单控制”(Name属性值为mnuMenu),然后为其设计一个子菜单项“增加菜单”(Name 属性值为mnuAdD)另外设置一个标题为空的菜单项(控件数组)，其Name属性值为mnuDyn,Index值为0，Visible属性值为False；然后编写以下程序来实现增加菜单项的功能。

Dim IndexId As Integer

Private Sub mnuAdd_Click()

Dim mnuCaption As String

mnuCaption = InputBox("请输入菜单项的标题")

IndexId =【 】

【 】mnuDyn(IndexID) mnuDyn(IndexID). Caption = mnucaption

mnuDyn(IndexID). 【 】= True

End Sub

A．具备name属性的所有div元素

B．具备name属性的单个元素

C．name属性为age的单个或多个div元素

D．name属性为age的单个div元素

A．value

B．selected

C．name

D．multiple

在窗体上利用菜单编辑器设计一个主菜单项“菜单控制”(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．Text

B．Font

C．Caption

D．Name