Case 15 '*营养与恢复数据库
If txtContent.Text = "" Then
mSsql = "SELECT InjurypabulumID, AthleteName AS 运动员姓名, TeamID AS 项目名称, startDate AS 使用开始时间, endDate AS 使用结束时间, PabulumName AS 营养品名称, PabulumUsemete AS 使用量,Units AS 度量单位, UseAim AS 使用目的,UseEffort AS 恢复效果 FROM Frminjurypabulum "
Else
Select Case mFiledIndex

Case 0
mSsql = "SELECT InjurypabulumID, Frminjurypabulum.AthleteName AS 运动员姓名, Frminjurypabulum.TeamID AS 项目名称, Frminjurypabulum.pabulumName AS 营养品名称, Frminjurypabulum.PabulumUsemete AS 使用量,Frminjurypabulum.Units AS 度量单位,Frminjurypabulum.StartDate AS 使用开始时间, Frminjurypabulum.EndDate AS 使用结束时间, Frminjurypabulum.UseAim AS 使用目的,Frminjurypabulum.UseEffect AS 恢复效果 FROM Frminjurypabulum INNER JOIN AthleteInfo ON Frminjurypabulum.AthleteID = AthleteInfo.AthleteID WHERE AthleteInfo.AthleteName='" & Me.txtContent.Text & "'"
Case 1
mSsql = "SELECT InjurypabulumID, Frminjurypabulum.AthleteName AS 运动员姓名, Frminjurypabulum.TeamID AS 项目名称, Frminjurypabulum.pabulumName AS 营养品名称, Frminjurypabulum.PabulumUsemete AS 使用量 Frminjurypabulum.Units AS 度量单位,Frminjurypabulum.StartDate AS 使用开始时间, Frminjurypabulum.EndDate AS 使用结束时间, Frminjurypabulum.UseAim AS 使用目的,Frminjurypabulum.UseEffect AS 恢复效果 FROM Frminjurypabulum INNER JOIN TeamCode ON Frminjurypabulum.TeamID = TeamCode.TeamID WHERE TeamCode.TeamName='" & Me.txtContent.Text & "'"

End Select
End If


求高手，急。