📄 vbgxb1.bas
字号:
Attribute VB_Name = "VBGXB"
Global datafilename As String
Global custername As String
Global result As String
Global t As Integer
Global sex As Integer
Global age As Integer
Global weight As Integer
Global bloodpressure As Integer
Global mentalcondition As Integer
Global heridity As Integer
Global smoking As Integer
Global foods As Integer
Global phsicalexercise As Integer
Global datapath As String '定义通用数据库路径
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -