类型转换问题

[forwardchen]

我用的是一个叫bokai barcode 的条形码控件
其中,他打印出来的函数是
[Visual Basic]
Public Sub Draw( _
ByVal g As Graphics, _
ByVal rect As RectangleF, _
ByVal extraFlags As BarcodeDrawFlags, _
ByVal textOnlyString As String _
)

BarcodeDrawFlags的类型如下：
Public Enum BarcodeDrawFlags

可是我在vb.net 下面
Barcode1.Draw(ev.Graphics, rect, GraphicsUnit.Inch, 0.01F, Bokai.Barcodes.BarcodeDrawFlags.PaintWholeRect, DBNull.Value.ToString)
**********************************************

他老是提示F:\vbcode\Form1.vb(71): Value of type 'Long' cannot be converted to 'Bokai.Barcodes.BarcodeDrawFlags'

就是错在有*的部分
PaintWholeRect是'Bokai.Barcodes.BarcodeDrawFlags'的一个member


请问如何解决，各位大哥块快帮忙

[jiezhi]

Public Enum BarcodeDrawFlags
...
PaintWholeRect
...
End Enum

...
BarcodeDrawFlags flags = BarcodeDrawFlags.PaintWholeRect
Barcode1.Draw(ev.Graphics, rect, GraphicsUnit.Inch, 0.01F, flags, DBNull.Value.ToString)

[forwardchen]

没有谁能解决??

[forwardchen]

失望,没人能真正解答这个问题

[strXiaoCaiNiao]

帮你UP

[athossmth]

[Visual Basic]
Public Sub Draw( _
ByVal g As Graphics, _
ByVal rect As RectangleF, _
ByVal extraFlags As BarcodeDrawFlags, _
ByVal textOnlyString As String _
)

BarcodeDrawFlags的类型如下：
Public Enum BarcodeDrawFlags

可是我在vb.net 下面
Barcode1.Draw(ev.Graphics, rect, GraphicsUnit.Inch, 0.01F, Bokai.Barcodes.BarcodeDrawFlags.PaintWholeRect, DBNull.Value.ToString)

你的0.01F被送到参数 ByVal extraFlags As BarcodeDrawFlags 里去了

[forwardchen]

不好意思，各位。
Public Sub Draw( _
ByVal g As Graphics, _
ByVal rect As RectangleF, _
ByVal unit As GraphicsUnit, _
ByVal scale As float, _
ByVal extraFlags As BarcodeDrawFlags, _
ByVal textOnlyString As String _
)


的函数是这个

上面那个我少打了一行，各位救命

[forwardchen]

怎么我在这里的问题没人答我啊