Private Sub Form_Click() 窗体上单击后,显示结果为:a=85Select case aCase Is> =60 I=“及格”Case Is> =70 I=“中“Case Is> =80 I=“良”Case else I=“优”End SelectPrint IEnd Sub