?? getcomputername.htm
字號:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<style><!--
body,table {font-family:"宋體"; font-size: 9pt; line-height:11pt;}
a {text-decoration:none} a:hover {color:red;text-decoration:underline}
--></style>
<title>GetComputerName</title>
</head>
<body link="#FF0000" vlink="#FF0000" alink="#FF0000" bgcolor="#FFC8C8">
<div align="center"><center>
<table border="0" width="100%" height="22" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" height="16"><a name="GetComputerName">GetComputerName</a></td>
</tr>
</table>
</center></div><div align="center"><center>
<table border="1" width="100%" bordercolorlight="#808080" cellspacing="0"
bordercolordark="#FFFFFF">
<tr>
<td width="102%" colspan="2">VB聲明</td>
</tr>
<tr>
<td width="102%" colspan="2">Declare Function GetComputerName Lib "kernel32"
Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long</td>
</tr>
<tr>
<td width="102%" colspan="2">說明</td>
</tr>
<tr>
<td width="102%" colspan="2">取得這臺計算機的名稱</td>
</tr>
<tr>
<td width="102%" colspan="2">返回值</td>
</tr>
<tr>
<td width="102%" colspan="2">Long,TRUE(非零)表示成功,否則返回零。會設置<a
href="GetLastError.htm">GetLastError</a></td>
</tr>
<tr>
<td width="102%" colspan="2">參數表</td>
</tr>
<tr>
<td width="25%">參數</td>
<td width="77%">類型及說明</td>
</tr>
<tr>
<td width="25%">lpBuffer</td>
<td width="77%">String,隨同計算機名載入的字串緩沖區</td>
</tr>
<tr>
<td width="25%">nSize</td>
<td width="77%">Long,緩沖區的長度。這個變量隨同返回計算機名的實際長度載入</td>
</tr>
<tr>
<td width="102%" colspan="2">注解</td>
</tr>
<tr>
<td width="102%" colspan="2"><p align="left">注意nSize參數并不是按值傳遞的。參考api32.txt,了解MAX_COMPUTER_NAME常數的值</td>
</tr>
<tr>
<td width="102%" colspan="2">示例</td>
</tr>
<tr>
<td width="102%" colspan="2">Dim s$<br>
s$ = String$(MAX_COMPUTERNAME_LENGTH+1,0)<br>
Dim dl&<br>
Dim sz&<br>
sz& = MAX_COMPUTERNAME_LENGTH+1<br>
dl& = GetComputerName(s$, sz)</td>
</tr>
<tr>
<td width="102%" colspan="2">其他</td>
</tr>
<tr>
<td width="102%" colspan="2">也許你會發現,MAX_COMPUTERNAME_LENGTH常數在vb自帶的api文本查看器中找不到。的確,我也沒有找到。但我有一個工具:Listapi,這個常數在它那里可以找到</td>
</tr>
</table>
</center></div><div align="center"><center>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%"><p align="right"><a href="#GetComputerName">Top</a></td>
</tr>
</table>
</center></div>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -