收藏本站 
广告服务 
网站地图 
>> 本频道近100000余篇各类电脑技术、网络技术、软件技术、网页及平面设计等方面的电脑教程,我们的原则:不是精华拒不收录!
先飞电脑技术网技术文章程序开发VB 编程
网络编程 | 网站建设 | 网络技术 | 设计教程 | 软件教学 | 程序开发 | 数据库开发 | 教育认证 | 硬件维护 | 媒体动画 | 机械电子 |

VB编程取得 Windows 用户ID方法

[ 作者:佚名    转贴自:网络转载    阅读次数:37    更新时间:2007-10-9 17:42:00   录入:刘光勇 ]        
    VB编程设计中我们有时候需要取得windows用户的ID,其实很简单,下面给大家放出代码。

以下是引用片段:
Private Declare Function GetUserName Lib "advapi32.dll" Alias _
  "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Private Sub Form_Load()
  Dim aa As Long
  Dim len5 As Long
  Dim usern As String


  len5 = 256
  usern = String(255, 0)
  aa = GetUserName(usern, len5)
  usern = Left(usern, InStr(1, usern, Chr(0)) - 1)
  Debug.Print usern
End Sub

  在这里,我们使用了一个API函数GetUserName,VB中使用API函数必须先进行声明!
文章首页【加入到收藏夹】告诉好友】【打印此文】【关闭窗口
  版权声明:本站提供的“VB编程取得 Windows 用户ID方法”版权归文章所有者,转载请注明出处!
 ·上一篇文章:Visual Basic取得系统的信息代码      ·下一篇文章:面向VB开发人员的ASP.NET 2.0简介
相关文章
·ASP开发中的(VBScript)类基础学习[20]
·面向VB开发人员的ASP.NET 2.0简介[40]
·VB编程取得 Windows 用户ID方法[37]
·VB编程实现图像的漂亮效果[20]
·VB中的For循环语句的结构及用法[51]
网站主页 | 收藏本页 | 联系我们 | 广告服务 | 站点地图 | 会员注册 | 招聘信息 | 内容指正

联系QQ:先飞电脑技术网站事务联系QQ,点击可以直接留言. 32933427 电话:13710542091 [世界排名] 鄂ICP备05005890号 先飞电脑教程网