2023-2024学年高一上学期选修一第二单元第六节 面向对象程序设计初步

2023-2024学年高一上学期选修一第二单元第六节 面向对象程序设计初步 一、选择题 1．一个VB工程的部分设计界面如下图所示： 下列选项不正确的是(   )。 A．窗体的Caption属性值是“对象” B．窗体文件名是“Form1.frm” C．当前选中对象的名称是“Shape1” D．工程的名称是“工程1” 2．MSGBOX  “这”，，“那”弹出的对话框中，其标题是（    ） A．这 B．那 C．无 D．出错 3．下列属于Visual Basic逻辑常量的是（   ） A．"BASIC" B．2012 C．False D．3.1415926 4．在VB窗体中，要把命令按扭的标题修改为“计算”，应修改的属性是（   ） A．Height B．BackColor C．Caption D．Font 5．有如下VB程序段： bianliang_a =" 3:bianliang_b" = 4 Label1.caption = “bianliang_a*bianliang_b” 该程序段运行之后，标签Label1将显示（ ） A．3*4 B．12 C．bianliang_a*bianliang_b D．3*4=12 6．结构化程序设计方法主要通过（    ）实现。 A．递归算法和递归程序 B．过程和函数的定义和调用 C．程序的循环结构 D．对象 7．有一个对象属性面板如图所示，该对象名为（    ） A．cmd_1 B．CommandButtom C．Caption D．lable 8．在下图所示的VB“代码窗口”中，“对象”“过程”列表分别是（    ）                  A．①② B．①③ C．③④ D．②③ 9．在VB中，应用程序窗体上有一个命令按钮，其名称属性值为“cmdStart”，则响应该命令按钮单击事件的过程名为（    ） A．Command1_Click B．Command1_DblClick C．cmdStart_ Click D．cmdStart _ DblClick 10．在 VB 中，在文本框 Text6 中显示"云富高中"，应改变的属性是（ ） A．Font B．Text C．Width D．Backcolor 11．若单选按钮被选中,其VALUE属性的值是(   ） A．0 B．1 C．TRUE D．FALSE 12．如第9题图所示在代码窗口中输入“Command1.”后出现了一个下拉菜单，菜单中的“Picture”是Command1的（   ） A．属性 B．事件 C．对象 D．方法 13．对于语句abc. Caption=“你好”，下列理解正确的是（    ） A．Caption称为属性值 B．该对象可能是标签、按钮或文本框 C．该语句的作用是将对象属性进行赋值 D．若流程图表示此算法，该语句应该在处理框中 14．在Visual Basic的代码窗口中，语句Password.Caption= "a>b"中的Password是（   ） A．对象名 B．属性值 C．属性名 D．类名 15．窗体的名称属性是（      ） A．NAME B．CAPTION C．TOP D．LEFT 二、填空题 16．要修改窗体中各对象字体为粗体，可选中对象后在属性窗口中设置 属性。 17．VB中对象的三要素是 ， ， 18．第一个文本框的默认名称是( ). 19．观察程序界面，回答以下问题 （1）此图共有 个对象。 （2）此窗体Form1的 属性的值为“文字加密” （3）设计此程序时，“密码：”“原文：”“密文”是用到工具箱上的哪个控件( ) A．B．C．D． （4）．窗体中密文的文本框外观与原文文本框不同，是因为设置了哪项属性( ) A．ForeColor     B．BackColor      C．Font       D．Text （5）．本程序的功能是对原文进行加密计算，加密的结果显示在密文中，要实现在密文文本框内不能输入文字，应该设置文本框的属性和属性值为( ) A．Visible属性为True B．Visible属性为False C．Enabled属性为True D．Enabled属性为False 20．文本框获得焦点触发的事件是( ) 三、操作题 21．编写一个“十进制转二进制”的VB程序，功能如下：在文本框Text1中输入0~255之间的整数，单击“转换”按钮Command1后，在Text2上显示对应的二进制数｡程序设计界面和运行界面分别如图a和图b所示｡ （1）要使程序运行时，按钮Command1上显示“转换”，下列方法不可行的是 （单选，填字母：A．界面设计时，选中对象Command1，设置Caption属性为“转换”/B．在From_Load事件处理过程中添加语句Command1.Caption=＂转换＂/C．在Form_Load事件处理过程中添加语句Command1.Text=＂转换＂）｡ （2）实证上述功能的 VB 程序如下，请在划线处填入合适代码｡ Private Sub Command1_Click() Dim i As Integer, n As Integer, k As Integer, s As String n=Val(Text1. Text) k=1:s="" Do While 2^k < n   k=k+1 Loop Do While n<>0   If n>=2^(k-1) Then     s=s+"1"     ①   Else     s=s+"0"   End If   k=② Loop Text2. Text = s End Sub （3）若删除加框处的代码，在文本框Text1输入12，单击“转换”按钮，则文本框Text2中显示的内容是 ｡ 22．让TEXT1中的内容加粗,斜体,加下划线,加删除线,字体用”黑体”,字号20在窗体单击事件过程中完成. PRIVATE  SUB    CLICK(   ) TEXT1.FONTBOLD=    END   SUB 四、简答题 23．想设计一个判断某年是否是闰年的VB程序。通过查询资料得知：如果年份能被100整除同时也能被400整除，则该年是闰年；如果年份不能被100整除但能被4整除，则该年也是闰年。“判断某年是否为闰年”的算法流程图如下图所示(k=True表示该年是闰年，k=False表示该年不是闰年)。请回答下列问题： （1）流程图粗线框部分的内容是 （2）实现流程图虚线框部分的VB语句是 试卷第1页，共3页 试卷第1页，共3页 学科网（北京）股份有限公司 参考答案： 1．B 2．B 3．C 4．C 5．C 6．B 7．D 8．A 9．C 10．B 11．C 12．A 13．C 14．A 15．A 16．Font 17． 属性 事件 方法 18．TEXT1 19． 8 Caption D B D 20．GOTFOCUS 21． C n=n-2^(k-1) k-1 11 22． FORM_ TRUE Text1.fontitalic=true Text1.fontunderline=true Text1.fontstrikethru=true Text1.fontname=”黑体” Text1.fontsize=20 23．y mod 4=0； if y mod 400="0" then k=true Else k=false 答案第1页，共2页 答案第1页，共2页 学科网（北京）股份有限公司 $$