（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'没有声明。由于其保护级别，可能无法访问

回答

相关问题