以下是引用狐狸爸爸在2011-11-28 7:16:00的发言:
1、增加一个Users结合,用于返回所有用户,例如:
For Each us As UserInfo In Users
Output.show("分组:" & us.Group)
Output.Show("名称:" & us.Name)
Next
也可以直接获得指定名称的用户,例如:
Dim us As UserInfo = Users("周明")
Output.show("分组:" & us.Group)
Output.Show("名称:" & us.Name)
[此贴子已经被作者于2011-11-28 7:29:39编辑过]
能增加用代码添加用户的功能吗?