未知题型 有如下程序： Sub Filelnfo(file1) Dim f1,{f,s Set f1＝CreateObject('Scripting.FileSystemObject') Set f＝f1.GetFile(file1) s＝F.DateCreated MsgBox s End Sub 这个子程序的作用是A.创建一个新文件file1B.在消息对话框中显示文件file1的内容C.在消息对话框中显示文件的所有信息D.在消息对话框中显示文件的创建日期

单项选择题 声乐作品中不会用到变奏曲式。

未知题型 编写如下通用过程： Sub Proc(x As Single,y As Single) t=x x＝t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim a As Single Dim b As Single a＝5 b＝4 Proc a,b Print a,b End Sub 程序运行后，如果单击命令按钮，则输出结果为A.5 4B.1.25 1C.4 5D.1.25 5