有点头痛，命名空间问题

Question

=======================================
Users.vbNamespace WebModules.Accounts.Data  Public Class User
    Inherits WebModules.Data.DbObject
    Public Sub New(ByVal newConnectionString As String)
      MyBase.New(newConnectionString)
    End Sub
    
    .
    .
    .
    End ClassEnd Namespace    
    
    
=======================================
test.vbImports WebModules.AccountsNamespace WebModules.Accounts.Web    Public Class test4
        Inherits System.Web.UI.Page
        Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sqlConnectstr = "abcde......"

            Dim dataUser As New Data.User(sqlConnectstr)        End Sub
    End ClassEnd Namespace======================================
    
    
Dim dataUser As New Data.User(sqlConnectstr) 这句话报错：为定义类型 Data.User
我的问题出在哪儿啊，请各位不吝赐教！！

Answer 1

WebModules.Accounts.Data.User 试试你输入Data.的时候 有没有代码提示？

Answer 2

下面这段代码改成
Imports WebModules.Accounts.DataNamespace WebModules.Accounts.Web    Public Class test4
        Inherits System.Web.UI.Page
        Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sqlConnectstr = "abcde......"

            Dim dataUser As New User(sqlConnectstr)        End Sub
    End ClassEnd Namespace

Answer 3

或者
Namespace WebModules.Accounts.Web    Public Class test4
        Inherits System.Web.UI.Page
        Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sqlConnectstr = "abcde......"

            Dim dataUser As New WebModules.Accounts.Data.User(sqlConnectstr)        End Sub
    End ClassEnd Namespace