Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/list/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
VB.net创建类并填充它_Vb.net_List_Class_Arraylist_Populate - Fatal编程技术网

VB.net创建类并填充它

VB.net创建类并填充它,vb.net,list,class,arraylist,populate,Vb.net,List,Class,Arraylist,Populate,嘿,我这里有一个私有类代码: Private Class Employee Public displayName As String Public ntID As String Public lastName As String Public givenName As String Public department As String Public eMail As String End Class empInfo = New Employee

嘿,我这里有一个私有类代码:

Private Class Employee
    Public displayName As String
    Public ntID As String
    Public lastName As String
    Public givenName As String
    Public department As String
    Public eMail As String
End Class
empInfo = New Employee With { _
     .displayName = "", _
     .ntID = "", _
     .lastName = "", _
     .givenName = "", _
     .department = "", _
     .eMail = "" _
   }
}
我尝试在此处使用此代码添加到:

Private Class Employee
    Public displayName As String
    Public ntID As String
    Public lastName As String
    Public givenName As String
    Public department As String
    Public eMail As String
End Class
empInfo = New Employee With { _
     .displayName = "", _
     .ntID = "", _
     .lastName = "", _
     .givenName = "", _
     .department = "", _
     .eMail = "" _
   }
}
但我目前从上述代码中得到错误:

无法将“LDAPemployee.Form1.Employee”类型的值转换为“System.Collections.Generic.List(属于LDAPemployee.Form1.Employee)”


不确定这是否是因为我将它从C#转换为VB的例子是什么?任何帮助都可以解决这个问题

如果您只想创建一个类的实例并设置其值,如标题所示:

    (Dim) x = New Employee

    With x
        .displayName = ""
        .ntID = ""
        .lastName = ""
        .givenName = ""
        .department = ""
        .eMail = ""
    End With
假设empInfo是一个列表,则可以将新类添加到该列表中:

empInfo.add(x)
请注意,本例中的“with”部分是无用的,因为新类allready的变量具有值


我把它剥离了一点,因为如果您是vb新手,它更容易理解。最简单的方法是
empInfo.Add(具有{…
的新员工,正如安德鲁·莫顿在上面的评论中所说的

不需要所有带有道具设置器的空
,因为他们什么都不做empInfo必须是(员工的)列表,而不是员工
empInfo.Add(具有{…
是您正在寻找的,假设
empInfo
是一个
列表(员工)