ویکی پاسخ:نکات ویرایشی: تفاوت میان نسخه‌ها

خط ۶۴۱: خط ۶۴۱:
' ulguhayi awwal wa akhari matn
' ulguhayi awwal wa akhari matn
'
'
   
    Selection.MoveUp Unit:=wdLine, Count:=41
    Selection.MoveDown Unit:=wdLine, Count:=3
    Selection.HomeKey Unit:=wdLine
    Selection.HomeKey Unit:=wdStory
     Selection.HomeKey Unit:=wdStory
     Selection.HomeKey Unit:=wdStory
     Selection.TypeText Text:="{{" & ChrW(1588) & ChrW(1585) & ChrW(1608) & _
     Selection.TypeText Text:="{{" & ChrW(1588) & ChrW(1585) & ChrW(1608) & _
         ChrW(1593) & " " & ChrW(1605) & ChrW(1578) & ChrW(1606) & "}}"
         ChrW(1593) & " " & ChrW(1605) & ChrW(1578) & ChrW(1606) & "}}"
         Selection.TypeParagraph
   
    Selection.EndKey Unit:=wdStory
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.TypeText Text:="==" & ChrW(1605) & ChrW(1606) & ChrW(1575) & _
         ChrW(1576) & ChrW(1593) & "=="
    Selection.TypeParagraph
    Selection.TypeText Text:="<references />"
    Selection.TypeParagraph
     Selection.TypeText Text:="{{" & ChrW(1588) & ChrW(1575) & ChrW(1582) & _
     Selection.TypeText Text:="{{" & ChrW(1588) & ChrW(1575) & ChrW(1582) & _
         ChrW(1607)
         ChrW(1607)
خط ۶۶۸: خط ۶۷۱:
         (1607) & " " & ChrW(1601) & ChrW(1585) & ChrW(1593) & ChrW(1740) & ChrW( _
         (1607) & " " & ChrW(1601) & ChrW(1585) & ChrW(1593) & ChrW(1740) & ChrW( _
         1779) & " = "
         1779) & " = "
    Selection.MoveUp Unit:=wdLine, Count:=2
    Selection.HomeKey Unit:=wdLine
    Selection.TypeText Text:=" "
    Selection.MoveDown Unit:=wdLine, Count:=1
    Selection.HomeKey Unit:=wdLine
    Selection.TypeText Text:=" "
    Selection.MoveDown Unit:=wdLine, Count:=1
    Selection.HomeKey Unit:=wdLine
    Selection.MoveDown Unit:=wdLine, Count:=1
    Selection.MoveUp Unit:=wdLine, Count:=1
    Selection.TypeText Text:=" "
    Selection.MoveRight Unit:=wdWord, Count:=3
    Selection.MoveRight Unit:=wdCharacter, Count:=2
     Selection.TypeParagraph
     Selection.TypeParagraph
     Selection.TypeText Text:="}}"
     Selection.TypeText Text:="}}"
     Selection.TypeParagraph
     Selection.TypeParagraph
 
          
    Selection.EndKey Unit:=wdStory
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.TypeText Text:="==" & ChrW(1605) & ChrW(1606) & ChrW(1575) & _
         ChrW(1576) & ChrW(1593) & "=="
    Selection.TypeParagraph
    Selection.TypeText Text:="<references />"
    Selection.TypeParagraph
     Selection.TypeParagraph
     Selection.TypeParagraph
         Selection.TypeText Text:="{{" & ChrW(1578) & ChrW(1705) & ChrW(1605) & _
         Selection.TypeText Text:="{{" & ChrW(1578) & ChrW(1705) & ChrW(1605) & _