东大19春学期《可视化程序设计Ⅰ》在线作业3辅导资料

《东大19春学期《可视化程序设计Ⅰ》在线作业3辅导资料》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、东大19春学期《可视化程序设计Ⅰ》在线作业31、A2、C3、D4、D5、D一、单选题共20题，100分1、在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为“Save”，缺省文件名为“Savefile”，在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是A"PrivateSubCommand1_Click()CommonDialog1.FileName=""SaveFile""CommonDialog1.Filter=""AllFi

2、les

3、*.*

4、(*.txt)

5、*.txt

6、(*.doc)

7、*.doc""CommonDialog1.FilterIndex=2CommonDialog1.DialogTitle=""Save""CommonDialog1.Action=2EndSub"B"PrivateSubCommand1_Click()CommonDialog1.FileName=""SaveFile""CommonDialog1.Filter=""AllFiles

8、*.*

9、(*.txt)

10、*.txt

11、(*.doc)

12、*.doc""CommonDialog1.FilterInde

13、x=1CommonDialog1.DialogTitle=""Save""CommonDialog1.Action=2EndSub"C"PrivateSubCommand1_Click()CommonDialog1.FileName=""Save""CommonDialog1.Filter=""AllFiles

14、*.*

15、(*.txt)

16、*.txt

17、(*.doc)

18、*.doc""CommonDialog1.FilterIndex=2CommonDialog1.DialogTitle=""SaveFile""CommonDialog1.Action=2En

19、dSub"D"PrivateSubCommand1_Click()CommonDialog1.FileName=""SaveFile""CommonDialog1.Filter=""AllFiles

20、*.*

21、(*.txt)

22、*.txt

23、(*.doc)

24、*.doc""CommonDialog1.FilterIndex=1CommonDialog1.DialogTitle=""Save""CommonDialog1.Action=1EndSub"正确答案是：A2、确定一个控件在窗体上的位置的属性是AWidth和HeightBWidth或HeightCTop

25、和LeftDTop或Left正确答案是：C3、在窗体上面一个命令按钮（其Name属性为Commandl），然后编写如下代码：OptionBase1PrivateSubCommandl_Click()Dima(4,4)Fori=1To4Forj=1To4a(i,j)=(i-1)*3+jNextjNextiFori=3To4Forj=3To4Printa(j,i);NextjPrintNextiEndSub程序运行后，单击命令按钮，其输出结果为A69710B710811C811912D9121013正确答案是：D4、在窗体上画一个文本框、一个标签和一个命令

26、按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：PrivateSubCommand1_Click()　　strText=InputBox("请输入")　　Text1.Text=strTextEndSubPrivateSubText1_Change()　　Label1.Caption=Right(Trim(Text1.Text),3)EndSub程序运行后，单击命令按钮，如果在输入对话框中A空BabcdefCabcDdef正确答案是：D5、在窗体上面画一个命令按钮，然后编写如下事件过程：OptionBase1Pri

27、vateSubCommandl_Click()Dimaa=Array(1,2,3,4)j=1Fori=4ToStep-1s=s+a(i)*jj=j*10NextiPrintsEndSub运行上面的程序，单击命令按钮，其输出结果是A4321B12C34D1234正确答案是：D6、要从磁盘上读入一个文件名为“c:filel.txt”的顺序文件，下面程序段正确的是（）A"F=""c:filel.txt""Open""F""ForInputAs#2"B"Open""c:filel.txt""ForOutputAs#2"COpenc:filel.txtF

28、orInputAs#1DOpenc:filel.txtForInputAs#1正确答案是：A