模拟LED数码管的VB控件，很好用 If Len(strTmp) < 5 Then If InStr(1, strTmp, ".") Then For i = 1 To 5 - Len(strTmp) strTmp = strTmp & "0" Next i Else strTmp = strTmp & ".0" End If End If j = 1 For i = 0 To 3 If j < 4 And Mid$(strTmp, j + 1, 1) = "." Then Bar
在码农的生活中，很多级码农都有这样的经历，会被一个小小的技术问题拦住，然后进度跟不上了，被老板XXXX一大通了。心情不爽了。 好吧，这个曾经是我遇到拦路虎之一。但事实上不是什么大技术。技术就是一层纸，破了就破了。 这是一个关于如何跨窗体操作控件或过程的一个例子。比如，你想用窗体A的按键来执行窗体B的文本框变色。 Imports System Imports System.Threading Imports System.Text Public Class Form1 Private Sub F
