如何在用户表单中的框架中添加文本框和标签？

Question

我正在尝试创建用户表单。选择产品代码并输入数量后，我希望此代码在框架中出现的数量与输入的数量一样多，我希望创建一个TextBox来输入到期日期。你可以看到ı瞄准的是什么。

This is the main structure of my user form. It must look like this after adding the product code and quantity.

Answer 1

你的描述并没有多大意义，但要回答你的问题 的问题：
如何在用户表单中的框架中添加文本框和标签？

• 首先绘制框架。

• 在顶部＆＃34;上绘制控件＆＃34;框架。

• 您可以通过单击其他位置确认控件已附加到框架，然后单击控件，并验证是否也自动选择了框架。

Answer 2

你的目标雄心勃勃，并不简单。我可以给你一些提示，但你必须完成它。

因此，要回答原始问题，您可以通过以下方式定义框架中的控件：

Dim tb as Object, lb as Object
Set tb = Frame1.Controls.Add("forms.textbox.1")
Set lb = Frame1.Controls.Add("forms.label.1")
lb.caption = <the recently entered product code>
lb.top = <you need to keep track of position of next entry>
lb.left = 50            ' from the left border of frame1
tb.top = lb.top
tb.left = lb.left + 100

然后，您必须将文本框存储在集合（或数组中，如您所愿）中，以处理输入的到期日期。

很快，很快。请注意，您必须实施更多功能才能使您的应用程序稳健可靠。