'从PKPM钢筋标注比如：
'   2%%13112
'   2%%13112+3%%13120
'   N2%%13112
'   G2%%13112
'中分析出钢筋面积和钢筋根数
'   S 钢筋字符串
'   N 可选参数，按址传递，返回钢筋根数
'   GetSteels1 返回钢筋面积(Long)
Private Declare Function GetSteels1 Lib "TiancaoJG.DLL" (ByVal S As String, Optional N As Integer) As Long
'从比如:
'   8@200
'   8@200(2)
'   8@100/200
'   8@100/200(2)
'中分析出1000宽钢筋面积
'   S 钢筋字符串
'   GetSteels2 返回钢筋面积(字符串)
Private Declare Function GetSteels2 Lib "TiancaoJG.DLL" (ByVal S As String) As String