📄 frmsick_tnb_yfdj.frm
字号:
End
Begin VB.CheckBox Chkniu_yang_ge
Caption = "扭秧歌"
Height = 255
Left = 3330
TabIndex = 72
Top = 3150
Width = 855
End
Begin VB.CheckBox ChktableTennis
Caption = "乒乓球"
Height = 255
Left = 3300
TabIndex = 71
Top = 2850
Width = 855
End
Begin VB.TextBox TxtotherWay
Height = 270
Left = 900
TabIndex = 70
Top = 3450
Width = 2775
End
Begin VB.TextBox TxtdinnerGreens
Height = 270
Left = 3120
TabIndex = 69
Top = 2280
Width = 375
End
Begin VB.TextBox TxtdinnerSecondary
Height = 270
Left = 3090
TabIndex = 68
Top = 1920
Width = 375
End
Begin VB.TextBox TxtLunchGreens
Height = 270
Left = 2010
TabIndex = 67
Top = 2295
Width = 375
End
Begin VB.TextBox TxtLunchSecondary
Height = 270
Left = 2010
TabIndex = 66
Top = 1920
Width = 375
End
Begin VB.TextBox TxtBreakfastGreens
Height = 270
Left = 930
TabIndex = 65
Top = 2295
Width = 375
End
Begin VB.TextBox TxtBreakfastSecondary
Height = 270
Left = 930
TabIndex = 64
Top = 1935
Width = 375
End
Begin VB.CheckBox Chkshadowboxing
Caption = "太极拳"
Height = 195
Left = 900
TabIndex = 63
Top = 2880
Width = 855
End
Begin VB.CheckBox Chkswimming
Caption = "游泳"
Height = 255
Left = 2580
TabIndex = 62
Top = 3120
Width = 675
End
Begin VB.TextBox TxtafterDinner
Height = 270
Left = 3690
TabIndex = 61
Top = 4080
Width = 375
End
Begin VB.TextBox TxtDinnerTime
Height = 270
Left = 3720
TabIndex = 60
Top = 4440
Width = 375
End
Begin VB.Label Label49
AutoSize = -1 'True
Caption = "医师："
Height = 180
Left = 600
TabIndex = 128
Top = 5325
Width = 540
End
Begin VB.Label Label48
Caption = "次（心率）"
Height = 255
Left = 3150
TabIndex = 127
Top = 4920
Width = 975
End
Begin VB.Label Label47
Caption = "运动强度"
Height = 255
Left = 240
TabIndex = 126
Top = 4950
Width = 765
End
Begin VB.Label Label46
Caption = "分钟"
Height = 255
Left = 1230
TabIndex = 125
Top = 4440
Width = 405
End
Begin VB.Label Label45
Caption = "分钟"
Height = 255
Left = 2670
TabIndex = 124
Top = 4440
Width = 405
End
Begin VB.Label Label44
Caption = "分钟"
Height = 255
Left = 2670
TabIndex = 123
Top = 4080
Width = 405
End
Begin VB.Label Label41
Caption = "分钟"
Height = 255
Left = 1230
TabIndex = 122
Top = 4080
Width = 405
End
Begin VB.Label Label40
Caption = "每次"
Height = 255
Left = 1860
TabIndex = 121
Top = 4440
Width = 495
End
Begin VB.Label Label39
Caption = "每次"
Height = 255
Left = 390
TabIndex = 120
Top = 4470
Width = 375
End
Begin VB.Label Label38
Caption = "午餐后"
Height = 255
Left = 1710
TabIndex = 119
Top = 4080
Width = 615
End
Begin VB.Label Label8
Caption = "（1）咨询方法"
Height = 255
Left = 150
TabIndex = 118
Top = 330
Width = 1215
End
Begin VB.Label Label9
Caption = "（2）饮食处方"
Height = 255
Left = 150
TabIndex = 117
Top = 1110
Width = 1335
End
Begin VB.Label Label10
Caption = "早餐"
Height = 255
Left = 810
TabIndex = 116
Top = 1350
Width = 495
End
Begin VB.Label Label11
Caption = "午餐"
Height = 255
Left = 1890
TabIndex = 115
Top = 1350
Width = 495
End
Begin VB.Label Label12
Caption = "晚餐"
Height = 255
Left = 3030
TabIndex = 114
Top = 1350
Width = 495
End
Begin VB.Label Label13
Caption = "主食"
Height = 255
Left = 570
TabIndex = 113
Top = 1590
Width = 375
End
Begin VB.Label Label16
Caption = "主食"
Height = 255
Left = 1650
TabIndex = 112
Top = 1590
Width = 375
End
Begin VB.Label Label19
Caption = "主食"
Height = 255
Left = 2730
TabIndex = 111
Top = 1590
Width = 375
End
Begin VB.Label Label22
Caption = " g"
Height = 255
Left = 1290
TabIndex = 110
Top = 1590
Width = 255
End
Begin VB.Label Label25
Caption = " g"
Height = 255
Left = 2370
TabIndex = 109
Top = 1590
Width = 255
End
Begin VB.Label Label28
Caption = " g"
Height = 255
Left = 3540
TabIndex = 108
Top = 1620
Width = 255
End
Begin VB.Label Label31
Caption = "（3）运动处方"
Height = 255
Left = 150
TabIndex = 107
Top = 2640
Width = 1215
End
Begin VB.Label Label32
Caption = "方式："
Height = 195
Left = 240
TabIndex = 106
Top = 2910
Width = 555
End
Begin VB.Label Label33
Caption = "其他："
Height = 255
Left = 240
TabIndex = 105
Top = 3420
Width = 615
End
Begin VB.Label Label34
Caption = "运动时间："
Height = 195
Left = 240
TabIndex = 104
Top = 3810
Width = 945
End
Begin VB.Label Label35
Caption = "早餐后"
Height = 255
Left = 270
TabIndex = 103
Top = 4080
Width = 615
End
Begin VB.Label Label30
Caption = " g"
Height = 255
Left = 3570
TabIndex = 102
Top = 2280
Width = 255
End
Begin VB.Label Label29
Caption = " g"
Height = 255
Left = 3570
TabIndex = 101
Top = 1980
Width = 255
End
Begin VB.Label Label27
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -