activex控件是什么意思，有何作用（列举常用的activex控件有哪些）

苦行僧

Alt F11(开启VBE）→插进→客户文本框，在工程项目中提升一个客户文本框，另外显示信息出“辅助工具”→右键→额外控制：Microsoft ProgressBar Control 6.0。




3 加上客户文本框和控制




4 启用文本框编码

Sub 显示信息时间轴()
frmProgress.Show
End Sub

5 文本框编码

Private Sub UserForm_Initialize()
Me.Height = 83
Frame1.Visible = False ‘掩藏架构以及內部控制
End Sub


Private Sub cmdHide_Click()
Dim r As Long
r = Worksheets(“Sheet3”).Rows.Count
r = 10000
Me.Height = 168
Frame1.Visible = True
pb1.Min = 0
pb1.Max = r
pb1.Value = 0
With Worksheets(“Sheet3”)
For i = 1 To r
If i Mod 2 = 0 Then
.Rows(i).Hidden = True ‘掩藏行
End If
pb1.Value = i ‘升级时间轴
DoEvents ‘出让决策权
Next
End With
Me.Height = 83
End Sub