第04章分支结构程序设计.pptVIP

Visual Basic 第四章 分支结构程序设计 Private Sub Command计算_Click（） Dim score! score = Text成绩.Text Select Case score Case Is = 90 Text分段.Text = 优秀 Case Is = 80 Text分段.Text = 良好 给百分制成绩分段 Case Is = 70 Text分段.Text = 中 Case Is = 60 Text分段.Text = 及格 Case Else Text分段.Text = 不及格 End Select End Sub 给百分制成绩分段 判断字符的类型 例题：变量 strC 中存放了一个字符，判断该字符类型。 （用多分支If语句实现） If Ucase(strC) =A And Ucase (strC) =Z Th