vba - レポートのクエリから取り込まれたテキストに基づいて、テキストボックスのテキストを変更する - Microsoft Access / Visual Basic

Question

Microsoft Access で作成されたレポートをクリーンアップしようとしています。このレポートでは、クエリから頻繁に繰り返されるフィールドがインポートされます。このテキストが「My Cool Query Field」であるとしましょう。

この同じテキスト行はかなり一般的であるため、レポートが生成されるときに短くしたいと思います。「My Cool Field」と読みたいとしましょう。

現在、レポートの下にいくつかの単純な IfThen コードがあります。

If myTextBox.Text = "My Cool Query Field" Then
    myTextBox.Text = "My Cool Field"
End If

しかし、次のエラーが表示されます:「コンパイルエラーが無効です: 外部プロシージャアクセス」。

score 1 · Accepted Answer

代わりに、このようなことを試してください

テキストボックスの中身=myCoolFix([column])

モジュールの舞台裏:

public sub myCoolFix(mytext) as string

If myText = "My Cool Query Field" Then
    myCoolFix = "My Cool Field"
End If

end sub

vba - レポートのクエリから取り込まれたテキストに基づいて、テキスト ボックスのテキストを変更する - Microsoft Access / Visual Basic