CAnt类型阿拉伯语 [英] CAnt type arabic

问题描述

亲爱的兄弟，阿萨拉姆·阿莱库姆

我在www.codeproject.com/script/Answers/Post.aspx中找到了您的电子邮件地址?我已经开发了一个应用程序LAN Messenger应用程序.
这是从中使用TextBox的.我必须提供阿拉伯字符的支持.使用区域设置"已安装阿拉伯语键盘.我们选择了阿拉伯字体.在TextBox控件上键入字符时，它会显示其他一些字符，这些字符不是阿拉伯字符，阿拉伯数字也不会出现.这些字符如下.

áÇÊäÈí
ÈáÊãäíÈÊáäíÈäáíÈäáÊÇäÈ
brÈÇáÊÇáÊÇÈÊä
ÈÊáÇ
您能否帮助我在通过普通(英文)键盘键入内容时在TextBox控件中显示阿拉伯字符?在此Text1.text控件上编辑阿拉伯字符的方式可能是什么?


我将在此处粘贴代码...(无论我用阿拉伯语键入什么内容，都应在text1.text中显示).请帮我，因为我想在明天早上提交此申请.或者，如果您有类似的编码要求，可以在vb文本中使用此阿拉伯字符，请将其发送给我...我将跟进..如果您今天能发送，它将对我有所帮助....愿真主保佑你和你的家人.愿上帝赐你知识的声音.谢谢Iqal ....电子邮件[e-mail] .....
------------------------

Dear Brothers, Assalamu alaikum

i found your email address in www.codeproject.com/script/Answers/Post.aspx? I have developed an application LAN messenger application.
which is using TextBox from . I have to provide the support of the ARABIC characters. Using the "Regional Setting" Arabic Keyboard had been installed. We have selected the Arabic Font. While typing the characters on TextBox Control, it is displaying some other characters, which are not ARABIC characters and arabic numbers are also not appearing. Those characters are as follows.

áÇÊäÈí
ÈáÊãäíÈÊáäíÈäáíÈäáÊÇäÈ
ÊÈÇáÊÇáÊÇÈÊä
ÈÊáÇ
could you pls help me us to display Arabic characters in the TextBox control while typing through the normal (English) keyboard? What may be the ways to edit ARABIC characters on this Text1.text control ?


I will paste the code here... (whatever i type in arabic should be displyed in text1.text) Pls help me because i want to submit this application today tomorrow morning. OR if you have similar codiing to work this arabic characters in a vb text , pls send it to me...I will follow up..if you can send today it will be a grade helpful for me....May allah bless you and your family. May God give you sound of knowldge. Thanks Iqal .... email [e-mail].....
------------------------

Private Sub Command2_Click()
    Dim send As String
    computer = List1.List(List1.ListIndex)
    send = "net send " & computer & " " & Text1.Text
    If Text1.Text = "" Then
        MsgBox("Please enter a message.", vbCritical)
    ElseIf computer = "" And Check1.Value = 0 Then
        MsgBox("Please select a computer name", vbExclamation)
    ElseIf Check1.Value = 1 Then
        Dim i As Integer
        For i = 4 To X - 2
            send = "net send " & strLine(i) & " " & Text1.Text
            Shell(send)
        Next i
        MsgBox("Message sent to all computers on your network", vbInformation)
    Else
        Shell(send)
        MsgBox("Message has sent to " & computer, vbExclamation)
    End If
End Sub

Private Sub Command3_Click()
    Text1.Text = ""
End Sub

Private Sub Command4_Click()
    Unload(Me)
End Sub

Private Sub Form_Load()
    a = "Inmasteel LAN Messenger Service System : .......Inmasteel LAN Messenger Service System:.......Inmasteel LAN Messenger Service System:......."
    b = Len(a) - 3
    n = "For your any knid of Business Solution Please do contanct us.............. "
    l = Len(n) + 103
    Randomize()
    Call ref()
    ' Setup our messages
    MsgArray(1) = "Communication is"
    MsgArray(2) = "Essential To"
    MsgArray(3) = "Providing Excellent Care"
    MsgArray(4) = ""
    MsgArray(5) = "Communication Empowers"
    ' Use a blank entry for a greater pause before the next message !
    MsgArray(6) = "Creativity and Success"
    MsgArray(7) = ""
    MsgArray(8) = "Good ommunication and Teamwork"
    MsgArray(9) = "Exploring Mental Maps"
    ' Set the current message
    curMsg = 1
    ' Set our counter to zero
    counter = 0
    ' This is our boolean (true/false) variable which will be used
    ' to determin if we are fading the text in or out. To start we
    ' set it to true so our text will fade in first.
    fIn = True
    ' Show the form
    Me.Show()
End Sub

推荐答案

使用RichTextBox代替标准TextBox，这将允许输入诸如á之类的字符，方法是输入ctrl''+，与在Word中使用的字符相同.

Use a RichTextBox instead of the standard TextBox, this will allow characters such as á by typing ctrl '' + a the same as you would use in Word.

我认为首先您必须即可在要运行应用程序的计算机上安装阿拉伯字体
因为每个应用程序都使用此文件来正确运行和显示字符
您可以尝试使用richTextBox，例如"Rod Kemp"所说的

i think first think u must to do that install arabic font to the computer where you want to run your application
because every application use this files to run and display characters correctly
and you can try to use richTextBox like what "Rod Kemp" said

这篇关于CAnt类型阿拉伯语的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！