给下列画线字注音。 邑人_______扳_______环谒_______泯然__

下面结论正确的有（　　）

①两个有理数相加，和一定大于每一个加数． 

②一个正数与一个负数相加得正数．

③两个负数和的绝对值一定等于它们绝对值的和． 

④两个正数相加，和为正数．

⑤两个负数相加，绝对值相减．  

⑥正数加负数，其和一定等于0．

A．0个

B．1个

C．2个

D．3个

一个IP地址由（）二进制分组成，分为五类，其中组播地址是E类地址，一个C类地址有（）个主机地址。

“凡法律虽经议院议决而未奉诏令批准都不得见诸施行。”这一规定应出自[ ]

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

关于纹理笔的使用，说法正确的是：（）

A.一支有纹理的笔可以用作美术用笔

B.可以用来勾划重点

C.可以自定义纹理