2

我有一个在表单中的私有函数中生成并分配给整数变量的值，但我似乎无法将它分配给表单中的表单控件（文本框）。

我在表单的常规区域中定义了 tcount（以使其在我试图分配返回值的函数之外可访问）。我像这样将另一个函数调用的结果分配给 tcount 。

tcount = CountValues(Me.RecordSource,"[columnname]")

我正在使用 MsgBox 输出 tcount，它看起来不错。

我尝试将 tcount 分配给文本区域的几种方法。

Set frmname.controlname = tcount   'error - you entered an expression that has no value'
Set Me.controlname = tcount        'error - you entered an expression that has no value'
frmname.controlname = tcount       'run-time error 2448, cant assign a value to this object'
Set Form.subfrmname.controlname = tcount   'Application-defined or object-defined error'

感谢您的见解。

4

1 回答 1

1

Set在分配给对象变量时使用，而不是在分配给简单数据类型变量时使用。在这种情况下，赋值是给一个文本框值属性，所以把它当作给一个变量赋值。

使用以下任一方法将整数存储在文本框中。

Me.controlname = tcount
Me.controlname.Value = tcount
于 2013-10-10T14:46:53.237 回答