代码简化

bingxing8000 · 发表于 2011-2-11 11:03:17

本帖最后由 bingxing8000 于 2011-2-11 11:05 编辑

Dim $c1,$c2,$c3
$c1 = DriveSpaceFree( "c:\" ) ;c盘剩余空间
$c2 = DriveSpaceTotal( "c:\" )
$c3=$c1/$c2*100
MsgBox(0,"c盘剩余空间",$c3& "%" )

以上代码可以简化吗？
就是说只设一个变量就可以得出 C盘剩余的百分比

haodd · 发表于 2011-2-11 13:11:55

MsgBox(0,"c盘剩余空间",DriveSpaceFree("c:")/DriveSpaceTotal( "c:" )*100 & "%" )

netegg · 发表于 2011-2-11 13:12:39

MsgBox(0,"c盘剩余空间", string(DriveSpaceFree( "c:\" ) / DriveSpaceTotal( "c:\" ) *100) & "%" )

lpxx · 发表于 2011-2-11 13:58:56

MsgBox(0,"c盘剩余空间",DriveSpaceFree("c:\")/DriveSpaceTotal( "c:\" )*100 & "%" )

haijie1223 · 发表于 2011-2-11 14:20:11

学习了很不错的

Hen5ei · 发表于 2011-2-11 14:33:10

MsgBox(0,"c盘剩余空间", string(DriveSpaceFree( "c:" ) / DriveSpaceTotal( "c:" ) *100) & "%" )

menfan1 · 发表于 2011-2-11 14:43:31

MsgBox(0,"c盘剩余空间", String(Round(DriveSpaceFree( "c:\" ) / DriveSpaceTotal( "c:\" ) *100,3 )) & "%" )

bingxing8000 · 发表于 2011-2-11 15:45:18

谢谢大家了~！！

		自动登录	找回密码
密码			加入

[AU3基础] 代码简化

相关帖子

浏览过的版块