设置窗体的代码解释 Imports System.Diagnostics Public Class 设置窗体 Private shutTime As String '关机时间的字符串 Private IsToday As Boolean = True '判断是否是今天的变量 Private delay As Integer '延时多少秒放关机 Private lastTime As Integer '关机的倒计时 P rivate action As String '关机或重启或注销 Priv
Public Class 控件代码 '全局变量 - TrackBar1 改变图片大小使用 Dim l As Double Dim t As Double #Region "时间控件 标签控件 链接标签控件 日期控件 下拉菜单控件 " '窗体的设置 Private Sub 控件代码_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load '设置时间控件启用 Timer1.Enable