Question

我想根据在表单中选择的值在文本框中生成一个字符串。还需要在选定的某些表单选项之前和之后插入预定义的文本。预定义的文本在下面以粗体显示。希望使用“生成时单击文本”按钮并将其放置在按钮下方的文本框中进行处理。已经具有用于重置按钮的代码。请参见下面的示例表格。

文本：处理 [entity.value] 和 [action.value] 然后 [status.value] 使用协议 [agreement.value] 附有生效日期 [eff_date.value] ........等等。

Sample Form

Answer 1

如果您只需要根据这些值构建一个字符串，那么您正在寻找的就是...

FinalTxt = "Process " & me.entity.value & _ 
           " and " & me.action.value & _
           " then " & me.status.value & _
           " use agreement " & me.agreement.value & _
           " with eff date " & me.eff_date.value

me.FinalTxtBox.value = FinalTxt

如果您需要保存字符串以在另一种形式上使用它，我会考虑为该字符串创建一个公共变量并对其进行更新。

-更新

要使字符串不显示在文本框中，您需要添加一些逻辑。

FinalTxt = ""

If me.entity.value <> "" and me.action.value <> "" _
    and me.status.value <> "" and me.agreement.value <> "" _
    and me.eff_date.value <> "" Then

    FinalTxt = "Process " & me.entity.value & _ 
           " and " & me.action.value & _
           " then " & me.status.value & _
           " use agreement " & me.agreement.value & _
           " with eff date " & me.eff_date.value 

End If

me.FinalTxtBox.value = FinalTxt

ms-access根据表单选项在文本框中生成字符串

1 个答案: