（VB.NET）'VB6'沒有聲明。由於其保護級別，可能無法訪問

我遇到了有關類的可訪問性的問題，並且該類在「Microsoft.VisualBasic.Compatibility」的引用下。順便說一句，我正在使用3.5 .NET FRAMEWORK。以下是我的項目中的錯誤。你能幫助我嗎？（VB.NET）'VB6'沒有聲明。由於其保護級別，可能無法訪問

其實，我在VB.NET中有兩個解決方案。我被複制的那個運行平穩（在這裏沒有錯誤），但在我的項目中有一個錯誤。請檢查下面的截圖。

謝謝你們。

PS：下面是我的代碼。（不是整個模塊僅僅只有程序）

Public Sub m_splitBar_MouseDown(ByVal eventSender As System.Object, ByVal eventArgs As System.Windows.Forms.MouseEventArgs) Handles m_splitBar.MouseDown 
    Dim Button As Short = eventArgs.Button \ &H100000 
    Dim Shift As Short = System.Windows.Forms.Control.ModifierKeys \ &H10000 
    Dim X As Single = VB6.PixelsToTwipsX(eventArgs.X) 
    Dim Y As Single = VB6.PixelsToTwipsY(eventArgs.Y) 
    'UPGRADE_WARNING: Couldn't resolve default property of object m_bMoving. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"' 
    m_bMoving = True 
    splitterOnMove(m_splitBar) 
End Sub

錯誤： 'VB6' 未聲明。由於其保護級別，它可能無法訪問。

我無法發佈圖片球員，但看到下面的鏈接..他們是運行的圖像，而不是運行...我只需要一個建議，爲什麼會發生這種情況。

Not running Image

Running Image

再次感謝的xD

來源

2015-10-02 Mr Yoso

請不要將您的代碼放在圖像中。發佈它作爲問題的一部分。 –

感謝Eric提醒我我的代碼。 ;）我希望你們能幫助我。 xD –

您是否有'Imports Microsoft.VisualBasic.Compatibility'文件頂部的某處？ –

PixelsToTwips在32位的項目僅支持。嘗試以下操作或使用Imports Microsoft.VisualBasic.Compatibility。一定要包含Microsoft.VisualBasic.Compatibility作爲參考。

Dim X As Single = Microsoft.VisualBasic.Compatibility.VB6.PixelsToTwipsX(eventArgs.X) 
Dim Y As Single = Microsoft.VisualBasic.Compatibility.VB6.PixelsToTwipsY(eventArgs.Y)

來源

2015-10-02 03:25:50 xpda

謝謝，xpda ..它的工作原理...只是跟進問題..爲什麼在我的運行圖像（見上），它沒有在頁面頂部的「Imports Microsoft.VisualBasic.Compatibility」，它的工作原理？爲什麼？你可以解釋嗎？ –

我猜想它被自動包含在VB6中.net轉換。 – xpda

（VB.NET）'VB6'沒有聲明。由於其保護級別，可能無法訪問

回答

相關問題