VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Justify text from Right to Left.

by Abdul Haleem (1 Submission)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Tue 22nd October 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)

Justify text from Right to Left.

Rate Justify text from Right to Left.



    Text1.Alignment = vbRightJustify
End Sub

Private Sub Text1_Change()
    Call setRighttoleft(Text1)
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        KeyAscii = 0
        SendKeys "{End}"
        Text1.Text = Text1.Text & vbNewLine
    ElseIf KeyAscii = 8 Then
        SendKeys "{Delete}"
    End If
End Sub


Download this snippet    Add to My Saved Code

Justify text from Right to Left. Comments

No comments have been posted about Justify text from Right to Left.. Why not be the first to post a comment about Justify text from Right to Left..

Post your comment

Subject:
Message:
0/1000 characters