1.sTmp是返回计算机名。
2.API成功则API函数返回NoneZero,则否则API调用错误。
lpBuffer就是存放计算机名称的变量,nSize, 是Buffer的长度。
3.从MSDN中

解决方案 »

  1.   

    Private Declare Function GetComputerName Lib "kernel32"Alias "GetComputerNameA"(ByVal lpBuffer As String, nSize As Long)As LongPrivate Sub Command1_Click()
    Dim computername As String
    Dim lll As Long
    lll = 255
    computername = Space(255)
    GetComputerName computername, lll
    MsgBox computername
    End Sub拉個按鈕
    寫上上面的代碼
    ok!買本API的書看看吧!相對其他的開發工具來說
    API在VB裡的調用簡單多了!