1.2编一个简单的vb程序同步练习　　2022—2023学年人教版高中信息技术选修1

1.2编一个简单的vb程序同步练习人教版信息技术选修1 学校:___________姓名：___________班级：___________考号：___________ 一、选择题 1．有如下 VB 程序段： t = "abcd123456" :   x = Int(Sqr(Len(t))) :   y=1 If  x > 3 Then    y =2 ElseIf x > 2 Then    y=3 ElseIf x > 1 Then    y=4 End  If 执行该程序段后，变量y的值为（   ） A．1 B．2 C．3 D．4 2．回文字符串的特征是从左到右读和从右到左读是完全一样的，如“aba”、“aabbaa”，判断字符串中忽略“，”字符后，该字符串是否是回文字符串的VB程序段如下： s = "ab,,,cb,a" n = Len(s) i = 1: j = Len(s) flag = True Do While i <= j If Mid(s, i, 1) = Mid(s, j, 1) Then i = i + 1: j = j - 1 Else      End If Loop If flag = False Then Print ("不是回文") Else Print ("回文") 横线处的代码由以下三部分组成： ① If Mid(s, i, 1) = "," Or Mid(s, i, 1) = "," Then i = i + 1 ② If Mid(s, j, 1) = "," Or Mid(s, j, 1) = "," Then j = j – 1 ③ If Mid(s, i, 1) <> "," And Mid(s, j, 1) <> "," Then flag = False: Exit Do 下列选项中，代码顺序正确的是（   ）： A．①②③ B．②①③ C．②③① D．③②① 3．以下选项哪种文本文件格式用于编写程序源代码（   ）。 A．txt B．png C．htm D．docx 4．已知k为十进制多位整数，下列选项中能正确表示含义“若k的十位是偶数则a为1，否则a为2”的是（   ） A．a=1:if k mod 2<>0 then a=2 B．a=2:if k mod 100 \2 <>0 then a=1 C．If k\100 mod 2 <>0 then a=2 else a=1 D．if k\10 mod 2 =0 then a=1  else a=2 5．在VB中，下列选项属于字符串型数据的是(    ) A．2021 B．20.21 C．"abc" D．False 6．利用VB生成两位奇数随机数，其表达式正确的是（   ） A．Int(Rnd * 45)*2 + 11 B．Int(Rnd * 33)*3 + 3 C．Int(Rnd * 89) + 11 D．Int(Rnd * 100) - 1 7．VB表达式9 Mod 66\3^2/3*4的值是（  ） A．9 B．4 C．0 D．36 8．下列 VB 表达式中，值不为5的选项是 （   ） A．Val(Mid("12345",5,1)) B．Abs(Int(-4.1)) C．sqr(12345 Mod 10) D．Len("天天向上!") 9．VB表达式Int（Sqr（26）+0.5）*3Mod16\2^2的值是（    ） A．3 B．2 C．9 D．6 10．下列选项中与表达式2021 Mod 100 \ 10的值相等的是（   ） A．Val(Mid("2021"，2，2)) B．Len("2021")Mod 2 C．Str(Abs(2020－2021)) D．Int(Sqr(2021 \ 1000)) 二、填空题 11．DIM    A(-2  TO  3, 4)  AS   INTEGER  ，该数组占的字节数是( )，该数组中的元素个数是( )个。 12．MSGBOX函数的返回值是( )型的。 13．第一个列表框的默认名称是( )，第一个组合框的默认名称是( ) 14．VB中一行写多条语句时，用( )号分隔。 15．组合框是( )和( )组合而成的控件。 三、判断题 16．TEXT1.TEXT=100的唯一功能只是改变该对象的属性值（   ） 17．VB是一种非常有名的文字处理软件。( ) 18．(必修)Visual Basic是面向过程的程序设计语言。 ( ) 19．Function 函数名在函数过程中必须被赋值（   ）