我有两个变量声明为十进制
Dim datok As Decimal
Dim datol As Decimal
两者都填充了来自 rs232 端口的值,并且需要用这些点画一条线,但是当我尝试将 datok 和 datol 的值传递给点结构时,错误“'Decimal'类型的值不能转换为'system. drawing.point'我如何在 system.drawing.point 中转换 datok 的十进制值提前谢谢
我有两个变量声明为十进制
Dim datok As Decimal
Dim datol As Decimal
两者都填充了来自 rs232 端口的值,并且需要用这些点画一条线,但是当我尝试将 datok 和 datol 的值传递给点结构时,错误“'Decimal'类型的值不能转换为'system. drawing.point'我如何在 system.drawing.point 中转换 datok 的十进制值提前谢谢
您可以使用PointF
结构。
从上面的链接:
表示浮点 x 和 y 坐标的有序对,定义二维平面中的点。
IE
Dim datok As Decimal
Dim datol As Decimal
Dim myPoint As PointF = New PointF(datok, datol)
我不确定你是如何画线的,但是有相应的图形方法使用PointF
结构而不是Point
在这个DrawLine
方法中
或者,如果您满足于丢失一些数据,您可以在创建您的数据时将小数转换为整数Point
IE
Dim myPoint As Point = New Point(CInt(datok), CInt(datol))