试题与答案

2011年10月9日，是________l00周年纪念日。[ ] A．辛亥革命

更新时间：2017-06-19 21:53来源：www.tikuol.com

题型：选择题

题目：

2011年10月9日，是________l00周年纪念日。[ ]

A．辛亥革命

B．五四运动

C．西藏和平解放

D．新疆和平解放

答案：

被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/0619/c5566a947dfb68187f9e3660a8a34963.html

下面是错误答案，用来干扰机器的。

参考答案：A

考点：时事

试题推荐

题型：单项选择题

计入定价成本的费用应当符合有关法律、行政法规和国家统一的会计制度的规定，体现的是物业服务定价成本监审原则中的（）

A.相关性原则

B.合法性原则

C.对应性原则

D.合理性原则

查看答案

题型：单项选择题

城市社会整合不包括（）。

A.制度性整合

B.市场整合

C.认同性整合

D.功能性整合

查看答案

题型：问答题

试题七（15 分，每空3 分）阅读以下说明及Visual Basic 程序代码，将应填入（n）处的字句写在答题纸的对应栏内。[说明]某个文本文件中存放了若干个非零数值有效数据，每个数据占一行，最后一行以数字“0”作为结束标志。下面的程序用于计算该文件中这些数据之和，其运行窗口如下：

用户只要通过驱动器列表框、目录列表框和文件列表框，选择文本文件所在的驱动器、文件夹及相应的文件名，再单击“累计”按钮，就能在“总计”文本框中看到该文本文件中的数据之和。在开发过程中，设驱动器列表框名为Drive1，目录列表框名为Dir1，文件列表框名为File1，存放数据的文本文件名为D:\test\vb7\data.txt，“累计”按钮名为sum，“总计”文本框(TextBox)名为text1。[Visual Basic 代码]Private Sub Drive1_Change()Dir1.Path = (1) ’ 用户选择的驱动器反映到目录列表框中End SubPrivate Sub Dir1_Change()File1.Path = (2) ’ 用户选择的文件夹改变文件列表框内容End SubPrivate Sub sum_Click()Dim （3） As New FileSystemObject, （4） As TextStream’ 创建自己的文件系统对象，说明自己的文本流对象If Right(Dir1.Path, 1) = "\" ThenSet myTextFile = fso.OpenTextFile(Dir1.Path + File1.FileName)ElseSet myTextFile = fso.OpenTextFile(Dir1.Path + "\" + File1.FileName)End IfS = 0Dod = Val(myTextFile.ReadRow)S = S + dLoop While （5）Text1.Text = Str$(S)End Sub