2012-08-07 70 views
1

這裏是我的VB .NET代碼:轉換無效-Exception

Public Class Form1 

    Dim hue As Single 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles  Button1.Click 
    Dim hueMin As Single = 205 
    Dim hueMax As Single = 259 

      If (hue > hueMin) & (hue < hueMax) Then 

       bmp.SetPixel(Xcor, Ycor, Color.Black) 

      End If 
    End Sub 

End Class 

我此行中得到:

​​

此異常:

{ 「從字符串轉換 」FalseTrue「 鍵入 '布爾' 無效」。}

任何想法如何修復代碼? 預先感謝您。

+1

在您的項目屬性或代碼頂部,啓用Option Strict On,您將爲自己節省一些麻煩。 – 2012-08-07 11:37:36

回答

4

正確的測試應該是

If (hue > hueMin) AndAlso (hue < hueMax) Then 
        ^^^^ 

在VB.Net的&是串連接操作。