1. Trang chủ
  2. » Công Nghệ Thông Tin

Các chiêu thức trong lập trình Lấy tên người sử dung của Windownshome

1 310 0
Tài liệu đã được kiểm tra trùng lặp

Đang tải... (xem toàn văn)

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 1
Dung lượng 11,1 KB

Nội dung

Lấy tên người sử dung của Windowns home Xuất xứ : www.allapi.net Binh khí sử dụng : 1 Module Đoạn mã : Module : Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long Form : Sub Get_User_Name() Dim lpBuff As String * 25 Dim ret As Long, UserName As String ret = GetUserName(lpBuff, 25) UserName = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1) MsgBox UserName End Sub Private Sub Form_Load() Get_User_Name End Sub . Lấy tên người sử dung của Windowns home Xuất xứ : www.allapi.net Binh khí sử dụng : 1 Module Đoạn mã : Module : Declare

Ngày đăng: 24/10/2013, 14:20

w