vb中关于select case的问题
来源:百度知道 编辑:UC知道 时间:2024/05/11 17:47:26
Select Case c
Case c < 0.8
Label3.Caption = "您的体型消瘦"
Case c >= 0.8 And c < 0.9
Label3.Caption = "您的体型偏瘦"
Case c > 1.1 And c <= 1.2
Label3.Caption = "您的体型偏胖"
Case c > 1.2
Label3.Caption = "您的体型肥胖"
Case Else
Label3.Caption = "您的体型正常"
End Select
这些语句有错误吗?
Case c < 0.8
Label3.Caption = "您的体型消瘦"
Case c >= 0.8 And c < 0.9
Label3.Caption = "您的体型偏瘦"
Case c > 1.1 And c <= 1.2
Label3.Caption = "您的体型偏胖"
Case c > 1.2
Label3.Caption = "您的体型肥胖"
Case Else
Label3.Caption = "您的体型正常"
End Select
这些语句有错误吗?
错了错了。
Select Case C
Case Is < 0.8
Label3.Caption = "您的体型消瘦"
Case Is > 1.2
Label3.Caption = "您的体型肥胖"
Case Is > 1.1
Label3.Caption = "您的体型偏胖"
Case Is >= 0.9
Label3.Caption = "您的体型正常"
Case Is >= 0.8
Label3.Caption = "您的体型偏瘦"
End Select
Private Sub Command1_Click()
Select Case c
Case Is < 0.8
Label3.Caption = "您的体型消瘦"
Case Is >= 0.8, Is < 0.9
Label3.Caption = "您的体型偏瘦"
Case Is > 1.1, Is <= 1.2
Label3.Caption = "您的体型偏胖"
Case Is > 1.2
Label3.Caption = "您的体型肥胖"
Case Else
Label3.Caption = "您的体型正常"
End Select
End Sub
Select Case c
Case c < 0.8
case后面就不能再跟c了
cas