中国文明网签字老师让签字 急求

问题描述：

怎么签

问题解答：

上百度主页输“向国旗敬礼 做一个有道德的人 网上签名寄语活动”搜出来后就可以打开网址填了，我也是老师让签的，同病相连啊！！！！！！！！！！！！！

我看到了如下的代码.帮忙解释几个难点.先谢谢了.

代码:
Function fileExists(fname As String)
On Error Resume Next
Open fname For Input As #1
If Err Then
fileExists = False
Else
fileExists = True
End If
Close #1
End Function

Private Sub Command1_Click()
Dim foundfile As Boolean

If Trim(txtfilename.Text) = "" Then
MsgBox "请输入文件名", vbOKOnly
Exit Sub
End If
foundfile = fileExists(txtfilename.Text)
If foundfile = True Then
MsgBox (Trim(txtfilename.Text)) & "文件存在", vbOKOnly
Else
MsgBox (Trim(txtfilename.Text)) & "文件不存在", vbOKOnly
End If
End Sub

我想请教的是:
fname 是个什么东东? 帮我解释下.
谢谢

还有一个问题是:

on error resume next
这个语句该怎么用? 是怎么用的.
谢谢哈

在家庭，孝敬父母；在学校，尊敬师长；在社会，奉献爱心，做一个有道德的人.一方有难,八方支援.我为我们中国人的团结而感到骄傲.

----------------江苏省盐城市南一小四<3>班李志成

在百度搜中国文明网，再选向国旗敬礼签名活动，选自己的地址，写上名字，再写上寄语，提交就行了。

中央文明网 点击向国旗敬礼， 写完心声后点击我要敬礼

首先登陆中国文明网，打开之后点向国旗敬礼，再签就好了