项目八 第26练 图片框和图像框《Visual Basic 程序设计》（电工版第六版）一课一练

编写说明：考虑到中职学生普遍基础知识相对薄弱的情况，我们依据支架式教学理念，精心编制了《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练。专辑里的每一份练习，都与课堂所授知识点紧密相关，题目围绕课堂所学知识点呈现。目的在于激发学生的学习兴趣，培养他们的学习自觉性，帮助学生扎实掌握课程的基本概念与基本方法，为他们后续的进一步提升奠定坚实基础。 本卷是《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练的项目八的第26练，内容涵盖项目八Visual Basic常用内部控件相关内容。 《Visual Basic程序设计(第6版)》(电子工业出版社)第26练 项目八 Visual Basic常用内部控件 任务三 图片框和图像框 1、 单项选择题（本题共5小题） 1、以下关于图片框加载图片的语句，正确的是（ ） A. Picture1 = LoadPicture("c:\test.bmp") B. Picture1.Picture = "c:\test.bmp" C. Picture1.Picture = LoadPicture("c:\test.bmp") D. Picture1.Image = LoadPicture("c:\test.bmp") 2、下列关于图片框和图像框的说法，正确的是（ ） A. 图像框的 AutoSize 属性可控制图片缩放 B. 图片框的 Cls 方法能清空通过 LoadPicture 加载的图片 C. 图像框的 Stretch 属性为 True 时，图片会按控件大小拉伸 D. 图片框和图像框都支持 Circle 绘图方法 3、图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是( )。 A.Autosize B.Stretch C.AutoRedraw D.Appearance 4、假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片，应采用的正确方法是( )。 A.单击图片框，然后按Del键 B.执行语句 Picture1.Picture=LoadPicture("") C. 执行语句 Picture1.Picture="" D.执行语句：Picture1.Cls 5、图片框与图像框的核心区别，描述错误的是（ ） A. 图片框支持绘制图形（如 Line、Circle 方法），图像框不支持 B. 图像框可通过Stretch属性缩放图片，图片框需通过AutoSize属性适配图片 C. 图片框是容器控件（可嵌套其他控件），图像框不是 D. 图像框的Picture属性加载图片后，可通过Cls方法清空，图片框则不能 2、 填空题（本题共5小题） 1、在 VB 中，要使一个图片框 PictureBox 的背景色为红色，可以通过设置____属性来实现。 2、图片框控件的AutoSize属性设置为________时，图片框的大小会自动调整以适配加载的图片。 3、清除图片框 Picture1 中通过Line、Circle等方法绘制的图形，可使用语句：________。 4、在图片框 Picture1 中绘制一个以 (300,300) 为圆心、半径为 200 twip 的圆形，语句为：________。 5、图片框 Picture1 的AutoSize属性默认值为________，此时加载超出控件尺寸的图片，图片________（填 “完整显示” 或 “部分被裁剪”）。 三、程序填空题 1.窗体中有图片框和计时器两个控件。完成下列事件代码过程，使运行程序时，将指定图片加载到图片框里，然后图片框以每 2 秒钟一次的速度向窗体的右下角移动：每次向右移动 100 个 twip，同时向下移动 100 个 twip。 Private Sub Form_Load() Picture1.Picture = ___ (1)___ ("c:\white.bmp") Timer1.Interval = ___ (2)___ End Sub Private Sub Timer1_Timer() Picture1.Move ___ (3)___,___ (4)___ End Sub 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 $ 编写说明：考虑到中职学生普遍基础知识相对薄弱的情况，我们依据支架式教学理念，精心编制了《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练。专辑里的每一份练习，都与课堂所授知识点紧密相关，题目围绕课堂所学知识点呈现。目的在于激发学生的学习兴趣，培养他们的学习自觉性，帮助学生扎实掌握课程的基本概念与基本方法，为他们后续的进一步提升奠定坚实基础。 本卷是《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练的项目八的第26练，内容涵盖项目八Visual Basic常用内部控件相关内容。 《Visual Basic程序设计(第6版)》(电子工业出版社)第26练 项目八 Visual Basic常用内部控件 任务三 图片框和图像框 1、 单项选择题（本题共5小题） 1、以下关于图片框加载图片的语句，正确的是（ ） A. Picture1 = LoadPicture("c:\test.bmp") B. Picture1.Picture = "c:\test.bmp" C. Picture1.Picture = LoadPicture("c:\test.bmp") D. Picture1.Image = LoadPicture("c:\test.bmp") 【答案】C 【解析】LoadPicture函数是 VB 中加载图片的专用函数，需赋值给图片框的Picture属性； 2、下列关于图片框和图像框的说法，正确的是（ ） A. 图像框的 AutoSize 属性可控制图片缩放 B. 图片框的 Cls 方法能清空通过 LoadPicture 加载的图片 C. 图像框的 Stretch 属性为 True 时，图片会按控件大小拉伸 D. 图片框和图像框都支持 Circle 绘图方法 【答案】 C 【解析】Stretch=True 是图像框图片适配控件大小。 3、图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是( )。 A.Autosize B.Stretch C.AutoRedraw D.Appearance 【答案】 B 【解析】图像框（PictureBox）的 Stretch 属性设为 True 时，会把加载的图形自动缩放以适应控件尺寸。 4、假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片，应采用的正确方法是( )。 A.单击图片框，然后按Del键 B.执行语句 Picture1.Picture=LoadPicture("") C. 执行语句 Picture1.Picture="" D.执行语句：Picture1.Cls 【答案】B 【解析】Cls方法只能清除图片上显示的内容，不能清除图片,Pictue属性值不能为空字符串. 5、图片框与图像框的核心区别，描述错误的是（ ） A. 图片框支持绘制图形，图像框不支持 B. 图像框可通过Stretch属性缩放图片，图片框需通过AutoSize属性适配图片 C. 图片框是容器控件，图像框不是 D. 图像框的Picture属性加载图片后，可通过Cls方法清空，图片框则不能 【答案】D 【解析】Cls方法仅清空图片框中通过绘图方法绘制的内容，无法清空Picture属性加载的图片；清空图片需用LoadPicture("")。 2、 填空题（本题共5小题） 1、在 VB 中，要使一个图片框 PictureBox 的背景色为红色，可以通过设置____属性来实现。 【答案】BackColor 【解析】PictureBox的BackColor属性决定其背景颜色。 2、图片框控件的AutoSize属性设置为________时，图片框的大小会自动调整以适配加载的图片。 【答案】 True 【解析】AutoSize为布尔属性，True表示控件适配图片，False表示图片适配控件。 3、清除图片框 Picture1 中通过Line、Circle等方法绘制的图形，可使用语句：________。 【答案】 Picture1.Cls 【解析】Cls方法仅清空绘图内容，无法清空Picture属性加载的图片；清空加载的图片需LoadPicture("")。 4、在图片框 Picture1 中绘制一个以 (300,300) 为圆心、半径为 200 twip 的圆形，语句为：________。 【答案】 Picture1.Circle(300,300), 200 【解析】Circle 是图片框的绘图方法，绘制圆形的核心语法为 [控件名.]Circle (圆心坐标), 半径，图像框无此方法。 5、图片框 Picture1 的AutoSize属性默认值为________，此时加载超出控件尺寸的图片，图片________（填 “完整显示” 或 “部分被裁剪”）。 【答案】False ；部分被裁剪 【解析】AutoSize默认值为 False，图片框保持原有大小，图片超出控件边界的部分会被裁剪；设置为 True 时，图片框自动放大适配图片，图片完整显示。 三、程序填空题 1.窗体中有图片框和计时器两个控件。完成下列事件代码过程，使运行程序时，将指定图片加载到图片框里，然后图片框以每 2 秒钟一次的速度向窗体的右下角移动：每次向右移动 100 个 twip，同时向下移动 100 个 twip。 Private Sub Form_Load() Picture1.Picture = ___ (1)___ ("c:\white.bmp") Timer1.Interval = ___ (2)___ End Sub Private Sub Timer1_Timer() Picture1.Move ___ (3)___,___ (4)___ End Sub 【答案】 （1）LoadPicture （2）2000 （3）Picture1.Left+100 （4）Picture1.Top+100 【解析】LoadPicture(图片文件路径)，若路径为空（LoadPicture("")），则清空图片框中的图片。Timer 控件的 Interval 属性，单位：毫秒（1 秒 = 1000 毫秒），因此 2 秒对应 2000。 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 $