VBA（Microsoft Access）でラベルの `Caption`プロパティの一部を太字にします

Question

Microsoft Accessラベルのキャプションで特定の単語を太字にするにはどうすればよいですか？

役立つ場合は、テキスト自体がMicrosoft Accessテーブルに格納されます。

例を以下に示します。

Private Sub Form_Load() 

    Me.Label0.Caption = DLookup("Field1", "Table1", "[ID] = 1") 

End Sub 

私のテキストは次のとおりです。：

私はそうのようにDLookupクエリで返された値にこのラベルのキャプションプロパティを設定し Form_Load()イベントにラベルを使用してMicrosoft Accessフォームを、持っています

速い茶色のキツネが怠惰な犬、私は言葉レイジーをボールドにしたい

の上にジャンプします。これは可能ですか？もしそうなら、私はこれをどのようにするのですか？

ありがとうございました

Answer 1

あなたは2007（私の知る限り）と2010年のため、あなたはテキストボックスを作成し、リッチテキストのデータ]タブの[テキスト形式を設定することができ、アクセスのバージョンを言及していません。

="The quick <b>brown</b> fox" 

変更などロックや有効としてさらにいくつかのプロパティを、あなたが見て、ラベルのような役割を果たしテキストボックスがあります：あなたは、その後にコントロール・ソースを設定することができます。

Answer 2

どれくらい悪いですか？私は本当にクレイジーな答えを持っているので、それはうまくいくかもしれません。

ラベルをWebブラウザコントロールに置き換えて、一時的なhtmlファイルを作成し、Webブラウザをポイントします。コントロールがバインドされている必要があるか、ControlSourceを変更できないため、基になるテーブルにフィールドを追加する必要があります。

Webブラウザコントロールをフォームに配置し、スクロールバーをオフにして、一般にラベルのように見せました。私はそれで完全な成功を収めていませんでしたが、おそらくあなたは私よりも優れています。

テーブルに「FakeLabel」というテキストフィールドを追加しました。 Webブラウザのコントロールソースは、そのフィールドを指している必要があります。

は、テストの目的のために、私はここで、それは私がボタンをクリックした後、次のようになります。このコード

Private Sub Command113_Click() 

    Dim sFile As String 
    Dim lFile As String 

    sFile = Environ("TEMP") & "\fakelabel.html" 
    lFile = FreeFile 

    Open sFile For Output As lFile 

    Write #lFile, "The <strong>quick</strong> brown fox jumped over the <em>lazy</em> dog" 

    Close lFile 

    Me.Recordset.Edit 
    Me.Recordset.Fields("FakeLabel").Value = sFile 
    Me.Recordset.Update 

    Me.WebBrowser112.Requery 

End Sub 

でフォーム上のコマンドボタンを配置します。あなたがその上の詰め物を取り除くことができるなら、それは本当にラベルのように見えるかもしれません。