解释如下：
Command4.Enabled = False 使Command4按纽标题变为灰色，也就是使按纽不能使用。
App.Path 获得当前主程序文件所在的路径，这个路径加上 & 后面的字符串，就是要打开文件的全路径文件名。
Append 以“将新的数据追加到原文件末尾”的方式打开文件，这样，文件中原数据保持不变。
Step 200 循环的步长为200，这样，i的值每循环一次会增加200，即：200、400、600....
Int((30 * Rnd) 其中Rnd取得0－1（不包含1）之间的随机小数，乘以30后就变成0－30（不包含30）之间的小数，函数Int取整，作用是去掉小数部分，保留整数部分，结果就变成0－29之间的一个整数。
Print 将新数据写入文件，是写到原文件末尾。
Close 关闭文件，打开文件操作完毕后一定要记得关闭哦。
Command4.Enabled = True 使Command4按纽标题变为正常色，也就是使按纽能够使用了。