登录  
 加关注
查看详情
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

miaozk2006

点滴积累与收藏:关于技术,关于生活

 
 
 

日志

 
 

VB 画坐标轴  

2012-05-14 19:15:37|  分类: 编程-VB |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
网摘收藏
1窗体中画坐标轴举例

Private Sub Form_Click()
    Dim x!, y!, i%
    Form1.Scale (-9, 9)-(9, -9)
    Form1.Line (-8, 0)-(8, 0)
    Form1.Line (0, 8)-(0, -8)
    CurrentX = 7
    CurrentY = 1.3
    Print "X"
    CurrentX = 0.2
    CurrentY = 7.3
    Print "Y"

    For i = -7 To 7      'X轴坐标
        Line (i, 0)-(i, 0.3)
        CurrentX = i - 0.2
        CurrentY = -0.1
        Print i
    Next i

    For i = -7 To 7    'Y轴坐标
        Line (0, i)-(0.3, i)
        CurrentX = -0.5
        CurrentY = i - 0.2
        Print i
    Next i

    For x = -2 To 4 Step 0.001
        y = x ^ 2 - 2 * x + 1
        PSet (x, y)
    Next x

End Sub

2picturebox中画坐标轴举例
Private Sub Form_Click()
    normaStep = 100
    Picture1.Scale (-normaStep, normaStep)-(normaStep, -normaStep)
    Picture1.Line (-normaStep, 0)-(normaStep, 0), vbBlue
    Picture1.Line (0, -normaStep)-(0, normaStep), vbBlue
    Picture1.CurrentX = 0
    Picture1.CurrentY = 0
End Sub
    在vb中如果牵涉到绘图输出,或者其他关注输入位置的操作需要了解它的坐标系统,这样我们才能够自由地确定目标的位置和大小。比如在游戏中,我们要确定一个攻击的精确目标,就需要确定一个当时状态下的位置和目标大小。在VB和VC中它们的坐标系统都是基于客户区的,也就是说,对于一个窗体来说,他们的边框是不被计算在内的,左上角是其默认的坐标原点,向右为正,向下为正。在VB中,默认的长度单位是TWIP,它是微软公司自定的一个标准,1 TWIP=1/1440英寸。拿窗体来说,如果我们要改变坐标系,也就是要改变坐标系的原点,和X,Y,的正方向。那么vb中scalemode决定了坐标系的单位和是否是自定义坐标系。设定为0时为自定义坐标系,只需要按照新的坐标系重新确定内定的原定的坐标就可以了。我们使用的绘图函数中的坐标的单位都是由绘图函数所在的控件中的单位设置来进行的。在默认坐标系中,ScaleLeft代表窗体左上角的x坐标,ScaleTop代表了左上角的y坐标,ScaleWidth为窗体在x方向上的长度,ScaleHeight为在y方向上的长度,上面说的四个值都可以为负。 窗体右下角的x坐标=ScaleWidth+ScaleLeft;窗体右下角y坐标=ScaleHeight+ScaleTop。这两个公式在自定义的任何坐标系中均成立。

   此外,我们可以使用窗体的scale方法来改变坐标系,格式为对象.scale (左上角x坐标,左上角y坐标),(右下角x坐标,右下角y坐标)其中的左上角坐标,右下角坐标均为新坐标系下的坐标值。

 


可能兴趣的推荐


VB 获取鼠标坐标

VB 画坐标轴

VB的坐标系统综述



VB相关


vbline的用法[]

画图工具的VB实现

VB 一个获得自己外网 IP 地址的程序代码

VB程序中实现IP地址子网掩码网关DNS的更改  []

VB 中应用 FSO 对象模型介绍(摘自网络)

[] VbFSO 对象的介绍

VB 画坐标轴

VB 二进制文件的操作

[VB]BMPJPGVBKeyCode常数用法

vb实时曲线的绘制和保存

VB操作EXCEL

vb初学回顾:最大公约数 最小公倍数 素数求取

vb 关于窗口样式的API以及处理文本的API参考

【引用】在VB6.0中实现弹出式菜单的几种方法

【引用】URLDownloadToFile_VB下载文件!

利用WinRar压缩和解压缩文件

VB 剪切板

VB实现指示窗口中拖动方框的程序

VB绘制走动的表针

如何用VB制作DLL文件

【引用】VB修改IP地址

VB多窗体退出代码

[]VB:如何检测到U盘的插拔(源代码)

巧用SendMessage函数扩展Treeview功能

vb中如何在任务管理器里面隐藏应用程序进程

如何实现VBEXCEL的无缝连接

一个API方式存取日志文件的模块[VB]

VB用记录集填充表格函数

VB打开文本文件各种方法

vb ClipBoard 剪切板应用(复制剪切粘贴)

【引用】窗口处理技巧大全 vb(窗体控件)

【转】 Md rd命令之VB

vb:读写文本文件

vb中实现真正锁定的带自定义菜单的文本控件

【引用】使用CommonDialogShowSave后如何判断是保存还是取消?

vb 关于commondialog的多选VB获取Windows操作系统所有版本

vb UTF文本文件访问

VB编程中的Unicode vs Ansi

VBPiView4注册机

VB获取超过2G文件的大小

CopyMemory还要快的函数SuperCopyMemory

VB:编程效率快步提高之:十七种可用一行代码完成的技巧

VB画出来的五星红旗

Qt第一印象——QteQt  


更多精彩>>>
  评论这张
 
阅读(1433)| 评论(0)

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2018