问题 单项选择题

以下用户自定义函数
Function Func(a As Integer, b As Integer) As Integer
Static m As Integer, i As Integer
m=0:i=2
i=i+m+i
m=i+a+b
Func=m
End Function
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim k As Integer,m As Integer,p As Integer
k=4:m=1
P=Func(k,m)
Print p
End Sub
程序运行后,单击命令按钮,输出结果为

A.8

B.9

C.10

D.11

答案

参考答案:A

解析: 变量i的计算过程为i=2+0+1 =3,变量m的计算过程为m=3+4+1=8,m的值通过于函数名Fune返回。

填空题
问答题

某服务用房工程概况及设计说明、部分施工图如下: 一、工程概况及设计说明: 1、本工程为市区一般民用三类建筑工程。 2、除地面垫层采用现拌混凝土外,其他构件均采用C20商品混凝土;模板采用符合木模。 3、施工图中未注明的墙均为240厚多孔砖墙。 4、门窗位置:门框均与开启方向墙面齐平,窗框居墙中布置,窗台高均为900mm,门窗框断面尺寸均为60X100mm。 5、部分建筑装修做法如下: (1)办事大厅底面:素土夯实,100厚碎石垫层,80厚C15混凝土垫层,15厚1:3水泥砂浆找平层,1:3水泥砂浆(厚度同03定额取定)密缝铺贴600X600地砖。 (2)卫生间底面:素土夯实,100厚碎石垫层,80厚C15混凝土垫层,1:3水泥砂浆找坡(平均厚度25mm);水泥砂浆(配合比、厚度同03定额)密缝铺贴300X300地砖。 (3)办公室墙面:1:1:6混合砂浆底、纸筋灰面抹灰(厚度均同03定额取定);满批二遍、复补一遍普通腻子,乳胶漆三遍饰面。 (4)卫生间墙面:15厚1:3水泥砂浆基层抹灰,1:2水泥砂浆(厚度同03定额取定)粘贴150X220瓷砖面层。(基层抹灰不抹到顶,瓷砖面层贴至吊顶底面,吊顶底面高度3.2m) (5)办事大厅天棚:水泥石灰纸筋砂浆底、纸筋灰面抹灰(厚度均同03定额取定)。 2、部分施工图(如图)

要求:

要求:

(二)按《建设工程工程量清单计价规范》(GB50500-2008)及本省有关修订补充规则、2003版本省建筑工程计价依据,完成以下内容。(20分)1、在表2-1中计算外挑雨棚浇捣的清单工程量(计价单位见2-2),计算出清单计价需要的有关工程量,编制工程量清单(列入表2-2)。2、根据工程量清单,按本省03建筑工程计价定额在表2-3中列出该雨篷混凝土浇捣项目的综合单价租价内容及其单位工程量工料机费用(企业管理费和利润费率合计为20%)。3、在表2-4中按综合单价法计费程序计算该工程造价。(弹性费率取中值)【已知:该工程分部分项工程量请打项目费为150万元,其中:人工费(不含机上人工)30万元,机械费8万元;技术措施费项目清单费30万元,其中:人工费8万元(不含机上人工)、机械费12万元(不含大型机械单独计算费用);其他项目清单费5万元;合同要求工期比国家定额工期缩短8%;提示:建筑工程安全防护、文明施工费是由《浙江省建设工程施工取费定额》(2003版)中的文明施工、环境保护费、安全施工费和临时设施费组成。人工单价已按建建法[2009]135号文规定的单价调整。人工调整后,按03版费率调整通知:施工组织措施费、综合费用费率调整系数为0.83;检验试验费、规费调整后费率分别为1.16%、4.14%。】