正确答案：【考点分析】本题考点有：Mod运算符、文件编辑、For循环语句、If判断语句以及过程函数。【解题思路】可通过求余运算符Mod来计算某数M能否被7整除，如果MMod7=0，那么M能被7整除；如果MMod7$amp;【操作步骤】步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，在代码编辑窗口指定位置编写以下代码。参考答案Function Fun()Dim S As Integer，i As IntegerFor i=0 To 1000。求0～1000中满足条件的数If i Mod 7$amp;s=s+1′将满足条件的数的个数累加End IfNext iFun=s’返回结果End Function步骤3：调试并运行程序，关闭程序后按题目要求存盘。