📄 框架数据梁柱.frm
字号:
VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Begin VB.Form Form5
BorderStyle = 1 'Fixed Single
Caption = "梁柱截面尺寸及混凝土强度等级"
ClientHeight = 5625
ClientLeft = 3780
ClientTop = 2955
ClientWidth = 3810
LinkTopic = "kuangjia1"
MaxButton = 0 'False
MDIChild = -1 'True
MinButton = 0 'False
ScaleHeight = 5625
ScaleWidth = 3810
Begin VB.CommandButton Comd3
Caption = "刷新"
Height = 375
Index = 0
Left = 2880
Style = 1 'Graphical
TabIndex = 13
Top = 5160
Width = 855
End
Begin VB.CommandButton Comd2
Caption = "重写"
Height = 375
Index = 0
Left = 1800
Style = 1 'Graphical
TabIndex = 7
Top = 5160
Width = 855
End
Begin VB.CommandButton Comd1
Caption = "确定"
Height = 375
Index = 0
Left = 720
MaskColor = &H8000000F&
Style = 1 'Graphical
TabIndex = 6
Top = 5160
Width = 855
End
Begin TabDlg.SSTab SSTab1
Height = 4900
Left = 120
TabIndex = 0
Top = 120
Width = 3600
_ExtentX = 6350
_ExtentY = 8652
_Version = 393216
Tabs = 4
TabsPerRow = 2
TabHeight = 520
TabCaption(0) = "梁截面数据"
TabPicture(0) = "框架数据梁柱.frx":0000
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "Label2"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "Label5"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "Grid1(0)"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "Text1(0)"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).ControlCount= 4
TabCaption(1) = "柱截面数据"
TabPicture(1) = "框架数据梁柱.frx":001C
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Label1"
Tab(1).Control(1)= "Label4"
Tab(1).Control(2)= "Grid1(1)"
Tab(1).Control(3)= "Text1(1)"
Tab(1).ControlCount= 4
TabCaption(2) = "柱附加重量"
TabPicture(2) = "框架数据梁柱.frx":0038
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "Label3"
Tab(2).Control(1)= "Grid1(2)"
Tab(2).Control(2)= "Text1(2)"
Tab(2).ControlCount= 3
TabCaption(3) = "梁上砌体重量"
TabPicture(3) = "框架数据梁柱.frx":0054
Tab(3).ControlEnabled= 0 'False
Tab(3).Control(0)= "Label6"
Tab(3).Control(1)= "Grid1(3)"
Tab(3).Control(2)= "Text1(3)"
Tab(3).ControlCount= 3
Begin VB.TextBox Text1
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H00FFFFFF&
BorderStyle = 0 'None
ForeColor = &H00000000&
Height = 255
Index = 3
Left = -70920
TabIndex = 15
Top = 2760
Width = 855
End
Begin VB.TextBox Text1
Alignment = 2 'Center
Appearance = 0 'Flat
BorderStyle = 0 'None
ForeColor = &H00000000&
Height = 255
Index = 2
Left = -71160
TabIndex = 12
Top = 2760
Width = 855
End
Begin VB.TextBox Text1
Height = 270
Index = 1
Left = -72840
TabIndex = 11
Text = "300*450C30"
Top = 4470
Width = 1095
End
Begin VB.TextBox Text1
Height = 270
Index = 0
Left = 2160
TabIndex = 9
Text = "250*500C30"
Top = 4395
Width = 1095
End
Begin MSFlexGridLib.MSFlexGrid Grid1
Height = 3500
Index = 0
Left = 120
TabIndex = 1
Top = 700
Width = 3200
_ExtentX = 5636
_ExtentY = 6165
_Version = 393216
Rows = 10
Cols = 5
ForeColorSel = 16744576
GridColor = 16761024
GridColorFixed = 16761024
FillStyle = 1
End
Begin MSFlexGridLib.MSFlexGrid Grid1
Height = 3500
Index = 1
Left = -74880
TabIndex = 2
Top = 700
Width = 3200
_ExtentX = 5636
_ExtentY = 6165
_Version = 393216
Rows = 10
Cols = 5
ForeColorSel = 16744576
GridColor = 16761024
GridColorFixed = 16761024
FillStyle = 1
End
Begin MSFlexGridLib.MSFlexGrid Grid1
Height = 3500
Index = 2
Left = -74880
TabIndex = 3
Top = 700
Width = 3200
_ExtentX = 5636
_ExtentY = 6165
_Version = 393216
Rows = 10
Cols = 5
ForeColorSel = 16744576
GridColor = 16761024
GridColorFixed = 16761024
FillStyle = 1
End
Begin MSFlexGridLib.MSFlexGrid Grid1
Height = 3500
Index = 3
Left = -74880
TabIndex = 14
Top = 700
Width = 3200
_ExtentX = 5636
_ExtentY = 6165
_Version = 393216
Rows = 10
Cols = 5
ForeColorSel = 16744576
GridColor = 16761024
GridColorFixed = 16761024
FillStyle = 1
End
Begin VB.Label Label4
Caption = "输入："
Height = 195
Left = -73320
TabIndex = 17
Top = 4515
Width = 615
End
Begin VB.Label Label6
Appearance = 0 'Flat
BackColor = &H8000000B&
BackStyle = 0 'Transparent
Caption = "砌体作用在梁上的附加重量形成的均布荷载 单位(KN/m)"
ForeColor = &H80000008&
Height = 435
Left = -74640
TabIndex = 16
Top = 4350
Width = 2775
End
Begin VB.Label Label5
Caption = "输入："
Height = 195
Left = 1680
TabIndex = 10
Top = 4440
Width = 615
End
Begin VB.Label Label3
Appearance = 0 'Flat
BackColor = &H8000000B&
BackStyle = 0 'Transparent
Caption = "柱的附加重量+联系梁传至结点的竖向集中荷载 单位(KN)"
ForeColor = &H80000008&
Height = 405
Left = -74640
TabIndex = 8
Top = 4350
Width = 2895
End
Begin VB.Label Label2
Appearance = 0 'Flat
BackColor = &H8000000B&
BackStyle = 0 'Transparent
Caption = "b(mm)*h(mm)C 例如250*400C20"
ForeColor = &H80000008&
Height = 435
Left = 240
TabIndex = 5
Top = 4350
Width = 1335
End
Begin VB.Label Label1
Appearance = 0 'Flat
BackColor = &H8000000B&
BackStyle = 0 'Transparent
Caption = "h(mm)*b(mm)C 例如250*400C20"
ForeColor = &H80000008&
Height = 435
Left = -74760
TabIndex = 4
Top = 4350
Width = 1335
End
End
End
Attribute VB_Name = "Form5"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -