大家好,第一次在这里发帖,请大家多多关照。我是从事建筑结构设计,编程是我的业余爱好,由于身边没有高手指点,所以写个东西可以说是举步维艰啊,呵呵,所以非常希望在这里能得到大家的指点,谢了先。最近谢了一批小东西,对你们来说应该是很简单的啦,就是几个控件输入几个控件输出的那种。对于我们做工程的一般都需要提供详尽的计算书,虽然找了很长时间了,还是没有解决。我以前是直接用print一句一句的打印出来的,但是这样有几个问题:1、公式没办法输出;2、计算书给人感觉太丑了,就算能布的整整齐齐。也想过用word做成一个个模板,在每次计算后调用形成副本,然后替换模板副本中的输入变量和输出变量,这样副本就形成计算书了,但是也有问题:1、计算过程中经常会根据不同的情况选择分叉,所以模板也应该能够适应选择的不同而不同,所以要是这样的话,有多少个选择可能就应有几个模板,不合理,呵呵。下面帖的这个计算书是我们这个行业用的比较多的一个工具的计算书,感觉蛮好,一直不知道怎么做的,还请大家指点一二啊。顺祝大家新年快乐! 1.1  基本资料 
 1.1.1  工程名称: 工程一 
 1.1.2  边界条件(左端/下端/右端/上端): 固端 / 固端 / 固端 / 固端 
 1.1.3  荷载标准值 
 1.1.3.1  永久荷载标准值 
    均布荷载: gk1 = 3.1kN/m 
 1.1.3.2  可变荷载标准值 
    均布荷载: qk1 = 2kN/m,γQ = 1.4,ψc = 0.7,ψq = 0.4 
 1.1.4  荷载的基本组合值 
 1.1.4.1  板面 Q = Max{Q(L), Q(D)} = Max{6.52, 6.14} = 6.52kN/m 
 1.1.5  计算跨度 Lx = 3000mm,计算跨度 Ly = 3300mm,板的厚度 h = 80mm (h = Lx / 38) 
 1.1.6  混凝土强度等级为 C20, fc = 9.554N/mm, ft = 1.101N/mm, ftk = 1.542N/mm 
 1.1.7  钢筋抗拉强度设计值 fy = 210N/mm, Es = 210000N/mm; 
    当纵筋直径不小于 12mm 时,取 fy = 300N/mm、Es = 200000N/mm 
 1.1.8  纵筋的混凝土保护层厚度: 板底 c = 20mm、板面 c' = 20mm 
 
 1.2  配筋计算 
 1.2.1  平行于 Lx 方向的跨中弯矩 Mx 
    Mxk = 1.15kN·m,Mxq = 0.88kN·m; 
    Mx = Max{Mx(L), Mx(D)} = Max{1.47, 1.38} = 1.47kN·m 
    Asx = 128mm,as = 24mm,ξ = 0.050,ρ = 0.23%; ρmin = 0.24%, 
    As,min = 189mm; 实配纵筋: φ8@200 (As = 251) 
 1.2.2  平行于 Ly 方向的跨中弯矩 My 
    Myk = 0.96kN·m,Myq = 0.74kN·m; 
    My = Max{My(L), My(D)} = Max{1.23, 1.16} = 1.23kN·m 
    Asy = 131mm,as = 34mm,ξ = 0.063,ρ = 0.29%; ρmin = 0.24%, 
    As,min = 189mm; 实配纵筋: φ8@200 (As = 251) 
 1.2.3  沿 Lx 方向的支座弯矩 Mx' 
    Mx'k = -2.67kN·m,Mx'q = -2.04kN·m; 
    Mx' = Max{Mx'(L), Mx'(D)} = Max{-3.41, -3.21} = -3.41kN·m 
    Asx' = 309mm,as' = 24mm,ξ = 0.121,ρ = 0.55%; 
    实配纵筋: φ8@150 (As = 335) 
 1.2.4  沿 Ly 方向的支座弯矩 My' 
    My'k = -2.47kN·m,My'q = -1.89kN·m; 
    My' = Max{My'(L), My'(D)} = Max{-3.16, -2.98} = -3.16kN·m 
    Asy' = 285mm,as' = 24mm,ξ = 0.112,ρ = 0.51%; 
    实配纵筋: φ8@150 (As = 335) 
 
 1.3  跨中挠度验算: 挠度 f = 4.3mm,f / Lx = 1/693 

解决方案 »

  1.   

    上面帖子后面的计算书,可能因为拷贝的原因,计算书好像有点乱了,重新粘一个。
     1.1  基本资料 
     1.1.1  工程名称: 工程一 
     1.1.2  集中反力作用下不配置箍筋或弯起钢筋的板 
     1.1.3  板的厚度 h = 150mm,截面有效高度 ho = h - as = 150-29 = 121mm 
     1.1.4  作用面的形状为矩形,作用面的高度 hc = 500mm,作用面的宽度 bc = 400mm; 
        对中柱,柱类型的影响系数 αs = 40 
     1.1.5  轴向压力设计值 N = 100kN,板上荷载设计值 q = 5kN/m 
     1.1.6  混凝土强度等级为 C25, ft = 1.271N/mm 
     
     1.2  计算结果 
     1.2.1  冲切破坏锥体的底面面积 A = (hc + 2ho) * (bc + 2ho) = (0.5+2*0.121)*(0.4+2*0.121) 
                                     = 0.476m 
     1.2.2  局部荷载设计值 Fl = N - q * A = 100-5*0.476 = 97.6kN 
     1.2.3  临界截面的周长 um = 2 * (hc + bc + 2ho) = 2*(500+400+2*121) = 2284mm 
     1.2.4  影响系数 η 
     1.2.4.1  作用面积形状的影响系数 η1 
        βs = hc / bc = 500/400 = 1.25 < 2,取 βs = 2 
        η1 = 0.4 + 1.2 / βs = 0.4+1.2/2 = 1 
     1.2.4.2  临界截面周长与板截面有效高度之比的影响系数 η2 
        η2 = 0.5 + αs * ho / 4um = 0.5+40*121/(4*2284) = 1.03 
     1.2.4.3  影响系数 η = Min{η1, η2} = Min{1, 1.03} = 1 
     1.2.5  不配置箍筋或弯起钢筋的板,其受冲切承载力应符合下列规定: 
        Fl ≤ 0.7 * βh * ft * η * um * ho 
        R = 0.7 * βh * ft * η * um * ho = 0.7*1*1271*1*2.284*0.121 
          = 245.9kN ≥ Fl = 97.6kN,满足要求。 
      

  2.   

    据我的知,很多工程公司的计算书是用Excel做的。如果不考虑算法的保护,Excel很容易实现数据的输入输出,而且非常灵活。如果在设计时模块化,抽象化,在VB中的程序可以直接移植到Excel中。