Function zhekou(zhanyoulv As Double, t As Integer)If zhanyoulv < 0.035 ThenIf t <= 15 Thenzhekou = 0ElseIf t <= 30 And t > 15 Thenzhekou = 0ElseIf t > 30 Thenzhekou = 0End IfEnd IfEnd IfElseIf zhanyoulv >= 0.035 And zhanyoulv <= 0.04 ThenIf t <= 15 Thenzhekou = 0.8ElseIf t <= 30 And t > 15 Thenzhekou = 1.2ElseIf t > 30 Thenzhekou = 1.5End IfEnd IfEnd IfElseIf zhanyoulv > 0.04 And zhanyoulv <= 0.045 ThenIf t <= 15 Thenzhekou = 1ElseIf t <= 30 And t > 15 Thenzhekou = 1.5ElseIf t > 30 Thenzhekou = 2End IfEnd IfEnd IfEnd IfEnd IfEnd IfEnd Function