Win32API调用错误号与信息(4000-4999)

Author:水如烟  

 

Namespace  LzmTW.uSystem.uWindows.Win32API
     Friend   Class  ErrCollection04
         Private  Collection  As   New  Dictionary( Of   Integer ,  String )

         Private   Shared  Loader  As  ErrCollection04
         Private   Shared  gInternalSyncObject  As   Object

         Private   Sub   New ()
             With  Collection
                .Add( 4000 ,  " WINS 在处理命令时遇到错误 " )
                .Add( 4001 ,  " 本地的 WINS 不能删除 " )
                .Add( 4002 ,  " 文件导入操作失败 " )
                .Add( 4003 ,  " 备份操作失败。是否先前已作过完整备份? " )
                .Add( 4004 ,  " 备份操作失败。请检查您备份数据库的目录 " )
                .Add( 4005 ,  " WINS 数据库中没有这个名称 " )
                .Add( 4006 ,  " 不允许复制一个尚未配置的伙伴 " )
                .Add( 4100 ,  " DHCP 客户获得一个在网上已被使用的 IP 地址。 直到 DHCP 客户可以获得新的地址前，本地接口将被禁用 " )
                .Add( 4200 ,  " 无法识别传来的 GUID 是否为有效的 WMI 数据提供程序 " )
                .Add( 4201 ,  " 无法识别传来的实例名是否为有效的 WMI 数据提供程序 " )
                .Add( 4202 ,  " 无法识别传来的数据项目标识符是否为有效的 WMI 数据提供程序 " )
                .Add( 4203 ,  " 无法完成 WMI 请求，应该重试一次 " )
                .Add( 4204 ,  " 找不到 WMI 数据提供程序 " )
                .Add( 4205 ,  " WMI 数据提供程序引用到一个未注册的实例组 " )
                .Add( 4206 ,  " WMI 数据块或事件通知已启用 " )
                .Add( 4207 ,  " WMI 数据块不再可用 " )
                .Add( 4208 ,  " WMI 数据服务无法使用 " )
                .Add( 4209 ,  " WMI 数据提供程序无法完成要求 " )
                .Add( 4210 ,  " WMI MOF 信息无效 " )
                .Add( 4211 ,  " WMI 注册信息无效 " )
                .Add( 4212 ,  " WMI 数据块或事件通知已禁用 " )
                .Add( 4213 ,  " WMI 数据项目或数据块为只读 " )
                .Add( 4214 ,  " WMI 数据项目或数据块不能更改 " )
                .Add( 4300 ,  " 媒体标识符没有表示一个有效的媒体 " )
                .Add( 4301 ,  " 库标识符没有表示一个有效的库 " )
                .Add( 4302 ,  " 媒体缓冲池标识符没有表示一个有效的媒体缓冲池 " )
                .Add( 4303 ,  " 驱动器和媒体不兼容或位于不同的库中 " )
                .Add( 4304 ,  " 媒体目前在脱机库中，您必须联机才能运行这个操作 " )
                .Add( 4305 ,  " 操作无法在脱机库中运行 " )
                .Add( 4306 ,  " 库、驱动器或媒体缓冲池是空的 " )
                .Add( 4307 ,  " 库、磁盘或媒体缓冲池必须是空的，才能运行这个操作 " )
                .Add( 4308 ,  " 在这个媒体缓冲池或库中目前没有可用的媒体 " )
                .Add( 4309 ,  " 这个操作所需的资源已禁用 " )
                .Add( 4310 ,  " 媒体标识符没有表示一个有效的清洗器 " )
                .Add( 4311 ,  " 无法清洗驱动器或不支持清洗 " )
                .Add( 4312 ,  " 对象标识符没有表示一个有效的对象 " )
                .Add( 4313 ,  " 无法读取或写入数据库 " )
                .Add( 4314 ,  " 数据库已满 " )
                .Add( 4315 ,  " 媒体与设备或媒体缓冲池不兼容 " )
                .Add( 4316 ,  " 这个操作所需的资源不存在 " )
                .Add( 4317 ,  " 操作标识符不正确 " )
                .Add( 4318 ,  " 媒体未被安装，或未就绪 " )
                .Add( 4319 ,  " 设备未就绪 " )
                .Add( 4320 ,  " 操作员或系统管理员拒绝了请求 " )
                .Add( 4321 ,  " 驱动器标识符不代表一个有效的驱动器 " )
                .Add( 4322 ,  " 程序库已满。没有可使用的插槽 " )
                .Add( 4323 ,  " 传输程序不能访问媒体 " )
                .Add( 4324 ,  " 无法将媒体加载到驱动器中 " )
                .Add( 4325 ,  " 无法检索有关驱动器的状态 " )
                .Add( 4326 ,  " 无法检索有关插槽的状态 " )
                .Add( 4327 ,  " 无法检索传输的状态 " )
                .Add( 4328 ,  " 因为传输已在使用中，所以无法使用 " )
                .Add( 4329 ,  " 无法打开或关闭弹入/弹出端口 " )
                .Add( 4330 ,  " 因为媒体在驱动器中，无法将其弹出 " )
                .Add( 4331 ,  " 清洗器插槽已被保留 " )
                .Add( 4332 ,  " 没有保留清洗器插槽 " )
                .Add( 4333 ,  " 清洗器墨盒已进行了最大次数的驱动器清洗 " )
                .Add( 4334 ,  " 意外媒体标识号 " )
                .Add( 4335 ,  " 在这个组或源中最后剩下的项目不能被删除 " )
                .Add( 4336 ,  " 提供的消息超过了这个参数所允许的最大尺寸 " )
                .Add( 4337 ,  " 该卷含有系统和页面文件 " )
                .Add( 4338 ,  " 由于库中至少有一个驱动器可以支持该媒体类型，不能从库中删除媒体类型 " )
                .Add( 4339 ,  " 由于没有可以使用的已被启动的驱动器，无法将该脱机媒体装入这个系统 " )
                .Add( 4340 ,  " (Y/N) [Y] " )
                .Add( 4341 ,  " (Y/N) [N] " )
                .Add( 4342 ,  " 错误 " )
                .Add( 4343 ,  " OK " )
                .Add( 4344 ,  " Y " )
                .Add( 4345 ,  " N " )
                .Add( 4346 ,  " 任何 " )
                .Add( 4347 ,  " A " )
                .Add( 4348 ,  " P " )
                .Add( 4349 ,  " (找不到) " )
                .Add( 4350 ,  " 远程存储服务无法撤回文件 " )
                .Add( 4351 ,  " 远程存储服务此时不可操作 " )
                .Add( 4352 ,  " 远程存储服务遇到一个媒体错误 " )
                .Add( 4354 ,  " 请键入密码: " )
                .Add( 4358 ,  " 请键入用户的密码: " )
                .Add( 4359 ,  " 请键入共享资源的密码: " )
                .Add( 4360 ,  " 请键入您的密码: " )
                .Add( 4361 ,  " 请再键入一次密码以便确认: " )
                .Add( 4362 ,  " 请键入用户的旧密码: " )
                .Add( 4363 ,  " 请键入用户的新密码: " )
                .Add( 4364 ,  " 请键入您的新密码: " )
                .Add( 4365 ,  " 请键入复制器服务密码: " )
                .Add( 4368 ,  " 请键入您的用户名: " )
                .Add( 4372 ,  " 打印作业详细信息 " )
                .Add( 4378 ,  " 控制下列正在运行的服务: " )
                .Add( 4379 ,  " 统计数据可用于正在运行的下列服务: " )
                .Add( 4381 ,  " 此命令的语法是: " )
                .Add( 4382 ,  " 此命令的选项是: " )
                .Add( 4383 ,  " 请键入主域控制器的名称: " )
                .Add( 4385 ,  " Sunday " )
                .Add( 4386 ,  " Monday " )
                .Add( 4387 ,  " Tuesday " )
                .Add( 4388 ,  " Wednesday " )
                .Add( 4389 ,  " Thursday " )
                .Add( 4390 ,  " 此文件或目录不是一个重解析点 " )
                .Add( 4391 ,  " 重解析点的属性不能被设置，因为它与已有的属性冲突 " )
                .Add( 4392 ,  " 在重解析点缓冲区中的数据无效 " )
                .Add( 4393 ,  " 在重解析点缓冲区中的标签无效 " )
                .Add( 4394 ,  " 请求中指定的标签和重解析点中的不匹配 " )
                .Add( 4395 ,  " W " )
                .Add( 4396 ,  " Th " )
                .Add( 4397 ,  " F " )
                .Add( 4398 ,  " S " )
                .Add( 4399 ,  " Sa " )
                .Add( 4401 ,  " 组名 " )
                .Add( 4402 ,  " 注释 " )
                .Add( 4403 ,  " 成员 " )
                .Add( 4406 ,  " 别名 " )
                .Add( 4407 ,  " 注释 " )
                .Add( 4408 ,  " 成员 " )
                .Add( 4411 ,  " 用户名 " )
                .Add( 4412 ,  " 全名 " )
                .Add( 4413 ,  " 注释 " )
                .Add( 4414 ,  " 用户的注释 " )
                .Add( 4415 ,  " 参数 " )
                .Add( 4416 ,  " 国家(地区)代码 " )
                .Add( 4417 ,  " 权限等级 " )
                .Add( 4418 ,  " 操作员权限 " )
                .Add( 4419 ,  " 帐户启用 " )
                .Add( 4420 ,  " 帐户到期 " )
                .Add( 4421 ,  " 上次设置密码 " )
                .Add( 4422 ,  " 密码到期 " )
                .Add( 4423 ,  " 密码可更改 " )
                .Add( 4424 ,  " 允许的工作站 " )
                .Add( 4425 ,  " 磁盘空间上限 " )
                .Add( 4426 ,  " 无限制 " )
                .Add( 4427 ,  " 本地组会员 " )
                .Add( 4428 ,  " 域控制器 " )
                .Add( 4429 ,  " 登录脚本 " )
                .Add( 4430 ,  " 上次登录 " )
                .Add( 4431 ,  " 全局组成员 " )
                .Add( 4432 ,  " 可允许的登录小时数 " )
                .Add( 4433 ,  " 全部 " )
                .Add( 4434 ,  " 无 " )
                .Add( 4436 ,  " 主目录 " )
                .Add( 4437 ,  " 需要密码 " )
                .Add( 4438 ,  " 用户可以更改密码 " )
                .Add( 4439 ,  " 用户配置文件 " )
                .Add( 4440 ,  " 已锁定 " )
                .Add( 4450 ,  " 计算机名 " )
                .Add( 4451 ,  " 用户名 " )
                .Add( 4452 ,  " 软件版本 " )
                .Add( 4453 ,  " 工作站活动在 " )
                .Add( 4454 ,  " Windows NT 根目录 " )
                .Add( 4455 ,  " 工作站域 " )
                .Add( 4456 ,  " 登录域 " )
                .Add( 4457 ,  " 其它域 " )
                .Add( 4458 ,  " COM 打开超时 (秒) " )
                .Add( 4459 ,  " COM 发送计数 (字节) " )
                .Add( 4460 ,  " COM 发送超时 (毫秒) " )
                .Add( 4461 ,  " DOS 会话打印超时 (秒) " )
                .Add( 4462 ,  " 错误日志文件大小上限 (K) " )
                .Add( 4463 ,  " 高速缓存上限 (K) " )
                .Add( 4464 ,  " 网络缓冲区数 " )
                .Add( 4465 ,  " 字符缓冲区数 " )
                .Add( 4466 ,  " 域缓冲区大小 " )
                .Add( 4467 ,  " 字符缓冲区大小 " )
                .Add( 4468 ,  " 计算机全名 " )
                .Add( 4469 ,  " 工作站域 DNS 名称 " )
                .Add( 4470 ,  " Windows 2000 " )
                .Add( 4481 ,  " 服务器名称 " )
                .Add( 4482 ,  " 服务器注释 " )
                .Add( 4483 ,  " 发送管理警报到 " )
                .Add( 4484 ,  " 软件版本 " )
                .Add( 4485 ,  " 对等服务器 " )
                .Add( 4486 ,  " Windows NT " )
                .Add( 4487 ,  " 服务器等级 " )
                .Add( 4488 ,  " Windows NT Server " )
                .Add( 4489 ,  " 服务器正运行于 " )
                .Add( 4492 ,  " 服务器已隐藏 " )
                .Add( 4500 ,  " 零备份存储在这个卷上不可用 " )
                .Add( 4506 ,  " 登录的用户数量上限 " )
                .Add( 4507 ,  " 同时可并存的管理员数量上限 " )
                .Add( 4508 ,  " 资源共享数量上限 " )
                .Add( 4509 ,  " 资源连接数量上限 " )
                .Add( 4510 ,  " 服务器打开的文件数量上限 " )
                .Add( 4511 ,  " 每个会话打开的文件数量上限 " )
                .Add( 4512 ,  " 文件锁定数量上限 " )
                .Add( 4520 ,  " 空闲的会话时间 (分) " )
                .Add( 4526 ,  " 共享等级 " )
                .Add( 4527 ,  " 用户等级 " )
                .Add( 4530 ,  " 未限制的服务器 " )
                .Add( 4570 ,  " 强制用户在时间到期之后多久必须注销?: " )
                .Add( 4571 ,  " 多少次密码不正确后锁住帐户?: " )
                .Add( 4572 ,  " 密码最短使用期限 (天): " )
                .Add( 4573 ,  " 密码最长使用期限 (天): " )
                .Add( 4574 ,  " 密码长度下限: " )
                .Add( 4575 ,  " 保持的密码历史记录长度: " )
                .Add( 4576 ,  " 计算机角色: " )
                .Add( 4577 ,  " 工作站域的主域控制器: " )
                .Add( 4578 ,  " 锁定阈值: " )
                .Add( 4579 ,  " 锁定持续时间(分): " )
                .Add( 4580 ,  " 锁定观测窗口(分): " )
                .Add( 4600 ,  " 统计开始于 " )
                .Add( 4601 ,  " 接受的会话 " )
                .Add( 4602 ,  " 会话超时 " )
                .Add( 4603 ,  " 会话出错 " )
                .Add( 4604 ,  " 发送的 KB " )
                .Add( 4605 ,  " 接收的 KB " )
                .Add( 4606 ,  " 平均响应时间 (毫秒) " )
                .Add( 4607 ,  " 网络错误 " )
                .Add( 4608 ,  " 访问的文件 " )
                .Add( 4609 ,  " 后台处理的打印作业 " )
                .Add( 4610 ,  " 系统出错 " )
                .Add( 4611 ,  " 密码违规 " )
                .Add( 4612 ,  " 权限违规 " )
                .Add( 4613 ,  " 访问的通讯设备 " )
                .Add( 4614 ,  " 会话已启动 " )
                .Add( 4615 ,  " 重新连接的会话 " )
                .Add( 4616 ,  " 会话启动失败 " )
                .Add( 4617 ,  " 断开的会话 " )
                .Add( 4618 ,  " 网络 I/O 执行 " )
                .Add( 4619 ,  " 文件及管道被访问 " )
                .Add( 4620 ,  " 时间缓冲区耗尽 " )
                .Add( 4621 ,  " 大缓冲区 " )
                .Add( 4622 ,  " 请求缓冲区 " )
                .Add( 4626 ,  " 已做连接 " )
                .Add( 4627 ,  " 连接失败 " )
                .Add( 4630 ,  " 接收的字节数 " )
                .Add( 4631 ,  " 接收的服务器消息块 (SMB) " )
                .Add( 4632 ,  " 传输的字节数 " )
                .Add( 4633 ,  " 传输的服务器消息块 (SMB) " )
                .Add( 4634 ,  " 读取操作 " )
                .Add( 4635 ,  " 写入操作 " )
                .Add( 4636 ,  " 拒绝原始读取 " )
                .Add( 4637 ,  " 拒绝原始写入 " )
                .Add( 4638 ,  " 网络错误 " )
                .Add( 4639 ,  " 已做连接 " )
                .Add( 4640 ,  " 重新连接 " )
                .Add( 4641 ,  " 服务器断开 " )
                .Add( 4642 ,  " 会话已启动 " )
                .Add( 4643 ,  " 会话挂起 " )
                .Add( 4644 ,  " 失败的会话 " )
                .Add( 4645 ,  " 操作失败 " )
                .Add( 4646 ,  " 使用计数 " )
                .Add( 4647 ,  " 使用计数失败 " )
                .Add( 4655 ,  " 消息名称转发已经取消 " )
                .Add( 4661 ,  " 密码已经更改成功 " )
                .Add( 4664 ,  " 消息已经发给网络上所有的用户 " )
                .Add( 4666 ,  " 消息已经送到此服务器上的所有用户 " )
                .Add( 4696 ,  " Windows NT Server " )
                .Add( 4697 ,  " Windows NT Workstation " )
                .Add( 4698 ,  " MS-DOS 增强型工作站 " )
                .Add( 4700 ,  " 服务器名称 注释 " )
                .Add( 4701 ,  " 资源共享名 类型 用途 注释 " )
                .Add( 4702 ,  " (UNC) " )
                .Add( 4703 ,  " ... " )
                .Add( 4704 ,  " Domain " )
                .Add( 4706 ,  " 其它可用的网络: " )
                .Add( 4710 ,  " Disk " )
                .Add( 4711 ,  " Print " )
                .Add( 4712 ,  " Comm " )
                .Add( 4713 ,  " IPC " )
                .Add( 4714 ,  " 状态 本地 远程 网络 " )
                .Add( 4715 ,  " OK " )
                .Add( 4716 ,  " 休止 " )
                .Add( 4717 ,  " 已暂停 " )
                .Add( 4718 ,  " 断开 " )
                .Add( 4719 ,  " 错误 " )
                .Add( 4720 ,  " 正在连接 " )
                .Add( 4721 ,  " 正在重新连接 " )
                .Add( 4722 ,  " 状态 " )
                .Add( 4723 ,  " 本地名称 " )
                .Add( 4724 ,  " 远程名称 " )
                .Add( 4725 ,  " 资源类型 " )
                .Add( 4726 ,  " # 打开 " )
                .Add( 4727 ,  " # 连接 " )
                .Add( 4728 ,  " 不可用 " )
                .Add( 4730 ,  " 共享名 资源 注释 " )
                .Add( 4731 ,  " 共享名 " )
                .Add( 4732 ,  " 资源 " )
                .Add( 4733 ,  " 后台处理 " )
                .Add( 4734 ,  " 权限 " )
                .Add( 4735 ,  " 最多用户 " )
                .Add( 4736 ,  " 无限制 " )
                .Add( 4737 ,  " 用户 " )
                .Add( 4740 ,  " 识别码 路径 用户名 # 锁定 " )
                .Add( 4741 ,  " 文件识别码 " )
                .Add( 4742 ,  " 锁定 " )
                .Add( 4743 ,  " 权限 " )
                .Add( 4750 ,  " 计算机 用户名 客户类型 打开空闲时间 " )
                .Add( 4751 ,  " 计算机 " )
                .Add( 4752 ,  " 会话时间 " )
                .Add( 4753 ,  " 空闲时间 " )
                .Add( 4754 ,  " 资源共享名 类型 # 打开 " )
                .Add( 4755 ,  " 客户类型 " )
                .Add( 4756 ,  " 来宾登录 " )
                .Add( 4770 ,  " 脱机缓存被启用:手动恢复 " )
                .Add( 4771 ,  " 脱机缓存被启用:自动恢复 " )
                .Add( 4772 ,  " 脱机缓存被启用:用户之间没有共享 " )
                .Add( 4773 ,  " 脱机缓存被停用 " )
                .Add( 4774 ,  " 自动 " )
                .Add( 4775 ,  " 手动 " )
                .Add( 4800 ,  " 名称 " )
                .Add( 4801 ,  " 转发到 " )
                .Add( 4802 ,  " 已经从下列位置转发给您 " )
                .Add( 4803 ,  " 这台服务器的用户 " )
                .Add( 4804 ,  " 用户已经按 Ctrl+Break 中断网络发送 " )
                .Add( 4810 ,  " 名称 作业编号 大小 状态 " )
                .Add( 4811 ,  " 作业 " )
                .Add( 4812 ,  " 打印 " )
                .Add( 4813 ,  " 名称 " )
                .Add( 4814 ,  " 作业 # " )
                .Add( 4815 ,  " 大小 " )
                .Add( 4816 ,  " 状态 " )
                .Add( 4817 ,  " 分隔文件 " )
                .Add( 4818 ,  " 注释 " )
                .Add( 4819 ,  " 优先级 " )
                .Add( 4820 ,  " 打印后于 " )
                .Add( 4821 ,  " 打印直到 " )
                .Add( 4822 ,  " 打印处理程序 " )
                .Add( 4823 ,  " 附加信息 " )
                .Add( 4824 ,  " 参数 " )
                .Add( 4825 ,  " 打印设备 " )
                .Add( 4826 ,  " 打印机活动中 " )
                .Add( 4827 ,  " 打印机搁置 " )
                .Add( 4828 ,  " 打印机出错 " )
                .Add( 4829 ,  " 正在删除打印机 " )
                .Add( 4830 ,  " 打印机状态未知 " )
                .Add( 4841 ,  " 作业 # " )
                .Add( 4842 ,  " 正在提交用户 " )
                .Add( 4843 ,  " 通知 " )
                .Add( 4844 ,  " 作业数据类型 " )
                .Add( 4845 ,  " 作业参数 " )
                .Add( 4846 ,  " 正在等候 " )
                .Add( 4847 ,  " 搁置于队列 " )
                .Add( 4848 ,  " 正在后台处理 " )
                .Add( 4849 ,  " 已暂停 " )
                .Add( 4850 ,  " 脱机 " )
                .Add( 4851 ,  " 错误 " )
                .Add( 4852 ,  " 缺纸 " )
                .Add( 4853 ,  " 需要干预 " )
                .Add( 4854 ,  " 正在打印 " )
                .Add( 4855 ,  " on " )
                .Add( 4862 ,  " 驱动程序 " )
                .Add( 4930 ,  " 用户名 类型 日期 " )
                .Add( 4931 ,  " 锁定 " )
                .Add( 4932 ,  " 服务 " )
                .Add( 4933 ,  " 服务器 " )
                .Add( 4934 ,  " 服务器已启动 " )
                .Add( 4935 ,  " 服务器已暂停 " )
                .Add( 4936 ,  " 服务器已继续操作 " )
                .Add( 4937 ,  " 服务器已停止 " )
                .Add( 4938 ,  " 会话 " )
                .Add( 4939 ,  " 登录来宾 " )
                .Add( 4940 ,  " 登录用户 " )
                .Add( 4941 ,  " 登录管理员 " )
                .Add( 4942 ,  " 正常注销 " )
                .Add( 4943 ,  " 登录 " )
                .Add( 4944 ,  " 注销错误 " )
                .Add( 4945 ,  " 注销自动断开 " )
                .Add( 4946 ,  " 注销管理员断开 " )
                .Add( 4947 ,  " 注销受登录限制 " )
                .Add( 4948 ,  " 服务 " )
                .Add( 4957 ,  " 帐户 " )
                .Add( 4964 ,  " 已修改帐户系统设置 " )
                .Add( 4965 ,  " 登录限制 " )
                .Add( 4966 ,  " 超过限制: 未知 " )
                .Add( 4967 ,  " 超过限制: 登录时间 " )
                .Add( 4968 ,  " 超过限制: 帐户过期 " )
                .Add( 4969 ,  " 超过限制: 工作站识别码无效 " )
                .Add( 4970 ,  " 超过限制: 帐户停用 " )
                .Add( 4971 ,  " 超过限制: 帐户已删除 " )
                .Add( 4972 ,  " 资源 " )
                .Add( 4978 ,  " 密码不正确 " )
                .Add( 4979 ,  " 需要管理员特权 " )
                .Add( 4980 ,  " 访问 " )
                .Add( 4984 ,  " 拒绝访问 " )
                .Add( 4985 ,  " 未知 " )
                .Add( 4986 ,  " 其它 " )
                .Add( 4987 ,  " 持续时间: " )
                .Add( 4988 ,  " 持续时间: 无效 " )
                .Add( 4989 ,  " 持续时间: 1 秒以下 " )
                .Add( 4990 ,  " (无) " )
                .Add( 4994 ,  " 访问结束 " )
                .Add( 4995 ,  " 登录到网络 " )
                .Add( 4996 ,  " 拒绝登录 " )
                .Add( 4997 ,  " 程序 消息 时间 " )
                .Add( 4999 ,  " 管理员已解除帐户的锁定状态 " )
             End   With
         End Sub

         Private   Shared   Function  GetLoader()  As  ErrCollection04
             If  Loader  Is   Nothing   Then
                 SyncLock  InternalSyncObject
                     If  Loader  Is   Nothing   Then
                        Loader  =   New  ErrCollection04
                     End   If
                 End   SyncLock
             End   If
             Return  Loader
         End Function

         Private   Shared   ReadOnly   Property  InternalSyncObject()  As   Object
             Get
                 If  gInternalSyncObject  Is   Nothing   Then
                    System.Threading.Interlocked.CompareExchange(gInternalSyncObject,  New   Object ,  Nothing )
                 End   If
                 Return  gInternalSyncObject
             End   Get
         End Property


         Public   Shared   Function  GetString( ByVal  errNum  As   Integer )  As   String
             With  GetLoader.Collection
                 If  .ContainsKey(errNum)  Then
                     Return  .Item(errNum)
                 Else
                     Return   " 预留或未知 "
                 End   If
             End   With
         End Function

     End Class
End Namespace