vb基础知识(50页).doc

上传人:1595****071 文档编号:36733967 上传时间:2022-08-28 格式:DOC 页数:50 大小:395.50KB
返回 下载 相关 举报
vb基础知识(50页).doc_第1页
第1页 / 共50页
vb基础知识(50页).doc_第2页
第2页 / 共50页
点击查看更多>>
资源描述

《vb基础知识(50页).doc》由会员分享,可在线阅读,更多相关《vb基础知识(50页).doc(50页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。

1、-vb基础知识-第 50 页第1章第2章 VB 基础部分1标准控件不包括( )控件。( D )A) 驱动器列表框 B) 目录列表框 C) 文件列表框 D) 通用对话框2当一个工程含有多个窗体时,它的启动窗体是( )。( D )A) 正在编辑的窗体 B) 最后一个添加的窗体C) 第一个添加的窗体 D) 在“工程属性”对话框中指定的窗体3VB 应用程序在( )模式下不能编辑代码和设计界面。( A )A) 运行 B) 中断 C) 设计 D) 以上均不能4下列叙述中,错误的是( )。( B )A) VB应用程序没有明显的开始和结束语句B) VB控件的所有属性值均可在属性窗口中设置C) VB是事件驱动型

2、可视化编程工具D) VB通过“工具”菜单的“选项”设置代码编辑窗口的字体大小5标准模块文件的扩展名是( )。( C )A) cls B) frm C) bas D) res6下列叙述中,错误的是( )。( D )A) 打开一个工程文件,系统自动装入与该工程有关的文件B) 保存VB 程序时,应分别保存窗体和工程文件C) 事件可以由用户触发,也可以由系统触发D) VB应用程序只能以解释方式执行7在设计阶段,双击窗体上的某个控件,可以打开( )。 ( A )A) 代码窗口 B) 属性窗口 C) 工具箱窗口 D) 工程资源管理器窗口8下列叙述中,错误的是( )。( C )A) VB是可视化程序设计语言

3、 B) VB采用事件驱动编程机制C) VB是面向过程的程序设计语言 D) VB应用程序可以以编译方式执行9下列叙述中,正确的是( )。( D )A) VB的事件由用户定义 B) VB程序以顺序方式执行C) VB程序从Main()函数开始执行 D) VB运行时,总是等待事件的发生10在VB 中可以通过( )方法向工具箱加入其它控件。( C )A) 右击工具箱,执行弹出式菜单中的“添加选项卡”命令B) 执行“文件”菜单中的“添加工程”命令C) 执行“工程”菜单中的“部件”命令D) 执行“工程”菜单中的“添加窗体”命令11在VB 的工程资源管理器窗口中不可能存在的文件类型是( )。( C )A) *

4、.cls B) *.vbg C) *.gif D) *.bas12以下那一种方法不能打开“代码窗口”( )。( A )A) 按快捷键Alt+C B) 双击窗体或窗体上的控件C) 执行“视图”菜单中的“代码窗口”命令 D) 单击“资源管理器”窗口的“查看代码”按钮13下列叙述中,错误的是( )。( B )A) VB程序代码不区分字母大小写B) VB程序代码中使用“/”表示注释一行C) VB程序代码中不能使用数字作为标识符的首字符D) VB程序代码以“回车换行”作为语句结束标志14VB 窗体文件的扩展名是( )。( B )A) cls B) frm C) bas D) res15下列关于VB 代码

5、编辑时常用组合键的叙述错误的是( )。 C )A) CtrlC 表示复制选定代码 B) CtrlX 表示剪切选定代码C) CtrlP 表示粘贴代码 D) CtrlY 表示删除整行代码16在属性窗口为命令按钮的Picture 属性装入了图片,但却没有显示的原因是( )。( B )A) 按钮的Enabled 属性为False B) 按钮的Sytle 属性为0C) 按钮的Default 属性为False D) 按钮的DisabledPicture 属性没有装入图片17如果命令按钮的Caption 属性包含( ),则按下Alt+C可激活该按钮。( A )A) &C B) $C C) #C D) C18

6、设置命令按钮的( )属性为True ,可使按下Esc 键时执行该按钮的单击事件过程。( A )A) Cancel B) Enabled C) Value D) Default19设置命令按钮的( )属性,可使指针指向该按钮时显示提示内容。( B )A) Caption B) ToolTipText C) Font D) Tag20下列( )方法不能触发命令按钮的Click 事件。( C )A) 在程序运行时单击命令按钮B) 在代码中设命令按钮的Value 属性为TrueC) 在设计时设命令按钮的Default 属性为True ,运行时按ESC 键D) 使用Tab 键把焦点移到按钮上,然后按空格

7、键或回车键21下列叙述中,错误的是( )。( D )A) 单击命令按钮可触发MouseDown 事件 B) 单击命令按钮可触发MouseUp 事件C) 命令按钮支持单击事件 D) 命令按钮支持双击事件22窗体上有命令按钮OK, 它的单击事件过程为CmdOK_Click(),则该按钮的Name 和Caption 属性分别为( )。( C )A) OK,Cmd B) Cmd,OK C) CmdOK,OK D) OK,CmdOK23执行( )语句,可使窗口的按钮Command1上显示“确定”。( B )A) Command1.Show = 确定 B) Command1.Caption = 确定C)

8、Command1.Name = 确定 D) Command1.Visible = 确定24命令按钮不能响应( )事件。( A )A) DblClick B) DragDrop C) KeyPress D) MouseMove25在窗体上新建一个命令按钮,其Index 属性的默认值为( )。( C )A) 0 B) 1 C) 无 D) 任意值26设置命令按钮的( )属性,可以使鼠标停在命令按钮上时显示提示信息。( C )A) WhatsThisHelpID B) HelpText C) ToolTipText D) TipText27应通过( )属性装入命令按钮处于非激活状态时显示的图片。( D

9、 )A) Picture B) DragIcon C) DownPicture D) DisabledPicture28下列语句( )可以使命令按钮Command1处于禁止状态。( A )A) Command1.Enabled = False B) Command1.Disabled = FalseC) Command1.Enabled = True D) Command1.Disabled = True29应通过( )属性装入命令按钮处于激活状态时显示的图片。( A )A) Picture B) EnabledPictureC) DownPicture D) DisabledPicture3

10、0下列语句( )可以设置命令按钮Command1的标题为“黑体”。( D )黑体 B) Command1.Font = 黑体黑体黑体第3章 数据类型及其运算部分1下列为整型变量的是( )。( C )A) x! B) x# C) x% D) x$2设有语句组:Dim S1 As String*5S1 = VB Test则S1的值为( )。( B )A) VB Test B) VB Te C) VBTes D) BTest3下列( )是合法的变量名。( A )A) x_y B) x-y C) 2x D) and4下列( )为单精度变量。( A )A) x! B) x# C) x% D) x$5由(

11、 )关键字声明的局部变量在整个程序运行时一直存在。( C )A) Dim B) Public C) Static D) Private6定义变量时如不指定类型,该变量为( )类型。( C )A) Integer B) String C) Variant D) Single7用户自定义数据类型的成员不能是( )。( A )A) 数组 B) 日期型 C) 货币型 D) 定长字符串8下列( )是合法的变量名。( B )A) x%y B) xy% C) 2x D) Or9日期常量用( )作为界定符。( C )A) B) % C) # D) &10下列哪一个是日期型常量( )。( B )A) 06/08

12、/04 B) #06/08/04# C) 06/08/04 D) 06/08/0411下列为字符串变量的是( )。( D )A) x! B) x# C) x% D) x$12可以在窗体模块的声明段中进行( )的声明。( C )A) 全局数组 B) 全局常量 C) 全局变量 D) 全局自定义数据类型13下列关于常量的叙述,正确的是( )。( C )A) 常量必须在第一次使用时被赋值 B) 常量可以在任何时候被赋值C) 常量必须在定义时被赋值 D) 常量与变量不同,没有数据类型之分14如要表示一个在10030000 0之间变化的整数,应使用( )型变量。( C )A) Integer B) Str

13、ing C) Long D) Byte15在窗体中,用( )语句声明的变量A 可以被其它窗体引用。( B )A) Dim A As Integer B) Public A As IntegerC) Private A As Integer D) Static A As Integer16表达式4 + 6 5 * 7 / 9 Mod 3的值是( )。( B )A) 4 B) 5 C) 6 D) 717下列逻辑表达式的值为True 的是( )。( C )A) Aa C) aAT D) AT b c后,窗体上显示的是( )。( B )A) 1 B) True C) False D) 出错信息20下列

14、表达式中,值最大的是( )。( C )A) 2 3 B) 2 / 3 C) 2 mod 3 D) 3 mod 221下列运算符中,优先级最低的是( )。( D )A) * B) C) / D) 22表达式 2 = 3 1 的值是( )。( C )A) 0 B) 1 C) True D) False23表示x 大于0且小于10的VB 表达式是( )。( B )A) 0 x 0 And x 0 Or x 0 : x 1024判断整型变量x 是奇数的表达式是( )。( A )A) x Mod 2 0 B) x Mod 2 != 0 C) x Mod 2 0 D) x Mod 2 025设a=6,b=

15、-3,则以下表达式值为True 的是( )。( D )A) a0 B) a0 C) a0 And b0 D) a026下列正确的赋值语句是( )。( B )A) i = j = 0 B) i = 0 : j = 0 C) i = 0 , j = 0 D) i = 0 ; j = 027下列赋值语句中,正确的是( )。( C )A) i + j = 10 B) 2i = j C) j = i + j D) i = j = 028能正确表达2的3次幂的表达式是( )。( B )A) 2 * 3 B) 2 3 C) 2 * 3 D) 2 & 329表达式123 + 23 Mod 100 7的值是(

16、)。( D )A) 6 B) 126 C) 20 D) 13230表达式12000 + 123 & 100的值是( )。( A )A) 12123100 B) 12223 C) 24300 D) 1222331返回值为数值的函数是( )。( B )A) Mid B) Instr C) Left D) Rtrim32表达式Len(幸运52) 的值是( )。( B )A) 0 B) 4 C) 6 D) 833以下( )语句可表示50,100之间的随机数。( B )A) Int(Rnd * 51) + 49 B) Int(Rnd * 51 +50)C) Int(Rnd * 50) + 50 D) I

17、nt(Rnd * 50 + 50)34返回值为字符串的函数是( )。( A )A) Str B) Val C) Len D) Asc35当x=0时,函数IIf(x 0, 1, IIf(x 2 = y C) x = y 2 D) x = y+3错误使用Print 方法的是( )。( D )A) Picture1.Print B) Form1.Print C) Debug.Print D) Text1.Print4Print 方法分区输出时,用( )分隔多个表达式。( B )A) 空格 B) 逗号 C) 冒号 D) 分号5Print 10+6=; 10+6的输出结果是( )。( C )A) 16=

18、10+6 B) 10+6=10+6 C) 10+6=16 D) 10+6=10+66下列叙述中,错误的是( )。( A )A) 不允许使用行号与标号 B) 单条语句可分行书写C) 同一行上可以书写多条语句 D) VB代码不区分字母的大小写7VB 表达式Format(CInt(3.14), 00.00)的值是( )。( A )A) 03.00 B) 03.14 C) 3.14 D) 38下列语句合法的是( )。( B )A) 1 + 2 = 3 B) x = y 0 C) y 0 = x D) x = 2y9下列语句错误的是( )。( B )A) Cls B) Image1.Cls C) For

19、m1.Cls D) Picture1.Cls10Print 方法紧密输出时,用( )分隔多个表达式。( D )A) 空格 B) 逗号 C) 冒号 D) 分号11下列关于VB 编码规则的叙述,错误的是( )。( D )A) 一条语句可以分多行书写 B) 可以用“Rem ”注释单行语句C) 注释可以放在语句之前 D) 可以用“; ”作为语句的结束符12以下程序段中有( )处错误。( C )ReDim a As Integern + 3 = na = 0 ; b = 1Print n + 3 = nA) 1 B) 2 C) 3 D) 413执行x = InputBox(请输入半径,0, 求面积) ,

20、在输入框中输入3后回车,则下列叙述中,正确的是( )。( B )A) x的值是数值3 B) x的值是字符“3”C) 0是默认值 D) 对话框标题是“求面积”14执行x = MsgBox(数据类型不匹配,VbOKCancel, 出错提示!) ,然后单击消息框的“取消”按钮,x 的值是( )。( D )A) True B) False C) 1 D) 215下列语句正确的是( )。( B )A) MsgBox VbOkOnly, Error B) MsgBox Error, VbOkOnlyC) MsgBox ( VbOkOnly, Error ) D) MsgBox ( Error, VbOkO

21、nly )16执行Len(InputBox(请输入编号:),在输入框中输入“神州1号”后回车,结果为( )。( A )A) 4 B) 7 C) 0 D) 出错17执行MsgBox 除数不能为0!, VbExclamation, 数据出错 ,在弹出的消息框中显示的图标是( )。( C )A) 停止图标 B) 问号图标 C) 感叹号图标 D) 消息图标18下列语句组:a$=Today And Tomorrowb$=Right(a$,8):c$=Left(a$,5)MsgBox a$, ,b$,c$执行后消息框的标题是( )。( B )A) Today B) Tomorrow C) Today An

22、d Tomorrow D) 119下列语句组:a$=Today And Tomorrowb$=Right(a$,8):c$=Left(a$,5)MsgBox a$, ,b$,c$执行后消息框中显示的内容是( )。( C )A) Today B) Tomorrow C) Today And Tomorrow D) 120下列程序运行时, 消息框显示的内容是( )。( A )Private Sub Command1_Click()MsgBox CStr(123 + 321)End SubA) 444 B) 123321 C) 123+321 D) 显示出错信息21窗体上有一个命令按钮Command

23、1,编写如下事件过程:Private Sub Command1_Click()x = InputBox(x=)y = InputBox(y=)Print x + yEnd Sub运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。( B )A) 444 B) 123321 C) 123+321 D) 出错信息22执行n = InputBox(n=, 0, n!) ,在输入框中输入5后回车, 则下列叙述中,正确的是( )。 ( D )A) 0是默认值 B) 输入框标题是n= C) n等于数值5 D) n的值为字符523执行x = MsgBox( 数据类型不匹配

24、, , 出错提示!) ,然后按回车,x 的值是( )。( B )A) 0 B) 1 C) True D) False24下列语句正确的是( )。( A )A) MsgBox B) MsgBox VbOkOnly,ErrorC) MsgBox ( VbOkOnly, Error ) D) MsgBox ( Error, VbOkOnly, ,100 )25下列关于InputBox 函数的叙述,错误的是( )。( A )A) 可以省略任何参数 B) 可以在屏幕指定位置显示输入框C) 可以指定默认值 D) 返回值为String 类型26下列程序运行时, 消息框显示的内容是( )。( C )Priva

25、te Sub Command1_Click()MsgBox CStr(123 + 321)End SubA) 444 B) 123321 C) 123 + 321 D) 显示出错信息27执行语句a = MsgBox(你好, vbAbortRetryIgnore + vbDefaultButton2),当出现消息框时,按回车,a 的值为( )。( B )A) vbAbort B) vbRetry C) vbIgnore D) vbDefault28将窗体的( )属性设置为True ,可使Form_Load事件中的Print 方法显示结果。( C )A) DrawStyle B) DrawMode

26、 C) AutoRedraw D) Enabled29下列叙述中,错误的是( )。( A )A) 标签和文本框都有Caption 属性 B) 标签和文本框的主要区别在于能否编辑其内容C) 标签具有AutoSize 属性,而文本框没有 D) 文本框具有ScrollBar 属性,而标签没有30能清除文本框Text1中内容的语句是( )。( B )A) Text = B) Text1.Text = C) Text1.clear D) Text1.Cls31设置( )属性使标签Label1没有边框。( A )A) Label1.BorderStyle = 0 B) Label1.BorderStyle

27、 = 1C) Label1.BackStyle = True D) Label1.BackStyle = False32下列叙述中,错误的是( )。( B )A) 标签和文本框都有Move 方法B) 标签和文本框都有Text 属性C) 标签具有Caption 属性,而文本框没有D) 文本框具有Locked 属性,而标签没有33下列控件属性赋值语句错误的是( )。( D )A) Label1 = 欢迎 B) Text1.Text = 欢迎C) Text1 = 欢迎 D) Text = 欢迎34设置标签Label1的( )属性使它不可见。( D )A) Label1.Visible = 0 B)

28、Label1.Visible = 1C) Label1.Visible = True D) Label1.Visible = False35设置标签的( )属性,可改变其文字对齐方式。( C )A) Justify B) Font C) Alignment D) 以上都不是36触发文本框Change 事件的操作是( )。( A )A) 改变文本框的内容 B) 改变文本框的大小C) 文本框获得焦点 D) 文本框失去焦点37修改文本框的内容触发( )事件。( B )A) Modify B) Change C) ChangeData D) AutoSize38对窗体上的文本框Text1编写如下事件过

29、程:Private Sub Text1_KeyPress(KeyA scii As Integer)If Chr(KeyAscii) Z Or Chr(KeyAscii) A ThenKeyAscii = 0End IfEnd Sub运行时,文本框中能输入的字符是( )。( B )A) 字母 B) 大写字母 C) 大写字母外的其它字符 D) 不能输入字母39文本框没有( )属性。( D )A) Name B) Left C) Font D) Caption40要使文本框能显示多行文本,需设置( )。( B )A) AutoSize属性为True B) MultiLine属性为TrueC) Si

30、ngleLine属性为False D) MaxLines属性大于141能使文本框Text1中文本不可编辑的语句是( )。( D )A) Text1.Editable = False B) Text1.Enabled = TrueC) Text1.TabStop = False D) Text1.Locked = True42设置文本框的( )属性,可限制文本框中能输入文本的最大长度。( A )A) MaxLength B) Width C) MultiLine D) MaxText43窗体上有文本框Text1和命令按钮Command1,对Command1编写如下事件过程: Private Su

31、b Command1_Click()Text1.Text = 12345Text1.SelStart = 1Text1.SelLength = 3MsgBox Text1.SelTextEnd Sub运行时,单击命令按钮,出现的信息框显示( )。( B )A) 12345 B) 234 C) 123 D) 34544文本框获得焦点时,能触发KeyPress 事件的操作是( )。( C )A) 选定文本框中内容 B) 双击文本框 C) 按下键盘上的某个键 D) 单击文本框45对文本框Text1编写如下事件过程:Private Sub Text1_KeyPress(KeyAscii As Inte

32、ger)Dim b As Stringb = Chr(KeyAscii)KeyAscii = Asc(UCase(b)End Sub运行时,下列叙述中,正确的是( )。( C )A) Text1中无法输入字符 B) Text1中内容为bC) Text1中输入的字符都变为大写 D) Text1中输入的字符都被转换成ASCII 码46当文本框的TabStop 属性设为False 时,下列叙述正确的是( )。( D )A) 该文本框无法获得焦点 B) 无法在该文本框中输入文本C) 焦点将始终停留在该文本框上 D) 该文本框无法通过使用Tab 键获得焦点第5章 常用控件部分1复选框的Value 属性为

33、0表示( )。( A )A) 复选框未被选中 B) 复选框被选中 C) 复选框内有灰色的钩 D) 操作出错2单选按钮被选定时,其Value 属性为( )。( C )A) 1 B) 0 C) True D) False3运行时,下列哪种方法不能选中单选按钮( )。( B )A) 用鼠标单击单选按钮B) 在属性窗口中将单选按钮的Value 属性设置为1C) 用Tab 键将焦点转移到一组单选按钮后单击其中的单选按钮D) 采用单选按钮的访问键快捷方式4下列( )语句使复选框Check1无效。( B )A) Check1.Value = 1 B) Check1.Value = 2 C) Check1.S

34、tyle = 1 D) Check1.Style = 05下列( )语句使复选框Check1的标题显示在左边。( D )A) Check1.Style = 0 B) Check1.Alignment = 0C) Check1.Style = 1 D) Check1.Alignment = 16下列( )语句设置单选按钮Option1为选中状态。( B )A) Option1.Value = 0 B) Option1.Value = TrueC) Option1.Value = 1 D) Option1.Value = False7复选框和单选按钮的( )属性可以反应其当前状态。( A )A)

35、Value B) Checked C) Caption D) Selected8单选按钮不具有( )属性。( B )A) Value B) Checked C) Caption D) Stytle9要取得复选框的状态,应访问( )属性。( A )A) Value B) Checked C) Visible D) E nabled10在窗体运行时,复选框处于选中但不激活状态,表示( )。( B )A) Enabled为False 且Value 为0 B) Enabled为False 且Value 为1C) Enabled为True 且Value 为0 D) Enabled为True 且Value

36、 为111下列( )方法可以将单选按钮设置为图形单选按钮。( B )A) Option1.Style = 0 B) Option1.Style = 1C) Option1.Picture = 0 D) Option1.Picture = 112设置( )属性可以改变单选按钮或复选框的标题对齐方式。( D )A) Value B) Align C) Sorted D) Alighment13下列( )方法可以将复选框设置为图形复选框。( B )A) Check1.Style = 0 B) Check1.Style = 1 C) Check1.Picture = 0 D) Check1.Pictu

37、re = 114在实际应用中,经常将一组单选按钮置于一个框架(Frame )控件内,这主要是为了( )。( D )A) 使用户界面美观 B) 使该组单选按钮同步C) 使该组单选按钮处于禁止状态 D) 使该组单选按钮互斥,即同一时刻只有一个单选按钮被选中15访问单选按钮的( )属性可以获取其状态。( A )A) Value B) Checked C) Visible D) Enabled1引用列表框List1最后一项数据应使用( )。( B )A) List1.List(ListCount-1) B) List1.List(List1.ListCount-1)C) List1.List(List

38、Count ) D) List1.List(List1.ListCount)2下列( )控件结合了文本框和列表框的特性。( C )A) 图片框 B) 图像框 C) 组合框 D) 标签3将列表框的MultiSelect 属性设置为( )后,可用Shift 或Ctrl 键配合鼠标在列表框中进行多项选择。( D )A) 无 B) 0 C) 1 D) 24引用列表框List1被选中项数据应使用( )。( D )A) List1.list B) List1.listCountC) List1.Index D) List1.Text5使用( )语句将 北京奥运 添加到列表框List1的首项。( D )A)

39、 List1.Text = 北京奥运 B) List1.AddItem 北京奥运C) List1.List(0) = 北京奥运 D) List1.AddItem 北京奥运,06使用( )方法可以只删除列表框指定项目。( D )A) Cls B) Clear C) Remove D) RemoveItem7用( )方法可将项目添加到组合框中。( D )A) List B) ListIndex C) Add D) AddItem8能输出组合框Combo1中现有项目数的语句是( )。( C )A) Print Combo1.ListIndex B) Print Combo1.IndexC) Prin

40、t Combo1.ListCount D) Print Combo1.Count9使用( )语句可将组合框Combo1的第3项置为当前项。( C )A) Combo1.ListIndex = 3 B) Combo1.Index = 3C) Combo1.ListIndex = 2 D) Combo1.Index = 210使用( )方法可以一次性删除列表框中全部项目。( B )A) Cls B) Clear C) Remove D) RemoveItem11要将字符串数组a 中所有学生姓名按数组下标顺序追加到列表框List1中,可以使用的程序段为( )。( C )A) List1.AddIte

41、m aB) For i = 0 To UBound(a) - 1List1.AddItem a(i), 0Next iC) For i = 0 To UBound(a) - 1List1.AddItem a(i)Next iD) For i = 0 To UBound(a) - 1List1.List(i) = a(i)Next i12 要删除列表框List1中选定的某一项,可以使用的程序段为( )。( A )A) List1.RemoveItem (List1.ListIndex)B) List1.RemoveItem List1.Columns(List1.ListIndex)C) List1.Clear List1.ListIndexD) List1.Clear List1.Columns(List1.ListIndex)13将列表框的MultiSelect 属性设置为( )后,可以使用鼠标进行多项选择,但无法结合Shift 或Ctrl 键同时进行。( C )A) 无 B) 0 C) 1

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 教育专区 > 单元课程

本站为文档C TO C交易模式,本站只提供存储空间、用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。本站仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知淘文阁网,我们立即给予删除!客服QQ:136780468 微信:18945177775 电话:18904686070

工信部备案号:黑ICP备15003705号© 2020-2023 www.taowenge.com 淘文阁