Question

vb中scale的用法是什么？

Answer 1

Scale 方法 \x0d\x0a\x0d\x0a用以定义 Form、PictureBox 或 Printer 的坐标系统。不支持命名参数。 \x0d\x0a\x0d\x0a语法 \x0d\x0a\x0d\x0aobject.Scale (x1, y1) - (x2, y2) \x0d\x0a\x0d\x0aScale 方法的语法包含下列部分： \x0d\x0a\x0d\x0a部分 描述 \x0d\x0a\x0d\x0aobject 可选的。一个对象表达式，其值为“应用于”列表中的一个对象。如果省略 object，则带有焦点的 Form 对象缺省为 object。 \x0d\x0a\x0d\x0ax1, y1 可选的。均为单精度值，指示定义 object 左上角的水平（x-轴）和垂直（y-轴）坐标。这些值必须用括号括起。如果省略，则第二组坐标也必须省略。 \x0d\x0a\x0d\x0ax2, y2 可选的。均为单精度值，指示定义 object 右下角的水平和垂直坐标。这些值必须用括号括起。如果省略，则第一组坐标也必须省略。 \x0d\x0a\x0d\x0a说明 \x0d\x0a\x0d\x0aScale 方法使您能够将坐标系统重置到所选择的任意刻度。Scale 对运行时的图形语句以及控件位置的坐标系统都有影响。 \x0d\x0a\x0d\x0a如果使用不带参数的 Scale（两组坐标都省略），坐标系统将重置为缇。 \x0d\x0a\x0d\x0a这个可以自定义坐标系统，你看看下边的代码： \x0d\x0a\x0d\x0aPrivate Sub Form_Load() \x0d\x0aMe.AutoRedraw = True \x0d\x0aEnd Sub \x0d\x0a\x0d\x0aPrivate Sub Form_Resize() \x0d\x0aMe.Scale (-100, -100)-(100, 100) \x0d\x0aMe.Circle (0, 0), 15, RGB(255, 0, 0) \x0d\x0aMe.Circle (30, 30), 15, RGB(0, 0, 255) \x0d\x0a\x0d\x0aMe.Scale (100, 100)-(-100, -100) \x0d\x0aMe.Circle (30, 30), 15, RGB(255, 0, 255) \x0d\x0aMe.Circle (60, 60), 15, RGB(0, 128, 0) \x0d\x0aEnd Sub