📄 454.htm
字号:
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN"><HTML>
<HEAD>
<TITLE>AvailableSpace 属性</TITLE>
<META NAME="CATEGORY" CONTENT="语言参考">
<META NAME="MS.LOCALE" CONTENT="ZH-CN">
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<META NAME="PRODUCT" CONTENT="Visual Basic Scripting Edition">
<META NAME="TECHNOLOGY" CONTENT="SCRIPTING">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="AvailableSpace 属性">
</HEAD>
<BODY BGCOLOR=FFFFFF LINK=#0033CC>
<!--TOOLBAR_START-->
<!--TOOLBAR_EXEMPT-->
<!--TOOLBAR_END-->
<FONT FACE="宋体" SIZE=2>
<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%><TR VALIGN=TOP><TD WIDTH=360>
<FONT SIZE=2 COLOR=#660033>Microsoft® Visual Basic® Scripting Edition</FONT><BR>
<FONT SIZE=5 COLOR=#660033><B>AvailableSpace 属性</B></FONT></TD>
<TD ALIGN=RIGHT>
<FONT SIZE=2> <A HREF="vbstoc.htm">语言参考</A> <BR>
<!--START PAGE START--><!--START PAGE END--><A HREF="16.htm">版本 3</A> <P></FONT>
</TD></TR>
</TABLE>
<FONT SIZE=2><p>
<A HREF="456.htm">请参阅</A> <A HREF="455.htm">应用于</A></FONT>
<HR noshade SIZE=2>
<H5>描述</H5>
<BLOCKQUOTE>返回指定的驱动器或网络共享对于用户的可用空间大小。</BLOCKQUOTE>
<H5>语法</H5>
<BLOCKQUOTE><b>object</b>.<b>AvailableSpace</b>
<P><b>object</b> 应为 <B>Drive</B> 对象的名称。
</BLOCKQUOTE>
<H5>说明</H5>
<BLOCKQUOTE>
<b>AvailableSpace</b> 属性与 <b>FreeSpace</b> 属性返回的值基本相同。对于支持限额的计算机系统来说，这两个属性返回的值有所差异。
<P>以下代码举例说明如何使用 <b>AvailableSpace</b> 属性：
<BLOCKQUOTE><pre><font face="宋体" SIZE=2>Sub ShowAvailableSpace(drvPath)
Dim fs, d, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set d = fs.GetDrive(fs.GetDriveName(drvPath))
s = "驱动器 " & UCase(drvPath) & " - "
s = s & d.VolumeName & vbCrLf
s = s & "可用空间： " & FormatNumber(<font color="#FF0000">d.AvailableSpace</font>/1024, 0)
s = s & "KB"
MsgBox s
End Sub</font></pre></BLOCKQUOTE>
</BLOCKQUOTE>
<hr noshade SIZE=2>
<FONT SIZE=2>
<!--COPYRIGHT BEGIN--><!--COPYRIGHT END-->
</FONT></FONT></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -