12 2005 档案
摘要:Sub OutputFullNumber(ByVal UpperBound As Integer) Dim i, j, s As Integer For i = 1 To UpperBound s = 0 For j = 1 To i \ 2 If i Mod j = 0 Then s = s + j Next j If i = s Then Print i ...
阅读全文
摘要:/// Global ------------------------------------------------------var deleteByForce = true;var consoleOnly = true;var defaultTimeOut = 1;var showDetails = false;var WSShell;var fso;var currentFolder;va...
阅读全文
摘要:Access中的保留字 Access 版本:1.0 , 1.1 , 2.0 Access for Windows 95, version 7.0 Access 97, Access 2000, Access XP, Access 2003 本片文章中所列的单词和符号是保留字,应避免在Access字段名和变量名中使用,因为这些保留字在Access和Microsoft Jet dat...
阅读全文