vbgxb1.bas

大学生生活普查程序,用vb开发的,调查大学生生活情况,并做出评价,给出建议,做出统计

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  '定义通用数据库路径