专题三 顺序结构程序设计（讲义）-《Visual Basic 程序设计》高考备考讲练测（内蒙古）

专题三 顺序结构程序设计（讲义） ---《Visual Basic 程序设计》专题复习讲练测 [考纲要求] 1.数据输出 2.常用基本语句 3.利用文本框进行数据输入 4.使用对话框实现数据的输入和输出 [课时安排] 2课时 [知识梳理] 一：基本语句 1. 赋值语句 （1）形式：变量名=表达式 （2）作用：将右边表达式的值赋值给左边的变量，一般用于给变量赋值或对控件设定属性值 （3）赋值号两边数据类型不同时的处理 ①当表达式为数值型并与变量精度不同时，需强制转换成左边变量的精度。 ②当表达式是数字字符串，左边变量是数值类型，自动转换成数值类型再赋值。如表达式中有非数字字符或空串，则出错。 ③当逻辑型值赋值给数值型变量时，True转换为-1，False转换为0；反之当数值赋值给逻辑型变量时，非0转换为True，0转换为False。 ④任何非字符型的值赋值给字符型变量，自动转换为字符型。 2. 卸载对象语句 Unload 当要结束应用程序，或需要从内存中卸载窗体，或需要从内存中卸载某些控件时，可以使用Unload语句。语句格式为：Unload 对象名。 3. 注释语句 语法格式：Rem <注释内容> 或 ‘ <注释内容> (1) 注释内容指要包括的任何注释文本，在Rem关键字与注释内容之间要加一个空格。 (2) 若在其他语句后使用Rem关键字，必须用冒号（：）与语句隔开。 二：数据输出 1. Print方法 Print方法可以在窗体上输出文本字符串或表达式的值，并可在其他图形对象或打印机上输出信息。语法格式如下： [对象.]Print[定位函数][输出表达式列表][分隔符] （1）对象：窗体(Form)、图形框(PictureBox)或打印机(Printer) ，省略对象则在窗体上输出。 （2）如果使用Print方法将数据输出到窗体，应先使用Show方法，否则输出数据不可见。 （3）[输出表达式列表]：要输出的数值或字符串表达式，表达式可以是一个或多个，可以是数值表达式或字符串。 （4）分隔符：在多个表达式之间，用于表示光标的定位，包括分号和逗号。 ①标准输出格式：各数据项之间用“,”分隔，以14个字符宽度划分一个区段，每个数据项位置占一个区段。 ②紧凑输出格式：各数据项之间用“;”分隔，数值数据前面有一个符号位，后面有一个空格，字符串之间没有间隔。 （5） 若省略语句行末尾的分隔符，则Print方法将自动换行。 （6） Print方法具有计算和输出双重功能，对于表达式，总是先计算后输出。 2. Tab函数 Tab函数可以对输出进行定位。其格式为：Tab（n)。 （1） n为数值表达式，其值为一个整数。Tab函数把显示或打印位置移到由参数n指定的列数，从此列开始输出数据。要输出的内容放在Tab函数后，并用分号隔开。 （2） 通常最左边的列号为1.如果当前的显示位置已经超过n，则自动下移一行。当n大于行的宽度时，显示位置为n Mod 行宽。 （3） 当在一个Print方法中有多个Tab函数时，每个Tab函数对应一个输出项，各输出项之间用分号隔开。 3. Spc函数 在Print方法中，还可以使用Spc函数对输出进行定位。Spc函数与Tab函数的作用类似，可以互相代替。格式为：Spc（n）。 4. Cls方法 Cls方法是清除方法，可以清除Form或PictureBox中由Print方法和图形方法在运行时所生成的文本或图形，清除后的区域以背景色填充。格式为：对象名.Cls 三：标签 Label(标签)控件主要用来显示（输出）文本信息，不能作为输入信息的界面。也就是说Label控件的内容只能用Caption属性来设置或修改，不能直接编辑。 1. 常用属性 （1）Caption：用来改变Label控件中显示的文本。 （2）Alignment：设置Caption属性中文本的对齐方式。 （3）AutoSize：设置标签是否会随标题内容自动变化。True：随Caption内容自动调整控件本身的大小，且不换行；False：尺寸不能自动调整，超出尺寸范围的内容不予显示。 （4）BorderStyle：有无边框。其中，0-None：无边框；1-Fixed Single：有边框。 三：文本框 利用文本框控件的Text属性(可缺省)获得用户从键盘输入的数据，或将计算结果输出。 1. 常用属性 （1）Text: Text属性返回或设置文本框中的文本。Text属性是文本框控件最重要的属性之一，可以在设计时设置Text属性，也可以在运行时直接在文本框内输入、或通过程序代码对Text属性重新赋值来改变Text属性的值。 （2）MaxLength：MaxLength属性返回或设置在文本框控件中能够输入字符的最大数。MaxLength属性的取值范围0～65535。 （3）Multiline：MultiLine属性返回或设置文本框是否接受多行文本。 当MultiLine属性值为False（缺省值）时，文本框中的字符只能在一行中显示。 当MultiLine属性值为True时，则可以在文本框的Text属性中加入换行符使文本多行显示。 （4）ScrollBars：ScrollBars属性返回或设置文本框是否有垂直或水平的滚动条。当文本过长，可能超过文本框的边界时，应该为该控件添加滚动条。 （5）PasswordChar：PasswordChar属性返回或设置一个值，该值指示所键入的字符或占位符在文本框中以何种形式显示。主要用于口令输入。 2. 常用事件 （1）Change事件： 一旦文本框中的Text属性发生改变时，将触发文本框的Change事件。 （2）KeyPress事件：KeyPress事件在文本框获得焦点并且用户按下了键盘上的按键后触发。 四：Frame控件 框架控件的主要作用是对窗体上的控件进行分组，它是一个容器控件。在框架内的控件的Left和Top属性值都是相对于框架的边界衡量的，当移动框架时，框架内的控件也随之移动，但是框架内的控件的Left和Top属性值并没有改变。 向框架内添加控件的方法有两种： (1) 先建立框架控件，然后选定工具箱中的控件，在框架内进行拖画。 (2) 已分别建立了控件和框架，可以选定控件进行“剪切”操作，再选定框架进行“粘贴”操作，最后调整控件在框架中的位置。 框架常用的事件是Click和Db1Click，它不接受用户输入，不能显示文本和图形，也不能与图形相连。 五：对话框 1. InputBox输入对话框 InputBox 用于提示用户输入数据，并返回用户输入的字符串。 格式：InputBox(提示[,标题][,默认][,x坐标][,y坐标]) （1）提示：字符串表达式，在对话框中的标题区显示，可为汉字 （2）[标题]：字符串表达式，在对话框的标题区显示。省略，则把应用程序名放入标题栏中 （3）[默认]：字符串表达式，当在输入对话框中无输入时，则该默认值作为输入的内容 （4）[x坐标] ] [y坐标],整型表达式：坐标确定了对话框左上角在屏幕上的位置 2. MsgBox输出对话框 MsgBox是Visual Basic中的一个函数，功能是弹出一个对话框，等待用户单击按钮，并返回一个Integer值表示用户单击了哪一个按钮。 格式：变量= MsgBox(<提示信息> [, <对话框类型>][,< 对话框标题>]) 其中，对话框类型=[按钮[＋图标]+ [缺省按钮]+[模式]] 图标 标题 提示信息 命令按钮 （1）<提示信息>：必选项，提示用户在输入框中输入信息，长度不能超过1 024个字节。 （2）<对话框类型>：为整数或符号常量，用于指定对话框中出现的控制按钮和图标的种类和数量，一般有4个参数，用“＋”号相连，参数的取值可以是数字形式和符号常量形式。 （3）MsgBox（）返回的值指明了在对话框中选择了哪一个按钮。 （4）如果MsgBox函数不需要返回值，可以省略圆括号，则变形为MsgBox语句。MsgBox语句与MsgBox函数的作用相似，各参数的含义与MsgBox函数相同。 格式：MsgBox <提示信息> [ , <对话框类型>][ ,< 对话框标题> ] [真题练讲] 1. 以下能够触发文本框Change事件的操作是（ ） A. 文本框失去焦点 B. 文本框获得焦点 C. 设置文本框焦点 D. 改变文本框内容 【答案】D 【解析】本题考查文本框Change事件的触发条件。Change事件在文本框的内容发生改变时触发。文本框失去焦点触发LostFocus事件，获得焦点触发GotFocus事件，设置焦点不会直接触发Change事件，只有改变内容时才会触发。 2. 下列对MsgBox函数使用正确的是（ ） A. x = MsgBox("输入的数据超出范围", vbOKOnly, "注意") B. x = MsgBox(输入的数据超出范围, vbOKOnly, 注意) C. x = MsgBox("输入的数据超出范围", OK, "注意") D. x = MsgBox(1) 【答案】A 【解析】本题考查MsgBox函数的用法。MsgBox函数的语法为：MsgBox(提示信息, 按钮样式, 标题)，其中提示信息和标题需用字符串常量（加引号），按钮样式需使用系统定义的常量（如vbOKOnly）。选项B中字符串未加引号，选项C中按钮样式常量错误，选项D参数不完整。因此答案选A。 3.假定有如下的窗体事件过程： Private Sub Form_Click( ) a = "Microsoft Visual Basic" b = Right(a, 5) c = Mid(a, 1, 9) MsgBox a, 34, b End Sub 程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信息是（ ） A．Microsoft Visual B．Microsoft Visual Basic C．Basic D．5 【答案】C 【解析】MsgBox函数的格式为MsgBox(提示信息, 按钮样式, 标题)，其中第三个参数b为标题栏内容，即"Basic"。 4. 如果希望标签能自动调整大小适应所有显示的内容，则应该设置的属性是（ ） A．将标签的 BorderStyle 属性设置成 1 B．将标签的 BackStyle 属性设置成1 C．将标签的 Autosize 属性设置成 true D．将标签的 Enabled 属性设置成true 【答案】C 【解析】AutoSize属性设置为True时，标签会自动调整宽度和高度以适应其Caption属性中的内容。 5. 阅读下面的程序段： n1 =Val(InputBox("请输入第一个数：")) n2 = InputBox("请输入第二个数：") Print n1 + n2 当运行时的输入分别为111和222时，程序输出（ ）。 A.111 B.222 C.333 D.111222 【答案】C 【解析】当数值型与字符串型进行+运算时，VB 会将字符型转换为数值型，进行相加。 [限时练习] 1.如果希望标签在显示的时候没有边框，应该设置的属性是（ ） A．将标签的 BorderStyle 属性设置成 1 B．将标签的 BackStyle 属性设置成1 C．将标签的 BorderStyle 属性设置成 0 D．将标签的 Enabled 属性设置成False 【答案】C 【解析】BorderStyle属性用于控制标签是否显示边框，设置为 0 时，标签无边框；设置为 1 时，标签显示单线边框。 2.设有语句x=InputBox(“AAAA”，“BBBB”，“”),程序运行后，所产生的对话框的标题应为( )。 A.AAAA B.空 C.BBBB D.出错，不能产生对话框 【答案】C 【解析】InputBox函数的语法格式为：InputBox(提示信息, 标题, 默认值)。 3.以下关于焦点的叙述中，错误的是( )。 A.如果文本框的TabStop属性为False，则不能接收从键盘上输入的数据 B.当文本框失去焦点时，触发LostFocus事件 C.当文本框的Enabled属性为False时，其Tab顺序不起作用 D.可以用TabIndex属性改变Tab顺序 【答案】A 【解析】TabStop属性为False时，文本框不能通过按 Tab 键获得焦点，但仍可通过鼠标点击等方式获得焦点，从而接收键盘输入。该属性仅控制 Tab 键的焦点切换，不影响输入功能。 4.窗体上有一命令按钮Command1，编写如下事件过程： Private Sub Command1_Click() MsgBox CStr("456" + 456) End Sub 程序运行时，单击按钮，消息对话框显示的内容是（ ）。 A.912 B.456 C.456 + 456 D.显示出错信息 【答案】A 【解析】在 VB 中，当字符串与数值进行 + 运算时，若字符串可以转换为数值，则会自动转换为数值后执行加法运算。此处 "456" 是可转换为数值的字符串，转换后为 456，与后面的 456 相加结果为 912。 5.文本框（Text1）中有选定的文本，执行 Text1.SelText=”Hello”的结果是（ ）。 A.“Hello”将替换掉原来选定的文本 B.“Hello”将插入到原来选定的文本之前 C.Text1.SelLength为5 D.文本框中只有“Hello” 【答案】A 【解析】SelText属性用于获取或设置文本框中当前选定的文本。当给SelText赋值时，新的内容会替换掉原来选定的文本。 6.用于设定文本框中最多可接受的字符数的属性是（ ）。 A. AutoSize属性 B. PasswordChar属性 C. SelLength属性 D. MaxLength属性 【答案】D 【解析】MaxLength属性用于指定文本框中允许输入的最大字符数。 7.在Visual Basic中，设文本框的PasswordChar属性被设置为”%”,程序运行时，在文本框中输入“OK”,则产生的结果是（ ） A．在文本框中显示2个“%”字符，但Text属性的值是“OK” B．在文本框中显示2个“*”字符，但Text属性的值是“OK” C．在文本框中显示2个“%”字符，但Text属性的值是“%%” D．在文本框中显示“OK”，而Text属性的值是“%%” 【答案】A 【解析】文本框的PasswordChar属性用于设置密码字符，当该属性被设置为某个字符（如 "%"）时，用户在文本框中输入的实际内容（如 "OK"）会被该字符替代显示。 8. 下面的（ ）语句可以实现：先在窗体上输出大写字母 A，然后在同一行的第10列输出小写字母 b。 A. Print "A";Tab(9); "b" B. Print "A";Tab(10); "b" C. Print "A";Space(10); "b" D. Print "A";Tab(8); "b" 【答案】B 【解析】Tab(n)函数用于将光标定位到第n列（从1开始计数），然后输出后续内容。 9.初始化时在文本框 text1 中输入“Computer”，同时执行下列程序，则输出结果为（ ）Text1.SelStart =3 Text1.SelLength = 3 Text2.Text = Text1.SelText A．put B．mpu C．mputer D．puter 【答案】A 【解析】SelStart属性表示选定文本的起始位置（从 0 开始计数）。SelLength属性表示选定文本的长度。 10. 如果运行时不能对文本框中的内容进行编辑，需要将文本框的（ ）属性设置为True A. Locked B. Visible C. TabStop D. MultiLine 【答案】A 【解析】本题考查文本框的属性。Locked属性设为True时，文本框内容不可编辑，但可以选中和复制；Visible属性控制控件是否可见；TabStop属性控制是否可以通过Tab键聚焦；MultiLine属性控制是否支持多行文本。因此答案选A。 11. Visual Basic 程序设计三种结构是__________、__________、__________。 【答案】顺序结构；选择结构；循环结构 【解析】本题考查程序设计的三种基本结构。任何复杂的程序都可以由顺序结构（按顺序执行语句）、选择结构（根据条件选择执行不同语句）和循环结构（重复执行某些语句）这三种基本结构组成，Visual Basic也不例外。 [内容小结] 1.本章节内容是关于顺序结构相关的知识，可以利用思维导图对本章知识点进行梳理总结。 2.本章节的重点在于顺序结构的执行过程、文本框、对话框相关的属性等。 3.本章节的难点在于文本框、对话框在实际中的应用，包括常用属性、方法的应用。 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $