包含vbnet时钟的词条( 二 )


Dim count As Integer = 1
Dim a As Double
For a = 0 To 2 * Math.PI Step 2 * Math.PI / 12
Dim x As Double = (ClockRectangle.Width - 70) / 2 * Math.Cos(a - Math.PI / 3) + (ClockRectangle.Width - 70) / 2 + 25
Dim y As Double = (ClockRectangle.Width - 70) / 2 * Math.Sin(a - Math.PI / 3) + (ClockRectangle.Width - 70) / 2 + 20
g.DrawString(Convert.ToString(count), ClockFont, Brushes.Black, CType(x, Single), CType(y, Single), New StringFormat())
count += 1
Next
End Sub
最后是窗体文件(Form1.vb):
Public Class Form1
Inherits System.Windows.Forms.Form
Private MyMinuteHand As MinuteHand
Private MyHourHand As HourHand
Private MySecondHand As SecondHand
Private TheClockFace As ClockFace
Private FirstTick As Boolean = False
‘在窗体的OnPaint事件中取得Graphics对象
Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs)
If (FirstTick = False) Then Exit Sub
Dim g As Graphics = e.Graphics
TheClockFace.Draw(g)
MyHourHand.Draw(g)
MyMinuteHand.Draw(g)
MySecondHand.Draw(g)
TheClockFace.DrawPin(g)
End Sub
‘计时器事件
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
MySecondHand.Transform(DateTime.Now)
MyHourHand.Transform(DateTime.Now)
MyMinuteHand.Transform(DateTime.Now)
FirstTick = True
Invalidate()
怎样用vb.net作一个指针转动的钟表?(可设置时间日期,有闹铃功能)vbnet时钟你需要会用GDI+,也就是那个System.Drawing命名空间下vbnet时钟的类.
给你说个思路,设Timer,到时间就用Form.Invalidate()函数重画窗口,在重画窗口的Form_Paint事件下面编写代码得到当前时间,再根据当前时间用GDI+画时钟.
vbnet中怎样把时间设为24时制将时间转换为指定的字符串格式用vbnet时钟:Now.ToString("yyyyMMddHHmmss")就Okvbnet时钟了 。
例如:年份用小写yyyy(大写不识别)vbnet时钟,大写MM识别为月份 , 小写mm识别为分钟,日期天为大写DD(小写不识别) , 
小时大写HH识别为24小时制,小写hh识别为12小时制,秒用小写ss(大写不识别)
补充:Visual Basic.NET是基于微软.NET Framework之上的面向对象的编程语言 。
其在调试时是以解释型语言方式运作,而输出为EXE程序是是以编译型语言方式运作 。
可以看作是Visual Basic在.Net Framework平台上的升级版本,增强vbnet时钟了对面向对象的支持 。大多的VB.Net程序员使用Visual Studio .Net作为IDE(integrated development environment).SharpDevelop是另一种可用的开源的IDE 。
VB.Net需要在.Net Framework平台上才能执行 。
如何用VB制作个多功能时钟1、
显示时间
2、语音报时
3、定时报警
4、定时关机
同时我还将在文章中穿插介绍VB提供的绘图方法以及一些实用技巧,下面我们就开始吧 。
阅读导航
一、如何显示时间
(1)
VB时间日期函数介绍
(2)
建立实例
(3)
VB绘图方法介绍
1、Line方法
2、Circle方法
3、Pset方法
4、三角函数
二、实现语音报时
(1)
使用MCI控件
(2)
相关API函数介绍
(1)
GetLocalTime()
(2)
SYSTEMTIME结构
(3)
mciExecute()
(4)
mciSendString()
三、实现定时关机和定时报警
【包含vbnet时钟的词条】关于vbnet时钟和的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。

推荐阅读