十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
获取系统时间用 now()
成都创新互联公司是一家专注于成都网站建设、做网站与策划设计,平阳网站建设哪家好?成都创新互联公司做网站,专注于网站建设十多年,网设计领域的专业建站公司;建站业务涵盖:平阳等地区。平阳做网站价格咨询:13518219792
而后格式化字符串以精确到分钟
string.Format("{0:yyyyMMddHHmm}",now())
2005或者2008版中使用My命名空间(.net 框架快捷)轻松实现。如在2008中,可使用智能感知来插入,如在代码编辑框内 单击右键---插入代码段----基本元素,集合数据类型、文件操作、数学等-----文件 这样就可以快速操作相关文件了
使用wmi
类“Win32_Processor”中LoadPercentage属性为当前的cpu使用率
示例代码: Private Sub Timer1_Timer()
Dim WMI服务 As Object
Dim 对象 As Object
Dim 子对象 As Object
Dim 电脑名 As String
Dim 刷新 As Long
刷新 = 0
电脑名 = "." '表示本地计算机
Set WMI服务 = GetObject("winmgmts://" 电脑名 "/root/cimv2")
Set 对象 = WMI服务.InstancesOf("Win32_Processor")
Me.CurrentX = 0
Me.CurrentY = 0
For Each 子对象 In 对象
If 刷新 = 0 Then
刷新 = 1
Me.Cls
End If
Me.Print 子对象.Name "[" 子对象.CurrentClockSpeed "Hz] 使用率:" _
子对象.LoadPercentage "%"
Next
End Sub