EI If w<= 50 Then 0.25* EIse If w<= 100 Then x=0.25*50+0.35*(w-50) Else x=0.25*50+0.35*50+0.45*(w-100) End if End If MsgBox“行李的托运费是:"&x&”元 End if </SCRIPT> K/BODY> </HTML> 执行 VBScript程序,浏览器显示。Else If w <= 50 Then x = 0.25 * w Else If w <= 100 Then x = 0.25 * 50 + 0.35 * (w - 50) Else x = 0.25 * 50 + 0.35 * 50 + 0.45 * (w - 100) End If End If MsgBox "行李的托运费是：" & x & "元" End If </SCRIPT> </BODY> </HTML> 执行VBScript程序，浏览器显示