1、参考vb.net的语法,所有.net能做的,foxtable都能实现;比如
If HardWareInfo.Ready = False '如果没有初始化
HardWareInfo.Initialize '初始化HardWareInfo,提取硬件信息
End If
Output.Show("CPU信息")
With HardWareInfo.CPU
Output.Show("制造商:" & .Manufacturer)
Output.Show("品名:" & .Name)
Output.Show("型号:" & .Description)
Output.Show("序列号:" & .ProcessorId)
End With
Output.Show(Chr(13) & Chr(10))
Output.Show("主板信息")
With HardWareInfo.BaseBoard
Output.Show("制造商:" & .Manufacturer)
Output.Show("型号:" & .Product)
Output.Show("序列号:" & .SerialNumber)
End With
Output.Show(Chr(13) & Chr(10))
Output.Show("硬盘信息")
With HardWareInfo.Disk
Output.Show("型号:" & .Model)
Output.Show("序列号:" & .Signature)
End With
Output.Show(Chr(13) & Chr(10))
Output.Show("BIOS信息")
With HardWareInfo.Bios
Output.Show("厂商:" & .Manufacturer)
Output.Show("序列号:" & .SerialNumber)
End With
2、你可以在timertick事件区别出多个计时器,比如
If vars("计时器1") Then
End If
If vars("计时器2") Then
End If
---------------
afterLoad代码写
vars("计时器1") = False
vars("计时器2") = False
e.Form.TimerEnabled = True