2. 计算机
  3. 有如下程序： Sub Filelnfo(file1) Dim f1,{f,s Set f1＝CreateObject("Scripting.FileSystemObject") Set f＝f1.GetFil

有如下程序： Sub Filelnfo(file1) Dim f1,{f,s Set f1＝CreateObject("Scripting.FileSystemObject") Set f＝f1.GetFil

admin2010-03-30  41
问题 有如下程序：    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、创建一个新文件file1
B、在消息对话框中显示文件file1的内容
C、在消息对话框中显示文件的所有信息
D、在消息对话框中显示文件的创建日期
答案8
解析 本题主要考查了Cre ateObject(创建对象)、GetFile(获取文件)、 DateCreated(创建日期)和消息对话框Msg Box四个函数。题中执行语句s＝f.DateCre ated后，s就保存了文件{的创建日期。最后执行语句MsgBox s在消息对话框中显示文件的创建日期。
转载请注明原文地址:https://kaotiyun.com/show/b1mp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)