Public Sub drawDotAt35Minutes(ByVal onObj As PictureBox, ByVal e As Windows.Forms.PaintEventArgs)
Const clockInset As Integer = 100 ' distance from clock edge to box edge
Const dotRadius As Integer = 15 ' size of the dot
Dim smallDim As Integer ' smaller of width and height of box
Dim clockRadius As Integer ' radius of the clock
Dim centerX As Integer ' x for center of the clock
Dim centerY As Integer ' y for center of the clock
Dim x As Integer ' x position of dot
Dim y As Integer ' y position of dot
Dim brush As New SolidBrush(Color.Blue) 'brush
Dim brush1 As New SolidBrush(Color.Black)
' calculate the center of the clock and its radius so it fits in the box
centerX = onObj.Width / 2
centerY = onObj.Height / 2
smallDim = onObj.Width
If (onObj.Height < smallDim) Then
smallDim = onObj.Height
End If
clockRadius = smallDim / 2 - clockInset
' calculate the position of the dot
x = centerX 'clockX(35, clockRadius - dotRadius)
y = centerY + 0 ' clockY(35, clockRadius - dotRadius)
' draw a filled black circle
e.Graphics.FillEllipse(brush1, x, y, dotRadius, dotRadius)
e.Graphics.FillRectangle(brush, x, y + 20, dotRadius, dotRadius)
End Sub
用于在picturesBox 里面画图的方法~~
Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint
drawDotAt35Minutes(PictureBox1, e)
End Sub
用于在form加载时,加载方法 drawDotAt35 Minutes。
更多画图参考:
http://www.host01.com/article/Net/00020005/056151545005180.htm
Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs)
另外一种画图的方法。。
对于直线,参数的含义发生了变化~~
直线:第一个是代表画笔,后面依次是x1,y1(起点坐标),X2,Y2(终点坐标)
其他图形:x1,y1 决定了中心位置,
X2,Y2 ,相当于radius
分享到:
相关推荐
比较好用的电子教鞭,可以不锁定屏幕情况下画图。
海龟画图-凯蒂猫-python代码
如何使用pandas解析数据并存储,再利用matplotlib画图------data1.csv
海龟画图-机器猫-python代码
python mat 画图-樱花树
在这个“Unity 画图-画板-画笔”项目中,我们可以看到开发者正在构建一个在Unity环境中实现的绘画应用。这个应用可能允许用户在3D空间内绘制,或者创建一个2D画布作为游戏的一部分,为用户提供创意性的互动体验。 ...
地震数据剖面画图-Matlab程序
【国家自然科学基金】-画图-基金支持热词逐年推荐-【万方软件创新助手】-20140801.pdf
《LOGO海龟画图-易语言》是一个基于易语言编程环境的图形绘制程序,它利用了LOGO语言的核心概念,让初学者和爱好者能够通过简单的指令实现复杂的图形创作。LOGO海龟画图工具使用易语言编写,提供了一个直观且用户...
JavaScript应用实例-n阶贝塞尔曲线画图-2.js
第21章__用JS来画图-VML.ppt 很有用处!
本主题“dino用OpenGL描点画图-恐龙”聚焦于如何使用OpenGL来绘制恐龙的形象,这是一个常见的学习实践项目,旨在帮助初学者理解和掌握基本的图形绘制技巧。 在OpenGL中,描点和画线是最基础的绘图操作。描点...
可以用matlab来手动画图,而且可以画任意多条的平滑曲线,有问题登录我的博客:http://hi.baidu.com/pengjun
"python画图-21-列表删除数据.ev4.mp4"这个视频教程很可能是通过实例演示了如何在Python中删除列表中的数据并结合可视化来展示这一过程。 首先,Python提供了多种方法来删除列表中的数据: 1. **pop()** 方法:此...
本项目“HTML5画图-页面时钟和圣诞树”正是利用了这一特性,旨在展示如何在网页上创建动态交互的时钟以及节日氛围的圣诞树。 首先,Canvas是一个二维绘图上下文,通过JavaScript来控制其内容的绘制。在`js时钟.htm`...
中文海龟画图-2.0.7.7正式上线了 增加了启动动画,修复了一些bug,删除了"语法错误"和"命令执行"提示,设置了终端大小,操作变得更友好了。 制作者:炸图监管者 邮箱:1323738778@qq.com
非常系统的delphi绘图小例子,特别适合用来学习原理使用,方便自己在项目中的使用
这个名为“python画图-使用Python+turtle实现的一些有趣的画图小项目”的压缩包文件,显然包含了多个使用turtle模块创作的图形化项目。 turtle模块源自早期的LOGO编程语言,它的核心功能是通过控制一个虚拟的“海龟...
1、启动画图程序 在Windows系统中,启动画图程序的步骤如下: 1) 首先,找到电脑屏幕左下角的“开始”按钮,单击它。 2) 在弹出的菜单中,选择“所有程序”选项。 3) 在“所有程序”的列表中找到“附件”文件夹并...
浮雕纪念章的3D画图-FreeFormModelingPlus软件教程分享.pdf