Public Sub GetResFile(ByVal ResID As Long, ByVal FileName As String)
    Dim bFile() As Byte
    bFile = LoadResData(ResID, "CUSTOM") '将自定义资源中资源读入数组
    If Dir(FileName) = "" Then '只有文件不存在时,才释放 阅读全文……

钢筋表

[size=3]程序需要microsoft framework 2.0 的支持







阅读全文……

        初选截面的时候，可根据柱支承的楼层面积计算由竖向荷载产生的轴力标准值Nk按照下列公式估算柱的截面积Ac，[size=3]然后确定柱的截面边长。
 
一、无地震组合： 阅读全文……

怎不因碌碌无为而羞耻

看了下面这张图，实在是感到羞愧，对不起TLF啊，

阅读全文……

将自定义资源中的文件释放出来
[quote]'*************************************************************************
'**模块名：GetResFile
'**说明：将自定义资源中的文件释放出来 阅读全文……

建筑抗震设计规范  GB 50011-2001

[quote]　13.3.3 砌体墙应采取措施减少对主体结构的不利影响，并应设置拉结筋、水平系梁、圈梁、构造柱等与主体结构可靠拉结：　
阅读全文……

眼泪是爱情的所得税

阅读全文……

[quote]<script language="javascript" type="text/javascript">
function setPng(img, w, h) {
    ua = window.navigator.userAgent.toLowerCase();
    if(!/msie/.test(ua))
        return; 阅读全文……

67页
b.填充墙与框架柱和梁的连接除应满足有关规范的要求外，不论采用哪种砌体材料，框架柱，梁与墙间的缝隙应用钢丝网抹灰或耐碱玻璃网布聚合物砂浆加强带进行处理。加强带的宽度不宜小于300mm。 

7.1.2
注：1 房屋的总高度指室外地面到主要屋面板板顶或檐口的高度，半地下室从地下室室内地面算起，全地下室和嵌固条件好的半地下室应允许从室外地面算起；对带阁楼的坡屋面应算到山尖墙的1/2高度处；  阅读全文……

< 阅读全文……

晕 ，你这广告够全的哇，内衣也有，提成几何?我也来分杯羹。
    昨天晚上看了《想飞的钢琴少年》，有没看过？挺不错的，扮演6岁时候的那个演员煞是可爱，长大后的那个琴艺了得。
    我原来是计划每天一部电影的，现在竟然要三天才看完一部，喜的是失眠可以借此解决，悲的是那么可爱的电影我都能半路倒下睡着，看来对艺术不够虔诚！鄙视自己下！
    什么时候袋子里的米才能多起来，让我有资本在满足房租、伙食、换季衣物之后还有可以买话剧门票的份。
    努力攒钱给自己花！

6 场地划分为四类，建筑场地的类别应根据土层等效剪切波速和覆盖层厚度按《抗震规范》第4.1.6条确定。一般的地基处理和桩基均不能改变场地的类别。 阅读全文……

建筑地基基础设计规范 GB 50007-2002

[quote]  第8.2.1条   扩展基础系指柱下钢筋混凝土独立基础和墙下钢筋混凝土条形基础。  
  第8.2.2条   扩展基础的构造，应符合下列要求：
  1. 锥形基础的边缘高度，不宜小于200mm；阶梯形基础的每阶高度，宜为300-500mm； 阅读全文……