将定位代码从vb6迁移到vb.net

时间:2012-03-15 10:38:41

标签: vb.net vb6 vb6-migration

我有以下代码在16位显示中设置光标位置:

linCursor.x1 = VB6.PixelsToTwipsX(lblDisplay(pintCursorPos).Left) + 10
linCursor.x1 = VB6.PixelsToTwipsX(lblDisplay(pintCursorPos).Left) + 10

linCursor.X2 = VB6.PixelsToTwipsX(lblDisplay(pintCursorPos).Left) + VB6.PixelsToTwipsX(lblDisplay(pintCursorPos).Width) - 10

我需要将此代码转换为vb.net。谁能帮助我开始?

1 个答案:

答案 0 :(得分:2)

最简单的转换只需完全放弃缇东西; those don't exist in the world of .NET您可以直接使用像素。

linCursor.x1 = lblDisplay(pintCursorPos).Left + 10
linCursor.x1 = lblDisplay(pintCursorPos).Left + 10

linCursor.X2 = lblDisplay(pintCursorPos).Left + lblDisplay(pintCursorPos).Width - 10