2012-03-15 103 views
0

我有以下代碼來設置在一個16位的顯示光標位置:定位的遷移代碼從VB6到vb.net

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。任何人都可以幫助我開始嗎?

+0

我認爲這些是在不同的容器中,因爲一個有緹協調,另一個是像素。如果沒有,那麼它做的事情很奇怪。 – Deanna 2012-03-15 15:53:08

回答

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 
+2

+1,但您可能想將'10'值更改爲'0'或'1',因爲它們現在以像素而不是緹爲單位。這取決於屏幕分辨率,但我的屏幕上有10緹大概是0.6像素。 – MarkJ 2012-03-15 10:57:33

+0

「X1不是windows.forms.label的成員」正在發揮作用...告訴我如何解決這個問題。 – 2012-04-06 08:48:01