坐标系统 武汉职业技术学晚 定义新的坐标系统格式如下: [对象.] Sca leleft=X [对象.] ScallOp=Y 建立起的坐标系统,水平方向、垂直方向的刻度属性分别由 ca lewidth、 ScaleHeight属性来设置,其格式如下: [对象.] Sca leWidth宽度 [对象.] ScaleHeight=高度
8.1 坐标系统 定义新的坐标系统格式如下： [对象.] ScaleLeft＝X [对象.] ScaleTop＝Y 建立起的坐标系统,水平方向、垂直方向的刻度属性分别由 ScaleWidth、ScaleHeight 属性来设置，其格式如下： [对象.] ScaleWidth=宽度 [对象.] ScaleHeight=高度
8.1坐标系统 武汉职业技术学晚 例如:在窗体中建立两个文本框,把它们分别移到窗体的左上角 和右下角并显示其宽度和高度(相对于窗体),如图所示。 orm 106.7308 Text1 Text2 85.91549
8.1 坐标系统 例如：在窗体中建立两个文本框，把它们分别移到窗体的左上角 和右下角并显示其宽度和高度（相对于窗体），如图所示
8.1坐标系统 武汉职业技术学晚 程序如下: S ub Form Cl ick o Sca leleft=100 ScaleTop=100 Scalewidth=300 Scalene i ght=300 Text1. Move 100100 Text1. text=Str$(Text1 Width) Text2 Move 400- Text1 Width, 400-Text1 Height Text2. Text=Str$(Text2. He i ght) End Sub
S ub Form_Click() ScaleLeft=100 ScaleTop=100 ScaleWidth=300 ScaleHeight=300 Text1.Move 100,100 Text1.text=Str$(Text1.Width) Text2.Move 400 – Text1.Width, 400 – Text1.Height Text2.Text=Str$(Text2.Height) End Sub 程序如下： 8.1 坐标系统
8.1坐标系统 武汉职业技术学晚 例8.1将窗体的坐标系统的原点定义在其中心,X轴的 正向向右,Y轴的正向向上,窗体高与宽分别为200和300单 位长度。 通过Sa|eTop, Scaleleft, Scalewidthi和Sca| hEight 属性实现。 s. Fornl 回区 Form1. Scaleleft =-150 (100,-150) Y Form1.Sca1eT。p=100 Form1. ScaleWidth 300 Forml ScaleHeight =-200 (-100,150
8.1 坐标系统 例8.1 将窗体的坐标系统的原点定义在其中心，X轴的 正向向右，Y轴的正向向上，窗体高与宽分别为200和300单 位长度。 通过ScaleTop，ScaleLeft，ScaleWidth和ScaleHeight 属性实现。 Form1.ScaleLeft = -150 Form1.ScaleTop = 100 Form1.ScaleWidth = 300 Form1.ScaleHeight = -200
82形状控件和直线控件 武汉职北技术学恍 8.2.1形状控件 Shape 使用 Shape控件可在窗体、框架或图片框中创建矩形 正方形、椭圆形、圆形、圆角矩形或圆角正方形等图形。 Shape控件预定义形状是由 Shape属性的取值决定的 Form1 0 3 5 Shape属性取不同值对应的形状
8.2 形状控件和直线控件 8.2.1 形状控件Shape 使用Shape控件可在窗体、框架或图片框中创建矩形、 正方形、椭圆形、圆形、圆角矩形或圆角正方形等图形。 Shape控件预定义形状是由Shape属性的取值决定的。 Shape属性取不同值对应的形状