从DirectCast创建的表单中获取数据集

Question

我有这个代码，我从某处调用基于某个变量的表单：

Dim frm as String = "Form1"    'this may vary depending on a certain function
Dim objType As Type = Type.[GetType]("project." & frm)
Dim objForm As Form = DirectCast(Activator.CreateInstance(objType), Form)

现在在Form1（以及可以替换Form1的所有表单）上，我有一个名为ds的数据集。因此，当我直接访问ds时，它可以正常工作。

Dim newds = Form1.ds

现在我想要的是使用ds访问objForm。

我试过了：

objForm.Controls.Find("ds")

但是不起作用。我认为这是因为Dataset是System.Data

的一部分