📄 dt_tddj.frm
字号:
Left = 5130
MaxLength = 10
TabIndex = 59
Text = "Text1"
Top = 930
Width = 1215
End
Begin VB.TextBox m_qp_flj
Height = 300
Index = 1
Left = 1680
MaxLength = 10
TabIndex = 56
Text = "Text1"
Top = 450
Width = 1215
End
Begin VB.Label Label44
AutoSize = -1 'True
Caption = "单人房价"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 720
TabIndex = 163
Top = 480
Width = 840
End
Begin VB.Label Label43
AutoSize = -1 'True
Caption = "双人房价"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 3960
TabIndex = 162
Top = 480
Width = 840
End
Begin VB.Label Label42
AutoSize = -1 'True
Caption = "套间房价"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 720
TabIndex = 161
Top = 960
Width = 840
End
Begin VB.Label Label41
AutoSize = -1 'True
Caption = "豪华套间价"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 3960
TabIndex = 160
Top = 960
Width = 1050
End
End
Begin VB.Frame fm_fj_1
Caption = "客人"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1575
Left = 690
TabIndex = 154
Top = 300
Width = 7455
Begin VB.TextBox m_kr_flj
Height = 300
Index = 3
Left = 1710
MaxLength = 10
TabIndex = 54
Text = "Text1"
Top = 930
Width = 1215
End
Begin VB.TextBox m_kr_flj
Height = 300
Index = 2
Left = 5160
MaxLength = 10
TabIndex = 53
Text = "Text1"
Top = 450
Width = 1215
End
Begin VB.TextBox m_kr_flj
Height = 300
Index = 4
Left = 5160
MaxLength = 10
TabIndex = 55
Text = "Text1"
Top = 930
Width = 1215
End
Begin VB.TextBox m_kr_flj
Height = 300
Index = 1
Left = 1710
MaxLength = 10
TabIndex = 52
Text = "Text1"
Top = 450
Width = 1215
End
Begin VB.Label Label40
AutoSize = -1 'True
Caption = "豪华套间价"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 3960
TabIndex = 158
Top = 960
Width = 1050
End
Begin VB.Label Label39
AutoSize = -1 'True
Caption = "套间房价"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 720
TabIndex = 157
Top = 960
Width = 840
End
Begin VB.Label Label38
AutoSize = -1 'True
Caption = "双人房价"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 3960
TabIndex = 156
Top = 480
Width = 840
End
Begin VB.Label Label37
AutoSize = -1 'True
Caption = "单人房价"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 720
TabIndex = 155
Top = 480
Width = 840
End
End
End
Begin VB.CommandButton Cmd_fj
Caption = "返 回"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 555
Index = 1
Left = -67050
TabIndex = 65
Top = 6330
Width = 1575
End
Begin VB.CommandButton Cmd_fj
Caption = "确 认"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 555
Index = 0
Left = -68850
TabIndex = 64
Top = 6330
Width = 1575
End
Begin VB.CommandButton cmd_jc
BackColor = &H00E0DDC0&
Caption = "刷新(F9)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 4
Left = -74880
Style = 1 'Graphical
TabIndex = 80
Top = 960
Width = 6675
End
Begin VB.CommandButton cmd_jc
Caption = "增加(F2)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 555
Index = 0
Left = -74040
TabIndex = 76
Top = 6240
Width = 1575
End
Begin VB.CommandButton cmd_jc
Caption = "修改(F3)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 555
Index = 1
Left = -72000
TabIndex = 77
Top = 6240
Width = 1575
End
Begin VB.CommandButton cmd_jc
Caption = "解除(F4)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 555
Index = 2
Left = -69960
TabIndex = 78
Top = 6240
Width = 1575
End
Begin VB.CommandButton cmd_jc
Caption = "打印(F5)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 555
Index = 3
Left = -67920
TabIndex = 79
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -