第3节 使用文本框 2023-2024学年高中信息技术人教版选修1

第3节 使用文本框 学校:___________姓名：___________班级：___________考号：___________ 一、选择题 1．某VB程序的一个事件过程代码如下： PrivAte SuB CommAnD1_CliCk() Dim A As Single,x As Single,z As Single A=vAl(Text1.Text) x=(A+10)/(A*A+8) y=(A-1)/(x+A) z=Sqr(x-y) Text2.Text="Str(z)" EnD SuB 程序运行时在文本框Text1中输入-1，单击命令按钮CommAnD1，弹出如右图所示的错误提示信息，产生此错误的语句是(    ) A．A=VAl(Text1.Text) B．x=(A+10)/(A*A+8) C．y=(A-1)/(x+A) D．z="Sqr(x-y)" 2．某 VB 的事件过程如下： Private Sub Command1_Click() Dim a As Integer a = Val(Text1.Text) a = 3 * a + 1 Text1.Text = Str(a) End Sub 程序运行时，在文本框 Text1 中输入 1，连续两次单击命令按钮 Command1 后，文本框 Text1中显示的内容是（  ） A．13 B．9 C．4 D．1 3．有如下 VB 程序段 Dim conn As New ADODB．Connection Dim rs As New ADODB．Recordset conn.ConnectionString = “Provider=Microsoft.ACE.OLEDB．12.0；Data Source=” &amp; App.Path &amp; “\词库.accdb” conn.Open Set rs.ActiveConnection = conn rs.Open “SELECT * FROM  words” n = 0 Do While Not rs.EOF     n = n + 1 en（n） = rs.Fields（1） ch（n） = rs.Fields（2） rs.MoveNext Loop rs.Close conn.Close 下列说法中正确的是（  ） ①连接的数据库文件名是“\词库.accdb” ②程序运行后，变量n 的值表示该数据表中记录的总数 ③数组 en（n）所存储的是数据表第 2 个字段的字段值 ④“ConnectionString”是 conn 对象的属性值⑤查询的数据表名称是“words” ⑥省略语句“rs.MoveNext”，程序也可以正常运行 A．①④⑤ B．③④⑥ C．②③⑤ D．②③④ 4．下列VB逻辑或关系表达式中，输出结果为“真”的是（    ）。 A．Int(-7.8) =-7 B．(12<5) or (8>6) C．Not(10<>9) D．(5>3) and (3>1) 5．下列关于对象的描述中，错误的是(    ) A．对象的属性用于描述对象的状态 B．对象的属性与方法可以有多个 C．对象事件的发生会驱动该对象相应事件处理过程的执行 D．对象的属性值只能在属性窗口中设置 6．某程序运行后界面如下图所示，单击“计算”按钮后会提示错误，造成错误的代码序号是（   ） Private Sub Command1_Click() Dim a As String, b As String, c As String a = Text1．Text          '① b = Text2．Text          '② c = a + b                '③ Text3．Text = Str(c)     '④ End Sub A．① B．② C．③ D．④ 7．要使程序运行时，窗体Form1标题显示“字符串生成”，可在Form_Load事件过程中添加语句（    ）。 A．Form1＝“字符串生成” B．Form1.Text＝“字符串生成” C．Form1.Caption＝“字符串生成” D．Caption.Form1＝“字符串生成” 8．x和n都是正整数且x<=n，下列选项中，与语句“x=x Mod n +1 ”功能相同的是（   ） A．x=(x+1) Mod n B．x=x+1 If x=n Then x=1 C．x=x+1 If x=n+1 Then x=1 D．x=x+1 If x=n+1 Then x=0 9．写出下列程序的输出结果 Private Sub Command1_Click() Dim a As String Dim c As String a = "zhejiangxiaoshi" c =" Mid(a," Len(a) \ 2 + 2, 7) Text1.Text = c End Sub 该程序段运行后，在文本框Text1上显示的是(       ) A．"xiaoshi" B．"zhejiang" C．zhejiang D．xiaoshi 10．exe格式的文件属于（   ）。 A．图像文件 B．音频文件 C．视频文件 D．可执行文件 11．以下选项中，不属于代码复用优点的是（    ） A．减少代码重复 B．使程序模块化 C．使程序便于阅读 D．便于发挥程序员的创造力 12．下列控件中，都具有Caption属性的是（    ） A．窗体、文本框 B．标签、列表框 C．窗体、标签 D．按钮、文本框 13．表示区间[10，99]的VB表达式是（    ） A．Int(Rnd*90)+10 B．Int(Rnd*89)+10 C．Int(Rnd*91)+10 D．Int(Rnd)*99 14．程序执行到有语法错误的语句时（   ） A．系统会输出出错的位置和错误的类型 B．系统只输出出错的位置 C．系统只输出错误的类型 D．前三项都不对 15．已知整型变量a，b为小于20的正整数，下列VB语句交换变量a，b值方法错误的是（     ） A．a=a+b:b=a-b:a=a-b B．a=a-b:b=a+b:a=b-a C．a=a*b:b=a/b:a=a/b D．a=a/b:b=a*b:a=b/a 16．有如下的程序段： Private Sub Command1_Click() Dim m As String Dim n As String m = Text1.Text n = Text2.Text Label1.Caption= m + n End Sub 运行程序，在对象Text1和Text2中分别输入12和34，则单击命令按钮Command1后，对象Text3中显示（   ） A．1234 B．46 C．语法错误 D．3412 17．下列有关VB属性说法正确的是（　　） A．计时器每隔3秒Timer事件发生一次，则Interval属性应设置为3 B．设置标签框字体的颜色应在Font属性中设置 C．图像框（imagel）中图片的加载可以通过Picture属性设置 D．确定一个控件在窗体上位置的属性是Width和Height 18．在Visual Basic工程设计中，要在文本框Text1中显示“你好”，则下列操作正确的是（    ） A．在Text属性名中输入“你好” B．在Caption属性名中输入“你好” C．在Font属性名中输入“你好” D．在Name属性名中输入“你好” 19．调试程序时，主要是对程序进行 ( ) A．逻辑调试 B．功能调试 C．性能调试 D．语法调试 20．在Visual Basic中，鼠标单击窗体Form触发的事件处理过程名为（   ） A．Form_Click B．Form_load C．Text1_DblClick D．Form_DblClick 试卷第1页，共3页 试卷第1页，共3页 学科网（北京）股份有限公司 参考答案： 1．C 【详解】 2．A 【详解】本题主要考查VB程序的解读及常用转换函数的用法。文中用到的转换函数有Val(字符串)将字符串转换为数值，Str(数值)将数值转换为字符串程序中。在文本框Text1中输入1，第一次单击命令按钮Command1时，a=1，则a=3*1+1=4，此时a的值是4，第二次单击击命令按钮Command1时，a的初值是4，经过运算a=3*4+1=13，通过Str(a)赋值给文本框Text1，Text1显示内容是13，故A项正确。 3．C 【详解】本题考查程序连接数据库相关知识。连接的数据库文件名是词库.accdb，①错“ConnectionString”是conn对象的属性名，④错。省略语句“rs.MoveNext”，数据库指针无法移动，循环无法结束，⑥错。②③⑤的说法正确，故本题选C。 4．BD 【详解】本题考查VB运算。选项A，Int(-7.8) =-7，左边nt(-7.8) 出来的结果是-8，左右两边不相等，结果为False。选项C，Not(10<>9)的结果也为False。选项B和选项D的结果都为True。所以本题选B和D。 5．D 【详解】 6．D 【详解】本题考查的是VB调试。VB中文本框接收的是字符串，“+”在字符串运算中是连接作用。故执行c = a + b后，c是字符型。str()是将数字型变量或常量转换成字符型变量或常量。故会造成错误的代码序号为：④。选项D正确。 7．C 【详解】本题考查VB相关知识。窗体的显示属性为Caption，要使窗体Form1标题显示字符串生成，则赋值语句为Form1.Caption＝“字符串生成”。故本题C选项为正确选项。 8．C 【详解】本题考查赋值语句，VB运算。题干x=x Mod n +1，有两种情况。（1）x<n，则x=x+1。（2）x=n，则x=1。结合选项判断。选项A，当x=n-1时候，A选项的结果是x=0，故有误。选项B，首先进行x=x+1，故接下来的判断实际上是x+1和n的判断，若x+1=n，则x=1，有误。选项C正确。选项D，当x和n相等时，x应该是1，故选项D有误。本题选项C为正确选项。 9．D 【详解】 10．D 【详解】本题主要考查计算机可执行文件格式。exe是可执行文件，故本题选D选项。 11．D 【详解】本题考查代码复用。代码复用是指在编写新的软件程序或系统时，重复使用已经存在且经过验证的代码，以提高开发效率、减少工作量、降低错误率，并保持代码的一致性和标准化。其优点是：减少代码重复、使程序更加模块化、使程序便于阅读。故答案为：D。 12．C 【详解】 13．A 【详解】本题考查VB函数。INT()函数，是VB数值函数的一种，是将一个要取整的实数（可以为数学表达式）向下取整为最接近的整数。利用INT函数可以返回一个小数的整数，如4.323，返回4，它不是四舍五入，而是舍尾法，即使4.987，也是返回4，而不是5。rnd()函数是VB中产生随机数的一个随机函数。返回的随机数是大于等于 0 及小于 1 的均匀分布随机实数，rnd()函数每次计算时都将返回一个新的随机实数。 若要生成 a 与 b 之间的随机整数，应使用：Int(Rnd*(b-a+1)+a)。 表示区间[10，99]的VB表达式是Int(Rnd*90)+10，故本题选项A为正确选项。 14．A 【详解】本题主要考查程序调试。程序执行到有语法错误的语句时系统会输出出错的位置和错误的类型，故本题选A选项。 15．D 【详解】本题考查交换语句。交换语句可以是a=a+b:b=a-b:a=a-b，a正确。也可以是a=a-b:b=a+b:a=b-a，B正确。a=a*b:b=a/b:a=a/b，也可以实现，C正确。选项D无法实现交换，故D错。 16．A 【详解】 17．C 【详解】本题考查的是VB属性相关知识。计时器每隔3秒Timer事件发生一次，则Interval属性应设置为3000，故选项A错误；设置标签框字体的颜色应在ForeColor属性中设置，故选项B错误；图像框（imagel）中图片的加载可以通过Picture属性设置，选项C正确； 确定一个控件在窗体上位置的属性是left和top，故选项D错误。 18．A 【详解】本题考查的是VB中文本框属性相关知识。Text属性是控制文本框Text1在窗体中的显示内容，故选项A正确；文本框中没有Caption属性，故选项B错误；Font属性是控制字体，故选项C错误；Name属性是用来标识该对象的名称，故选项D错误。 19．AD 【详解】本题主要考查程序调试。调试程序时，主要是对程序进行逻辑调试和语法调试，故本题选AD选项。 20．A 【详解】 答案第1页，共2页 答案第1页，共2页 学科网（北京）股份有限公司 $$