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