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 (AFAIK)과 2010 년의 액세스의 버전을 언급하지 않는, 당신은 텍스트 상자를 만들고 서식있는 텍스트로 데이터 탭의 텍스트 형식을 설정할 수 있습니다.

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

변경 등 잠금 및 사용과 같은 몇 가지 더 속성을, 당신은 외모와 라벨 같은 역할을 텍스트 상자를해야합니다 : 당신은 다음에 제어 소스를 설정할 수 있습니다.

Answer 2

얼마나 좋으신가요? 나는 정말 미친 대답을했기 때문에 효과가있을 수 있습니다.

레이블을 웹 브라우저 컨트롤로 바꾸고 임시 html 파일을 만든 다음 웹 브라우저를 가리 키십시오. 컨트롤이 바인딩되어야하거나 ControlSource를 변경할 수 없기 때문에 기본 테이블에 필드를 추가해야합니다 (또는 적어도 내가 한 것).

웹 브라우저 컨트롤을 폼에 배치하고 스크롤 막대를 끈 다음 일반적으로 레이블처럼 보이도록했습니다. 나는 그걸로 완전한 성공을 거두지 못했지만 어쩌면 당신이 나보다 더 잘 할 수 있습니다.

"FakeLabel"이라는 테이블에 텍스트 필드를 추가했습니다. 웹 브라우저 제어 소스가 해당 필드를 가리켜 야합니다.

테스트의 목적을 위해, 나는 여기가 내가 버튼을 클릭 한 후 생겼는지이 코드

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 

으로 폼에있는 명령을 넣어. 그 상단의 패딩을 제거 할 수 있다면, 실제로는 라벨처럼 보일 수 있습니다.