小编use*_*834的帖子

如何在运行时使用Microsoft Access中的VB代码创建控件？经过一番挖掘，我发现该CreateControl功能是可行的。问题是我在网上找到的每个随机论坛都有一些类似于以下的代码：

Private Sub Button_Click()
    Call AddLabel
End Sub

Function AddLabel()
    Set ctl = CreateControl("MyForm", acLabel, acDetail, "", "", 0, 0, 100, 100)
    With ctl
       .name = "myTextBox"
       .Caption = "Hello World!"
       .Height = 50
       .Width = 100
       .FontSize = 11
       .Visible = True
    End With
End Function

但是此代码似乎无法创建可见标签。

就我而言，我只是想学习如何使它起作用。因此，我创建了一个带有按钮的空白表单，单击该按钮将创建一个标签，上面写着“ Hello world！”。我希望发生的是，单击按钮时，文本框将显示在表单的左上方。我很好奇是否有人可以帮助我向我展示一些实际有效代码的简单示例。

我知道，在任何人说我可以创建标签并将其隐藏然后更改其可见性之前，我都知道。但是我想知道如何动态创建控件，使这个简单的示例真正起作用将极大地帮助我理解。

我正在尝试从包含文件名或目录的字符串中提取子字符串.提取的子字符串应该是文件扩展名.我在网上做了一些搜索,发现我可以使用正则表达式来实现这一点.我发现这^\.[\w]+$是一个可以找到文件扩展名的模式.问题是我对正则表达式及其功能并不完全熟悉.

基本上如果我有一个像C:\Desktop\myFile.txt我想要正则表达式的字符串然后找到并创建一个仅包含的新字符串.txt