程序运行后，若为“甲队”且成绩大于80分，则在窗体上显示“表现优良”，否则显示“表现普通”。
Private Sub Form_Activate()
Dim team1 As String
Dim fen As Integer
team 1="乙队"
fen=86
Print
Print"球队=；"team1
Print"成绩=；"fen
If team1="甲队"Then
If fen＞=80 Then
Print"表现优良!"
Else
______
End If
Else
Print"表现普通"!
End If
End Sub