1. 有如下一个生活中常见的情况：

输入一个成绩，判断该成绩属于“优秀”、“良好”、“及格”还是“不及格”。

1. （1） 请为上面的程序设计流程图。

   

3. （2） 请把下面对应的代码填写完整。

   Private Sub Command1_Click( )

       Dim x As Integer

       x= (Text1.Text)

       Select Case x

      

           Text2.Text=“优秀”

       Case x≧75

           

      

           

       Case Else

          Text2.Text=“不及格”

       End Select

   End Sub