问题详情

下面一段程序的功能是，单击窗体弹出对话框。在对话框中输入一个文件名，窗体中输出该文件名的文件号。请填空。
Private Sub Form_ click()
filename = InputSox (“请输入文件名”)
Filecode =
Open filename For Output As Filecode
Print filename; “的文件号是”; Filecode
Close Filecode
End Sub请帮忙给出正确答案和分析，谢谢！