变量名 | 类 型 | 静态 | 数组 | 备 注 |
dll_path | 文本型 | | |
hModule | 整数型 | | |
username | 文本型 | | 0 |
nSize | 整数型 | | |
result | 布尔型 | | |
dll_path =
“C:\Windows\System32\kernel32.dll”hModule =
动态连接库 (“kernel32.dll”,
)
如果 (hModule ≠ 0
)
nSize = 256

username =
到文本 (空间分配 (nSize
))

result =
调用子程序 (hModule,
“GetUserNameW”, , username, nSize
)
如果真 (result
)
显示信息框 (“当前用户名:” +
取左边文本 (username, nSize
),
#信息图标, “认证成功”)
显示信息框 (“认证失败”,
#警告图标, “错误”)

释放内存 (username
)
断开动态连接库 (hModule
)
显示信息框 (“DLL文件不存在”,
#警告图标, “错误”)