项目十二 Visual Basic图形设计《Visual Basic程序设计》（电工版第六版）章节过关卷

《Visual Basic程序设计（第6版)》电子工业出版社 项目十二 Visual Basic图形设计 考试时间：90分钟 满分：100分 姓名 班级 学号 1、 单项选择题（本题共20小题，每题3分，共60分） 1. 以下属性和方法中，可重定义坐标系的是( ) A.Drawstyle属性 B.DrawWidth属性 C.Scale方法 D.ScaleMode属性 【答案】C 【解析】Scale 方法用于对坐标系统进行缩放变换。 2.通过设置Shape控件的( )属性可以绘制多种形状的图形。 A.Shape B.BorderStyle C.FillStyle D.Style 【答案】A 【解析】Shape属性专门用于设置 Shape 控件的图形形状，取值 0-5 对应矩形、正方形、圆形等 6 种基础形状。 3.若要在图片框中绘制一个圆，使用的方法是（ ）。 A.Circle B.line C.point D.pset 【答案】A 【解析】Circle是 VB 中专门用于绘制圆形、椭圆、扇形、圆弧的核心方法。 4.下列属性用于决定“点划线”样式的是（ ） A. DrawMode B. DrawStyle C. FillStyle D. BorderStyle 【答案】B 【解析】DrawStyle 通常用于控制绘制样式，包括线条的点划线等样式。 5.关于Shape控件说法错误的是（ ） A.Shape控件可以画出6种不同图形 B.Shape控件形状通过Shape属性设置 C.对Shape控件的FillColor设置颜色后，效果是对控件进行实心填充 D.Shape控件画出的图形用Circle方法不一定能画出 【答案】C 【解析】FillColor 只是指定“填充颜色”，真正决定填充样式的是 FillStyle 属性。 6、CLS方法可以清除窗体或图片框中的（ ） A.设计时放置的控件 B.运行时候所产生的图形和文字 C.设计时在Picture中所加载的背景图案 D.所有内容 【答案】B 【解析】Cls 方法只清除运行时由图形方法产生的文本和图形。 7、下列语句中，能画出一条从 (0,0) 到 (1000,1000) 红色直线的是（ ） A. Line 0,0-1000,1000, vbRed B. Line (0,0)-(1000,1000), vbRed C. Line (0,0)-(1000,1000),, vbRed D. Line 0-0,1000-1000, vbRed 【答案】B 【解析】Line 语法为 Line (x1,y1)-(x2,y2)[,颜色]。 8、使用 PSet 画点并把点颜色设为绿色，应使用语句（ ） A. PSet (x,y), vbGreen B. PSet x,y,vbGreen C. PSet (x,y),,vbGreen D. PSet Step(x,y),vbGreen 【答案】A 【解析】点的坐标用括号写成 PSet (x, y)，颜色值放在逗号后面。 9、执行VB指令“Circle（1000，1000），500，8，-6，-3”后，将绘制（ ）。 A.圆孤 B.椭圆 C.圆孤 D.扇形 【答案】D 【解析】负号表示要把弧的两个端点与圆心相连。 10、如果在图片框上使用绘图方法绘制一个圆，则图片框的（ ）属性不会对该圆的外观产生影响。 A.BackColor B.ForeColor C.DrawWidth D.DrawStyle 【答案】A 【解析】BackColor 只决定图片框的“背景色”。 11、设 FillStyle=0，FillColor=vbRed，下列语句可画红色实心矩形的是（ ） A. Line (100,100)-(500,500), vbRed B. Line (100,100)-(500,500),, B C. Line (100,100)-(500,500), vbRed, BF D. Line (100,100)-(500,500), B 【答案】C 【解析】, BF 表示填充矩形，且受 FillStyle/FillColor 影响。 12、下列关于 DrawWidth 属性的叙述，错误的是（ ） A. 默认值为 1 B. 值越大线条越粗 C. 对 PSet 画点大小无影响 D. 设置后影响后续 Line、Circle 线条粗细 【答案】 C 【解析】DrawWidth 同时决定 PSet 画出的点大小。 13、当对DrawWidth进行设置后将影响( ) A.Line、Circle 、Pset方法 B.Line、Shape控件 C.Line、Circle、Point方法 D.Line、Circle、Pset方法和Line、Shape控件 【答案】A 【解析】DrawWidth 只影响运行时绘图方法，即 Line、Circle、Pset 等画出的线条粗细。 14、若要在 Picture1 上画一个扇形，起始角 0°、终止角 60°（角度制），正确写法是（ ） A. Circle (1000,1000),500,vbRed,0,60 B. Circle (1000,1000),500,vbRed,0,3.1416/3 C. Circle (1000,1000),500,,0,60 D. Circle (1000,1000),500,vbRed,60,0 【答案】B 【解析】起始角和终止角必须用弧度，而非角度制，180°=π（≈3.1416）弧度 → 60°=π/3 ≈ 3.1416/3 弧度。 15、语句 PSet Step(100,100), vbRed 中 Step 的作用是（ ） A. 把颜色设为红色 B. 使用相对坐标 (CurrentX+100, CurrentY+100) C. 画一个半径 100 的红点 D. 画 100 个像素 【答案】B 【解析】Step 表示“相对于当前位置”。 16、下列关于 Circle 画圆弧的说法正确的是（ ） A. 角度单位是度，范围 0~360 B. 起始角、终止角必须用弧度，正值逆时针 C. 终止角小于起始角时自动加 2π D. 必须同时提供颜色参数才能画弧 【答案】B 【解析】这是 VB 对Circle语句的内置规则：当终止角 < 起始角时，系统自动给终止角补 2π，保证圆弧能正常绘制（比如起始角 π、终止角 π/2，会转为终止角 =π/2+2π=5π/2。 17、若想画一个“红色、水平线填充”的矩形，应设置（ ） A. FillColor = vbRed : FillStyle = 2 B. FillColor = vbRed : FillStyle = 0 C. DrawColor = vbRed : DrawStyle = 2 D. BackColor = vbRed : FillStyle = 2 【答案】A 【解析】在 VB 的填充设置中，FillColor 指定填充颜色，FillStyle 指定填充样式。其中 FillStyle=2 对应水平线填充，因此将 FillColor 设置为 vbRed、FillStyle 设置为 2，即可得到红色、水平线填充的矩形。 18、语句 Line -Step(100,0), vbBlue 的功能是（ ） A. 从原点画一条长 100 的蓝色水平线 B. 从 CurrentX,CurrentY 向右画 100 像素蓝色水平线 C. 画一个蓝色点 D. 报错，缺少起点坐标 【答案】B 【解析】Line -Step(100,0), vbBlue 表示从当前位置（CurrentX, CurrentY）出发，向右移动 100 个像素绘制一条蓝色的水平线。 19、VB 中绘制圆形的核心语句是Circle，以下Circle语句格式正确的是（ ）。 A. Circle 1000, 500, 300, vbBlue （圆心 x, 圆心 y, 半径，颜色） B. Circle (1000,500), 300, vbRed （(圆心坐标), 半径，颜色） C. Circle (800,800), vbGreen, 400 （(圆心坐标), 颜色，半径） D. Circle 500, (800,800), vbBlack （半径，(圆心坐标), 颜色） 【答案】B 【解析】Circle绘制圆形的关键规则：圆心坐标必须用括号包裹：(X,Y)；参数顺序固定：圆心 → 半径 → 颜色。 20、使用 Circle 画椭圆时，需额外提供的参数是（ ） A. 起始角、终止角 B. 纵横比（aspect） C. 填充样式 D. 线宽 【答案】 B 【解析】Circle 语法最后可带 aspect 参数控制高宽比，默认值 1.0 为圆。 2、 填空题（本题共10小题，每题2分，共20分） 1. 在 VB 中，绘制直线的核心语句是__________，其基本格式中(x1,y1)-(x2,y2)里，(x1,y1)表示直线的__________，(x2,y2)表示直线的__________。 【答案】Line、起点坐标、终点坐标 【解析】Line是画直线的专属语句，可扩展绘制矩形（加参数 B）、填充矩形（加参数 BF）。 2、VB 中绘制圆形 / 椭圆的核心语句是__________。 【答案】Circle 【解析】Circle 语句扩展可画椭圆（指定纵横半径比）。 3、 使用________方法可在图片框中进行文本的输出，用________方法可画点。 【答案】print； Pset 【解析】在 PictureBox 的指定坐标位置绘制单个像素点，可指定点的颜色。 4、在VB中，当坐标系确定后，如果坐标值前加上关键字Step，则坐标值（X，Y）表示对象上的_________坐标。 【答案】相对 【解析】Step：坐标（X,Y）是相对坐标，表示 “相对于当前位置的偏移量”——X 是水平方向偏移值（正右负左），Y 是垂直方向偏移值（正下负上），而非固定位置。 5、VB 中控制绘图线条宽度的属性是__________，单位为__________。 【答案】DrawWidth；像素 【解析】DrawWidth 越大线条越粗。 6、VB 中 Circle 语句绘制扇形时，需额外指定__________和__________两个参数 【答案】起始角、终止角 【解析】Circle (cx,cy), r, color, 起始角，终止角。 7、在 VB 图片框中输出文本的核心方法是__________，设置文本输出起始位置的属性是__________和__________。 【答案】Print、CurrentX、CurrentY 【解析】CurrentX控制水平起始坐标，CurrentY控制垂直起始坐标，二者共同决定文本输出位置。 8、VB 中通过__________函数可自定义绘图颜色，其语法为该函数 (红，绿，蓝)，参数取值范围均为__________。 【答案】RGB；0~255 【解析】RGB 函数通过三原色数值调配颜色，如RGB(255,0,0)等价于vbRed，参数 0 为无该颜色，255 为该颜色最大值。 9、VB 中绘制填充图形时，若FillStyle属性值为__________表示透明填充，不填充，该属性需配合__________属性设置填充颜色才生效。 【答案】1； FillColor 【解析】FillStyle默认值为 1（透明），设为 0（实心）时，FillColor的颜色才会填充到图形内部。 10、VB 中Line语句绘制带圆角的矩形时，需在B参数后追加__________参数，并指定圆角的宽度和高度；绘制从起点到终点的矩形边框，参数组合为__________。 【答案】F；B 【解析】Line (x1,y1)-(x2,y2),, BF（填充圆角矩形），Line (x1,y1)-(x2,y2),, B（仅圆角边框），F 需配合 B 使用。 3、 程序填空题（本题共2小题，每题10分，共20分） 1、 下列VB程序实现的功能是：在窗体上绘制一条从坐标 (1000, 1000) 到 (3000, 2000) 的红色直线，请补全代码。 Private Sub Form_Click() Form1.ForeColor = vbRed Line ___________ End Sub 【答案】(1000, 1000) - (3000, 2000) 【解析】ForeColor是窗体 / 控件的前景色属性，控制绘图（Line/Circle 等）的颜色；Line (x1,y1)-(x2,y2)是画直线的核心语句，(x1,y1)为起点，(x2,y2)为终点。 2、 下列VB程序实现的功能是：在窗体中心绘制一个半径为 1000 的蓝色圆形，请补全代码。 Private Sub Form_Load() Form1.AutoRedraw = True Dim cx As Single, cy As Single cx = Form1.ScaleWidth / 2 cy = Form1.ScaleHeight / 2 Circle___________ End Sub 【答案】(cx, cy), 1000, vbBlue 【解析】Circle (cx, cy), r, color是画圆的核心语句，(cx, cy)为圆心，r为半径，color为颜色。 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $ 《Visual Basic程序设计（第6版)》电子工业出版社 项目十二 Visual Basic图形设计 考试时间：90分钟 满分：100分 姓名 班级 学号 1、 单项选择题（本题共20小题，每题3分，共60分） 1. 以下属性和方法中，可重定义坐标系的是( ) A.Drawstyle属性 B.DrawWidth属性 C.Scale方法 D.ScaleMode属性 2.通过设置Shape控件的( )属性可以绘制多种形状的图形。 A.Shape B.BorderStyle C.FillStyle D.Style 3.若要在图片框中绘制一个圆，使用的方法是（ ）。 A.Circle B.line C.point D.pset 4.下列属性用于决定“点划线”样式的是（ ） A. DrawMode B. DrawStyle C. FillStyle D. BorderStyle 5.关于Shape控件说法错误的是（ ） A.Shape控件可以画出6种不同图形 B.Shape控件形状通过Shape属性设置 C.对Shape控件的FillColor设置颜色后，效果是对控件进行实心填充 D.Shape控件画出的图形用Circle方法不一定能画出 6、CLS方法可以清除窗体或图片框中的（ ） A.设计时放置的控件 B.运行时候所产生的图形和文字 C.设计时在Picture中所加载的背景图案 D.所有内容 7、下列语句中，能画出一条从 (0,0) 到 (1000,1000) 红色直线的是（ ） A. Line 0,0-1000,1000, vbRed B. Line (0,0)-(1000,1000), vbRed C. Line (0,0)-(1000,1000),, vbRed D. Line 0-0,1000-1000, vbRed 8、使用 PSet 画点并把点颜色设为绿色，应使用语句（ ） A. PSet (x,y), vbGreen B. PSet x,y,vbGreen C. PSet (x,y),,vbGreen D. PSet Step(x,y),vbGreen 9、执行VB指令“Circle（1000，1000），500，8，-6，-3”后，将绘制（ ）。 A.圆孤 B.椭圆 C.圆孤 D.扇形 10、如果在图片框上使用绘图方法绘制一个圆，则图片框的（ ）属性不会对该圆的外观产生影响。 A.BackColor B.ForeColor C.DrawWidth D.DrawStyle 11、设 FillStyle=0，FillColor=vbRed，下列语句可画红色实心矩形的是（ ） A. Line (100,100)-(500,500), vbRed B. Line (100,100)-(500,500),, B C. Line (100,100)-(500,500), vbRed, BF D. Line (100,100)-(500,500), B 12、下列关于 DrawWidth 属性的叙述，错误的是（ ） A. 默认值为 1 B. 值越大线条越粗 C. 对 PSet 画点大小无影响 D. 设置后影响后续 Line、Circle 线条粗细 13、当对DrawWidth进行设置后将影响( ) A.Line、Circle 、Pset方法 B.Line、Shape控件 C.Line、Circle、Point方法 D.Line、Circle、Pset方法和Line、Shape控件 14、若要在 Picture1 上画一个扇形，起始角 0°、终止角 60°（角度制），正确写法是（ ） A. Circle (1000,1000),500,vbRed,0,60 B. Circle (1000,1000),500,vbRed,0,3.1416/3 C. Circle (1000,1000),500,,0,60 D. Circle (1000,1000),500,vbRed,60,0 15、语句 PSet Step(100,100), vbRed 中 Step 的作用是（ ） A. 把颜色设为红色 B. 使用相对坐标 (CurrentX+100, CurrentY+100) C. 画一个半径 100 的红点 D. 画 100 个像素 16、下列关于 Circle 画圆弧的说法正确的是（ ） A. 角度单位是度，范围 0~360 B. 起始角、终止角必须用弧度，正值逆时针 C. 终止角小于起始角时自动加 2π D. 必须同时提供颜色参数才能画弧 17、若想画一个“红色、水平线填充”的矩形，应设置（ ） A. FillColor = vbRed : FillStyle = 2 B. FillColor = vbRed : FillStyle = 0 C. DrawColor = vbRed : DrawStyle = 2 D. BackColor = vbRed : FillStyle = 2 18、语句 Line -Step(100,0), vbBlue 的功能是（ ） A. 从原点画一条长 100 的蓝色水平线 B. 从 CurrentX,CurrentY 向右画 100 像素蓝色水平线 C. 画一个蓝色点 D. 报错，缺少起点坐标 19、VB 中绘制圆形的核心语句是Circle，以下Circle语句格式正确的是（ ）。 A. Circle 1000, 500, 300, vbBlue （圆心 x, 圆心 y, 半径，颜色） B. Circle (1000,500), 300, vbRed （(圆心坐标), 半径，颜色） C. Circle (800,800), vbGreen, 400 （(圆心坐标), 颜色，半径） D. Circle 500, (800,800), vbBlack （半径，(圆心坐标), 颜色） 20、使用 Circle 画椭圆时，需额外提供的参数是（ ） A. 起始角、终止角 B. 纵横比（aspect） C. 填充样式 D. 线宽 2、 填空题（本题共10小题，每题2分，共20分） 1. 在 VB 中，绘制直线的核心语句是__________，其基本格式中(x1,y1)-(x2,y2)里，(x1,y1)表示直线的__________，(x2,y2)表示直线的__________。 2、VB 中绘制圆形 / 椭圆的核心语句是__________。 3、 使用________方法可在图片框中进行文本的输出，用________方法可画点。 4、在VB中，当坐标系确定后，如果坐标值前加上关键字Step，则坐标值（X，Y）表示对象上的_________坐标。 5、VB 中控制绘图线条宽度的属性是__________，单位为__________。 6、VB 中 Circle 语句绘制扇形时，需额外指定__________和__________两个参数 7、在 VB 图片框中输出文本的核心方法是__________，设置文本输出起始位置的属性是__________和__________。 8、VB 中通过__________函数可自定义绘图颜色，其语法为该函数 (红，绿，蓝)，参数取值范围均为__________。 9、VB 中绘制填充图形时，若FillStyle属性值为__________表示透明填充，不填充，该属性需配合__________属性设置填充颜色才生效。 10、VB 中Line语句绘制带圆角的矩形时，需在B参数后追加__________参数，并指定圆角的宽度和高度；绘制从起点到终点的矩形边框，参数组合为__________。 3、 程序填空题（本题共2小题，每题10分，共20分） 1、 下列VB程序实现的功能是：在窗体上绘制一条从坐标 (1000, 1000) 到 (3000, 2000) 的红色直线，请补全代码。 Private Sub Form_Click() Form1.ForeColor = vbRed Line ___________ End Sub 2、 下列VB程序实现的功能是：在窗体中心绘制一个半径为 1000 的蓝色圆形，请补全代码。 Private Sub Form_Load() Form1.AutoRedraw = True Dim cx As Single, cy As Single cx = Form1.ScaleWidth / 2 cy = Form1.ScaleHeight / 2 Circle___________ End Sub 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $