扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
应该是需要在Form2上做一个事件，只要在Form2里成功修改了数据库中Machine的值，则Form2可在FormCloseing事件中将修改的Machine关键值传回给Form1。而Form1中应该还要写一个更新Machine的函数，根据Form2传回的参数对Form1现在有控件进行查找参数对应的控件，然后再读取数据库中数据，再修改Form1里对应控件属性。
创新互联建站自2013年创立以来，先为通州等服务建站，通州等地企业，进行企业商务咨询服务。为通州企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。
我的做法是先写入一个图片变量，然后再写入到容器上。容器设置双缓冲
还有你说的控件必须透明不太明白，可以直接在容器上绘图，不需要控件，图片的透明度可以用RGBA色的A值（透明度）来控制
我这个也是实时翻滚刷新的，不会闪！
使用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
set xxx=nothing就是把对象占用的空间释放掉。 其他的局部变量都在栈内存,用完会自动释放的
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网