21679.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 24 行

HTML
24
字号
<html>  <head>    <title>为何会.........??</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>为何会.........??</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:frank@ms8.hinet.net">乙尘</a> on November 28, 1999 at 17:46:45:<p><center><img src="http://showme.gya.com.tw/yichen/images/vbshop.gif"></center><p>---------- Start of Source Code ----------<br>Public Function GetTotalSpace(ByVal Path As String) As Long<br>Dim aa As Long<br>Dim SecPerClust As Long<br>Dim BytePerSec As Long, FreeClust As Long, totClust As Long<p>  aa = GetDiskFreeSpace(Path, SecPerClust, BytePerSec, FreeClust, totClust)<br>  GetTotalSpace = SecPerClust * BytePerSec * totClust<p>End Function<br>----------- End of Source Code -----------<br>为什么最多只能找到2GB....??有人会吗?<br><ul><li><a href="http://showme.gya.com.tw/yichen/">VB 杂货铺</a></ul><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 21679--></ul><!--end: 21679--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?