EXTPARAMS) As Long
Private Declare Function DrawTextExAsNull Lib "USER32" Alias "DrawTextExA"
 (ByVal hdc As Long, ByVal lpsz As String, ByVal n As Long, lpRect As RECT,
 ByVal un As Long, ByVal lpDrawTextParams As Long) As Long
    Private Const DT_EDITCONTROL = &amp;H2000&amp;
    Private Const DT_PATH_ELLIPSIS = &amp;H4000&amp;
    Private Const DT_END_ELLIPSIS = &amp;H8000&amp;
    Private Const DT_MODIFYSTRING = &amp;H10000
    Private Const DT_RTLREADING = &amp;H20000
    Private Const DT_WORD_ELLIPSI