GetPt.DLL　鉄筋コンクリート構造の鉄筋比計算ActiveX

ＲＣ断面の必要鉄筋比計算機能をカプセル化したActiveXコンポーネントで、VBおよびVBAから呼び出して利用する。

使用の手続き

1) レジストリへの登録

Windowsに標準でインストールされているregsvr32を使って登録情報をシステムレジストリに書き込む。

regsvr32 GetPt.dll

削除する場合は、"/u" オプションを伴なって実行する。

regsvr32 /u GetPt.dll

2) VB、VBAでの参照宣言

参照設定で、GetPt.DLLにチェックを入れる。

使用するプロシジャや関数内、あるいはグロ－バルにはモジュールレベルで変数を宣言する。

（例） Dim rc As New clsRCpt

解説

プロパティ属性型説明

forceN 設定・取得 Double 設計断面力 = 軸力

forceM 設定・取得 Double 設計断面力 = 曲げモーメント

cmB 設定・取得 Double 断面形状 = 幅

cmD 設定・取得 Double 断面形状 = 高さ(せい)

cmDc 設定・取得 Double 鉄筋位置（縁あき）

ratioE 設定・取得 Integer ヤング係数比（無次元）

fConc 設定・取得 Double コンクリート許容応力度

fRebar 設定・取得 Double 鉄筋許容応力度

BarSize 設定・取得 String D13, D16など鉄筋径指定文字列

RequiredPt 取得 Double 鉄筋比　( = At / cmB / cmD )

RequiredBar 取得 String 所要鉄筋本数と断面積

stressC 取得 Double コンクリートの応力余裕度

stressS 取得 Double 鉄筋の応力余裕度

xn1 取得 Double 中立軸比

鉄筋は引張・圧縮側に等量（対称）配置とする。

単位系は長さには[cm]、力には[kg]、[kN]など統一が取れていれば任意。(ex1. cm, kgf, kgf*cm, kg/cm2)　(ex2. cm, N, N*cm. N/cm2)など。

BarSizeにはD10からD51までの間で指定する。系列外指定の場合(例えば"D17"など）は、デフォルトサイズ（=D22）が採用される。

ヤング係数比のデフォルトは15.

コンクリート、鉄筋のいずれが決定要因になっているのか知るには応力余裕度をチェックする。

応力余裕度は、（発生応力度/許容応力度）で、断面クリチカルの場合には鉄筋あるいはコンクリートのどちらかがほぼ１となる。（計算ステップの関係で、表示は0.98から1.00程度となる。）

中立軸比は、xn/(D-Dt) の無次元化した値で、0から１の間の値が出ている時以外は無効。

使用例

鉄筋量計算のプログラム例です。ここではVisual Basicのサンプルプログラムを添付していますが、エクセルのVBAなどでも同様です。

    Dim rc As New clsRCpt

    rc.cmD = Val(txtD.Text)             'B        [cm]
    rc.cmB = Val(txtB.Text)             'D        [cm]
    rc.cmDc = Val(txtD.Text) * 0.1      'dc,dt    [cm]

    rc.forceN = Val(txtN.Text) * 1000   'N        [kF]
    rc.forceM = Val(txtM.Text) * 1000   'M      [kFcm]
    
    rc.ratioE = 15                      'n=Es/Ec    []  
    rc.fConc = Val(txtFc.Text)          'fc()  [F/cm2]
    rc.fRebar = Val(txtFt.Text)         'ft()  [F/cm2]

    'ここまでが計算条件の設定

    '鉄筋比を実数で取得するには
    pt = rc.RequiredPt
    Label1.Caption = pt * rc.cmD * rc.cmB

    '指定サイズの必要鉄筋本数を文字列で取得するには
    rc.BarSize = Combo1.Text
    Label2.Caption = rc.RequiredBar

仕様

名称ＲＣ断面の必要鉄筋算定ActiveX GetPt.DLL

動作条件　　 Windows95/98/2000
Microsoft Visual Basic Ver.6.0ランタイムライブラリSP5要

著作権者 <Yoshiki SAKAI> フリーソフトウェア

ダウンロード GetPt.DLL, サンプルプログラム

プロパティ	属性	型	説明
forceN	設定・取得	Double	設計断面力 = 軸力
forceM	設定・取得	Double	設計断面力 = 曲げモーメント
cmB	設定・取得	Double	断面形状 = 幅
cmD	設定・取得	Double	断面形状 = 高さ(せい)
cmDc	設定・取得	Double	鉄筋位置（縁あき）
ratioE	設定・取得	Integer	ヤング係数比（無次元）
fConc	設定・取得	Double	コンクリート許容応力度
fRebar	設定・取得	Double	鉄筋許容応力度
BarSize	設定・取得	String	D13, D16など鉄筋径指定文字列
RequiredPt	取得	Double	鉄筋比　( = At / cmB / cmD )
RequiredBar	取得	String	所要鉄筋本数と断面積
stressC	取得	Double	コンクリートの応力余裕度
stressS	取得	Double	鉄筋の応力余裕度
xn1	取得	Double	中立軸比

名称	ＲＣ断面の必要鉄筋算定ActiveX GetPt.DLL
動作条件	Windows95/98/2000 Microsoft Visual Basic Ver.6.0ランタイムライブラリSP5要
著作権者	<Yoshiki SAKAI> フリーソフトウェア
ダウンロード	GetPt.DLL, サンプルプログラム