vb.netscale的简单介绍

VB中scale函数怎么找

VB中的Scale它不是函数,所以找不到vb中的所谓Scale函数;

成都创新互联公司是一家专注于做网站、成都网站设计与策划设计,邵阳网站建设哪家好?成都创新互联公司做网站,专注于网站建设10余年,网设计领域的专业建站公司;建站业务涵盖:邵阳等地区。邵阳做网站价格咨询:18982081108

VB中的Scale是某个相关“对象的方法”,下面详述vb中Scale的用法:

Scale 方法

用以定义 Form、PictureBox 或 Printer 的坐标系统。不支持命名参数。

语法

object.Scale (x1, y1) - (x2, y2)

Scale 方法的语法包含下列部分:

部分 描述

object 可选的。一个对象表达式,其值为“应用于”列表中的一个对象。如果省略 object,则带有焦点的 Form 对象缺省为 object。

x1, y1 可选的。均为单精度值,指示定义 object 左上角的水平(x-轴)和垂直(y-轴)坐标。这些值必须用括号括起。如果省略,则第二组坐标也必须省略。

x2, y2 可选的。均为单精度值,指示定义 object 右下角的水平和垂直坐标。这些值必须用括号括起。如果省略,则第一组坐标也必须省略。

说明

Scale 方法使您能够将坐标系统重置到所选择的任意刻度。Scale 对运行时的图形语句以及控件位置的坐标系统都有影响。

如果使用不带参数的 Scale(两组坐标都省略),坐标系统将重置为缇。

这个可以自定义坐标系统,你看看下边的代码:

Private Sub Form_Load()

Me.AutoRedraw = True

End Sub

Private Sub Form_Resize()

Me.Scale (-100, -100)-(100, 100)

Me.Circle (0, 0), 15, RGB(255, 0, 0)

Me.Circle (30, 30), 15, RGB(0, 0, 255)

Me.Scale (100, 100)-(-100, -100)

Me.Circle (30, 30), 15, RGB(255, 0, 255)

Me.Circle (60, 60), 15, RGB(0, 128, 0)

End Sub

VB.NET坐标变换

Dim g As Graphics = PictureBox1.CreateGraphics

g.TranslateTransform(2, 2) ‘定义原点坐标

g.ScaleTransform(1, -1) ’X轴不变,反转Y轴

以PictureBox1中(2,2)点为新的原点(0,0)

向右为X轴正方向 向上为Y轴正方向

vb.net怎么自定义坐标系

scale(x1,y1)-(x2,y2)

你只要记住,这里的x1,y1是左上角的坐标,x2,y2是右下角的坐标,通过这两个点的坐标设定,就可以决定坐标原点的位置以及坐标轴的方向了,比如

Scale (-300,200)-(300,-200)

以上是把坐标原点设在窗体中心,x轴长600,方向从左到右,y轴长400,方向从下向上。

Scale (800,0)-(0,600)

以上是把坐标原点设在窗体右上角,x轴长800,方向从右到左,y轴长600,方向从上向下。

下面说坐标轴和原点的标示法:

假定自定义坐标设为:

Scale (-300, 200)-(300, -200)

Line (-300, 0)-(300, 0) '画x轴

Line (0, 200)-(0, -200) '画y轴

CurrentX = 290

CurrentY = -5

Print "x" '标示x轴

CurrentX = 5

CurrentY = 200

Print "y" '标示y轴

CurrentX = 5

CurrentY = -5

Print "0" '标示原点

vb.net如何设置窗体内部的大小(除去边框及标题栏部分的大小)

'窗体有个属性ClientSize 是除去边框及标题栏部分的为工作区

'你要的应该就是这个了。

'设置窗体工作区的大小 例为400*300

Me.ClientSize = New Size(400,300)


分享标题:vb.netscale的简单介绍
标题网址:http://myzitong.com/article/dosjdjd.html