0

我无法观察到运行时完成的行数。因此，我在想为什么不只写几行代码来显示运行时完成的行数。

以下是我的实现：

Dim ownCntrl As Control
Set ownCntrl = UserForm1.Controls.Add("Forms.TextBox.1")
With ownCntrl
    .Name = "RowNoTextBox"
    .Value = "test"
    .Width = 150
    .Height = 25
    .Top = 10
    .Left = 10
    .ZOrder (0)
End With
UserForm1.Show

以下是我的查询：

1）除了TextBox对象，还有没有其他像Java中的标签一样的对象在VBA中显示信息？

2）如果最初没有创建一个名为“UserForm1”的用户窗体，我可以在运行时直接创建文本框对象或其他合适的对象吗？原因，不调用 UserForm1.Show 函数，TextBox 对象不会显示

3）如何在运行时保持 UserForm 或 TextBox 显示而无需用户交互来关闭它以继续？

我刚开始学习VBA。欣赏各位的建议。非常感谢。

4

1 回答 1

1

根据评论中的一些附加信息，保持子程序进度信息的最简单方法是使用 Excel 状态栏。因此，我们在我们的子程序中放入如下内容：

Application.StatusBar = "Current progress- Row No.: " & rowNum

其中rowNum是表示当前行的变量（循环变量）。这很重要 - 您需要在程序结束之前返回调用此行的标准状态栏行为：

Application.StatusBar = False
于 2013-04-15T06:45:57.643 回答