2013-07-21 118 views
0

很简单,可以更改表单的文本框值。但是,如何更改每个记录上的Continues论坛的文本框?在Continues论坛中替换文本框中的文本

onLoad事件不起作用,因为它只是改变了第一个记录。有任何想法吗?

示例代码:

Private Sub Form_Load() 
    txb_name.Value = txb_name.Value & "Test" 
End Sub 

在这个例子中,继续形式是这样的:

Text1Test 
Text2 
Text3 
Text4 
Text5 
Text6 

注意如何不仅改变了第一条记录。

我需要的是:

Text1Test 
Text2Test 
Text3Test 
Text4Test 
Text5Test 
Text6Test 

回答

1

发现使用电话的记录源我自己功能的解决方案:

=myFunction(fieldName) 

然后,你可以把任何你想要的功能

Function myFunction(fieldNameAs String) 
    myFunction= fieldName& "Test" 
End Function 

这将遍历所有记录,而不仅仅是第一个。

0

为什么不更新通过SQL基础数据源?

Option Compare Database 
Option Explicit 

Private Sub Form_Load() 
    DoCmd.RunSQL "UPDATE myTable SET myField = myField + 'Test'" 
End Sub 
+0

我需要这个的原因是因为更改很复杂,需要VBA代码。 SQL是不够的。 – Bill

+0

请向我们展示您现在使用的代码。 –

+0

添加了示例... – Bill