Results 1 to 7 of 7

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    Registered User Dark Water's Avatar
    Join Date: Jul:2001
    Location: Âèåíà, Ñîôèÿ
    Posts: 505

    Unicode åëåìåíò âúâ Visual Basic ( Word )

    Ïúðâî äà óòî÷íÿ ÷å ñòàâà âúïðîñ çà ñêðèïòîâå ïèñàíè íà âãðàäåíèÿ visual basic âúâ Word 2003. Òà òåçè ñêðèïòîâå îáðàáîòâàò îïðåäåëåíè òåêñòîâå è èçâúðøâàò ðàçíè ðàáîòè, êîèòî íå ñà èíòåðåñíè òóê. Åäèí åëåìåíò îò òàçè îáðàáîòêà å, ÷å ïðè îïðåäåëåíà ïîñëåäîâàòåëíîñò îò áóêâè ñêðèïòà ñëàãà êàâè÷êè. Ïðè íàñòîÿùîòî ïîëîæåíèå ñêðèïòà ñëàãà ( “ èëè ïî Unicode 201c ), íî ìè ñå íàëîæè äà ïðåèíñòàëèðàì åäèíèÿ îò êîìïþòðèòå è ñåãà ãîðêèÿ ïîêàçâà òîâà ( „ èëè ïî Unicode 201e ). Âñè÷êî òîâà ïðè åäèí è ñúùè ðåä, à èìåííî WordBasic.EditReplace Find:="****", Replace:=Chr$(34), ReplaceAll:=1, Wrap:=1 êîéòî ïî ìîèòå ðàçáèðàíèÿ áè òðÿáâàëî äà äà ñè âçåìå îò ANSII òàáëèöàòà åòî òåçè êàâè÷êè ( " ), âúîáùå ìàçàëî. Ñëåä êðàòêî ìèñëåíå ðåøèõ ,÷å âñè÷êè òåçè êàâè÷êè ñà ãðåøíè è íàé-ïîäõîäÿùèòå ùå ñà åòî òåçè ( ” èëè ïî Unicode 201d ), è òóê íàñòàíà ïðîáëåì. Ñïîðåä õåëïà íà VB ( àç íå ñúì ãè ïèñàë òåçè ñêðèïòîâå îáà÷å ìè áåøå êàçàíî, ÷å ñà ìîå çàäúëæåíèå  è òàêà ïî õåëïà ïî õåëïà ùî ãîäå ñå îïðàâÿì ) çà äà âêàðàì Unicode åëåìåíò âìåñòî Chr$(34) òðÿáâà äà å ChrW(êîäà íà åëåìåíòà). Äà äå àìà íå, êàêòî è äà ãî íàïèøà âèíàãè ìè äàâà ãðåøêà âúâ ñèíòàêñèñà. Òàêà ÷å îò òóê àêî ìîæåòå äà ìè ïîìîãíåòå, ùå ñúì âè ìíîãî áëàãîäàðåí. Òîâà 201D ñúì ãî âçåë îò www.unicode.org . Îáðàáîòêàòà ñòàâà ñ TimeNewRoman. Àêî èìàòå îùå âúïðîñè âåäíàãà ùå îòãîâîðÿ.

    Edit: Âèæäàì ÷å âúâ ôîðóìà íÿìà êàê äà èçëÿçàò òåçè êàâè÷êè êîèòî ñúì ïîêàçàë, íî ìîãàò äà ñå âèäÿò âúâ Character Map, êàòî òàì ñå âîäÿò U+ êîäà.

    Edit2: Äà, îïèòâà ñå 201D äà âêàðàì êàòî ïàðàìåòúð. Òàçè âå÷åð ñúì íà ðàáîòà è ùå ïðîáâàì êàêòî òè ñè ìè ïîêàçàë è ùå âèäÿ äàëè ùå ñå ïîëó÷è, è àêî íå ùå íàïèøÿ òî÷íî êîÿ å ãðàøêàòà. Âúâ õåëïà íà VB íèêúäå íå ïèøå, ÷å òðÿáâà äà å äåñåòè÷íà ÁÑ, äîñòà òúïî.
    Last edited by Dark Water; 12th April 2007 at 12:09.

  2. #2
    Registered User
    Join Date: Apr:2004
    Location: EU
    Posts: 141
    Áè ëè êàçàë êàêâà òî÷íî ãðåøêà òè äàâà è êàäå?
    Îïèòâàø äà ïîëçâàø 201D êàòî ïàðàìåòúð íà ChrW ëè?
    Àêî å òàêà òðÿáâà äà ïðåîáðàçóâàø 201D â äåñåòè÷íà áðîéíà ñèñòåìà.
    Ïðîáâàé ñ òîâà Replace:=ChrW(8221)

  3. #3
    Registered User Dark Water's Avatar
    Join Date: Jul:2001
    Location: Âèåíà, Ñîôèÿ
    Posts: 505

    ïðîäúëæåíèå

    Òàêà òîçè êîä êîéòî ìè äàäå ãî ïðèå ïðîãðàìàòà ñàìî, ÷å ïðîáëåìà îñòàíà. Ïðîäúëæàâà äà ñè ñëàãà 201Å è íå ñå ñúîáðàçÿâà ñúñ êîäà. Êîãàòî îáà÷å å âúâ îòäåëåí ñêðèï, êîéòî ñëàãà ñàìî êàâè÷êè âñè÷êî å îê. Âúîáùå îò êúäå ãè âçèìà òåÿ êàâè÷êè íåçíàì è êàê òàêà Word-a èãíîðèðâà êîäà íåçíàì. Àêî èìàø èäåÿ ïîìîù!

  4. #4
    philosophus duratea icaci's Avatar
    Join Date: Oct:2006
    Location: Aachen
    Posts: 2,698
    Ìîèòå 2 åâðîöåíòà ïî âúïðîñà: âåðîÿòíî ñòàâàø æåðòâà íà ðåãèîíàëíèòå íàñòðîéêè íà Word-à. Àìåðèêàíöèòå è àíãëè÷àíèòå ñëàãàò ãîðíè îòâàðÿùà è çàòâàðÿùà êàâè÷êè, à â Áúëãàðèÿ å ïðèåòî îòâàðÿùàòà êàâè÷êà äà å äîëíà. Êîãàòî ñè çàäàë Bulgarian â ðåãèîíàëíèòå íàñòðîéêè íà Windows, òî Âîðä ñå ñúîáðàçÿâà äîíÿêúäå ñ òÿõ è âåðîÿòíî çàìåñòâà îòâàðÿùàòà ãîðíà êàâè÷êà ñ äîëíà òàêàâà. Ïî âðåìå íà ïèñàíå ãî ïðàâè ñúñ ñèãóðíîñò, à çàùî ãî ïðàâè è ïðè çàìåñòâàíå - èäåÿ íÿìàì
    Øåñòíàäåñåòè÷íèòå êîíñòàíòè âúâ Visual Basic è VBA ñå ïèøàò êàòî &H<÷èñëîòî>.  òâîÿ ñëó÷àé: ChrW(&H201C), ChrW(&H201E) è ò.í.
    Last edited by icaci; 15th April 2007 at 04:04.
    Internet - it doesn't make you stupid, it just makes your stupidity more accessible to others

  5. #5
    Registered User Dark Water's Avatar
    Join Date: Jul:2001
    Location: Âèåíà, Ñîôèÿ
    Posts: 505

    !

    Íàé – âåðîÿòíî ñè ïðàâ çàùîòî êàòî ìó äàì íÿêîé äðóã êîä òîé ñå èçïúëíÿâà è ñè ñëàãà çíàêà íà ìÿñòîòî íà êàâè÷êèòå. Ëîøîòî å, ÷å âúâ ìîìåíòà íå ñúì íà ðàáîòà è íÿìà êàê äà ïðîâåðÿ çà ðåãèîíàëíèòå íàñòðîéêè. Àêî ñå îêàæå âÿðíî ùå å ãîëÿìà ãëóïîñò, çà êàêâî òîãàâà å òîçè ñêðèïò è òåçè Unicode åëåìåíòè, êàòî Word-a ñè ñëàãà êàêâîòî ñè èñêà. Ñåãà ïðåãëåäàõ íàñòðîéêèòå íà Word-a è íèêúäå íå âèäÿõ çà òåçè ðàáîòè, ñúñ åäíà äóìà èñêàø, íå èñêàø, ùå ñè ñëàãà ïðîãðàìàòà êàêâîòî ñè çíàå. ÌÍÎÃÎ òúïî. Äàëè èìà íà÷èí VB-êà äà ïðèíóäè Word-a äà ìó èçïúëíè ñêðèïòà?

  6. #6
    Registered User Dark Water's Avatar
    Join Date: Jul:2001
    Location: Âèåíà, Ñîôèÿ
    Posts: 505

    !

    Ïúðâî èñêàì äà ñå èçâèíÿ, ÷å íå ïèñàõ íÿêîëêî äåíà, íî ïðîñòî íå áÿõ íà ðàáîòà è íÿìàøå êàê äà ïðîâåðÿ äàëè å âÿðíî òîâà çà ðåãèîíàëíèòå íàñòðîéêè, è îòãîâîðà å ÿâíî íå. È íà äâàòà êîìïþòúðà ñà åäíè è ñúùè, Áúëãàðèÿ, Áúëãàðèÿ, Áúëãàðèÿ. ßâíî è òîâà íå å. Ïðîáâàõ ñúñ èçêëþ÷âàíå íà autocorrect, autoformat è òîâà íå îïðàâè ïðîáëåìà. Âå÷å ñå èç÷åðïèõ îò èäåè. Íÿêîé àêî å ðàáîòèë ñúñ VB äà äàäå íÿêàêâà èäåÿ?

    ï.ñ. ß êàæåòå íÿêîÿ êíèãà çà VB, íî äà å çà íà÷èíàåùè, ÷å äà ñå îáðàçîâàì ìàëêî çàùîòî èìàì íÿêîëêî èäåè, à ñúñ ïèòàíå íÿìà äà ñòàíå.

  7. #7
    . ÑÑÒÀÍÅÂ's Avatar
    Join Date: Feb:2006
    Location: .
    Posts: 2,737
    VB, êîéòî âúðâè ñ MS Office e 6öà, òà "Ïðîãðàìèðàíå ñ Microsoft Visual Basic 6.0". Åäèíèÿò îò àâòîðèòå å Äæåô Óüåá.
    È íàé-äîáðå ñêðîåíèòå ìå÷òè íà ìèøêèòå è õîðàòà ÷åñòî îñòàâàò ÷åñòî íåîñúùåñòâåíè.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Copyright © 1999-2011 Õàðäóåð ÁÃ. Âúçìîæíî å ñúäúðæàíèåòî íà òàçè ñòðàíèöà äà å îáåêò íà àâòîðñêè ïðàâà.
iskamPC.com | mobility.BG | Bloody's Techblog | Êðèïòîâàëóòè è ìàéíèíã | 3D Vision Blog | Ìàãàçèí çà åëåêòðîííè öèãàðè