Visual Basic 疑问

原帖由 毛毛小子 于 2009-1-28 06:22 PM 发表


If strFTemp  == Then  这行的==那里错，我放variable在==后面也错，删掉==也错。>"

userinput = TextBox1.Text
        Select Case userinput
            Case A = grade >= 75 And grade <= 100
                MsgBox("Grade A")
            Case B = grade >= 60 And grade <= 74
                MsgBox("Grade B")
            Case C = grade > 50 And grade <= 59
                MsgBox("Grade C")
            Case D = grade >= 40 And grade <= 49
                MsgBox("Grade D")
            Case Else
                MsgBox("Fail")
        End Select

原帖由 毛毛小子 于 2009-1-28 07:50 PM 发表
我知道那些是什么功用。我也了解。那个已解决。
现在是这个。


结论是全部号码都是fail.....

userinput = TextBox1.Text
        Select Case userinput
            Case 75 To 100
                MsgBox("Grade A")
            Case 60 To 74
                MsgBox("Grade B")
            Case 50 To 59
                MsgBox("Grade C")
            Case 40 To 49
                MsgBox("Grade D")
            Case Else
                MsgBox("Fail")
        End Select

原帖由 毛毛小子 于 2009-1-28 08:29 PM 发表
我没有买书yet

        'Calculate Gross Pay Rate.....
        GrossPay = WorkedHour * PayRate
        Label6.Text = WorkedHour.ToString("N")
        Label7.Text = PayRate.ToString("C")
        Label8.Text = GrossPay.ToString("C")
        'Calculate OverTime Pay Rate.....
        If WorkedHour > 35 & WorkedHour < 60 Then
            OTPay = (WorkedHour - 35) * (PayRate) * (1.5) + GrossPay
            MsgBox(OTPay)

原帖由 毛毛小子 于 2009-1-28 11:01 PM 发表
想请教下：


这个OverTimePayRate那里的payrate*1.5需不需要另外拿出来把它算出来先？？