Курсовая работа на Visual Basic бесплатно. Исходные коды на Visual Basic. Программы на Visual Basic Freeware Sitemap

Visual Basic

Программа для перекодировки символов в Unicode


    

VB Source code

English    Czech    French    German    Dutch    Chinese    Polish    Japan
    

    Другие проекты - Генератор веб сайтов  и  FTP загрузчик вебстраниц  и  Vedeckotechnicky scenar
    
    Несмотря на то, что Microsoft перестал поддерживать Visual Basic, этот язык все еще имеет два существенных преимущества над другими языками. На нем можно очень быстро начать писать программы. И на нем можно очень быстро разрабатывать программы под сиюминутные нужды.
    При разработке программ для изучения английского языка (при создании
курсовой работы) возникла необходимость их адаптации для англоязычных пользователей. При этом основной проблемой было использование Cyrillic символов для обработки и отображения на экране. Для подготовки словаря была создана программа Chext, перекодирующая Cyrillic символы в unicode цепочку символов, а для отображения на экране - библиотека графических изображений Cyrillic символов в формате Jpeg


    Chext - программа для перекодировки символов из Cyrillic в Unicode или в символы подстановки.
    
    Курсовая работа - программа для преобразования символов кириллицы (русского и украинского алфавитов) в универсальной таблице символов
  Unicode   Использование Unicode значительно упрощает создание многоязычных приложений. Поэтому, создавая программы с прицелом на этот стандарт, вы закладываете неплохую базу для локализации своего программного продукта. Специально для студентов, проект выполнен и оформлена в виде   курсовой работы  . Приложены полные листинги программы для каждого этапа разработки.
    
    
Курсовая [1]  Курсовые [2]  Курсовые [3]  [ Найти еще ]    


    

Программа перекодировки символов


    С чего начать разработку учебного проекта
    
    Разработаем программу, преобразующую строку символов кириллицы в строку Unicode. Это бывает необходимо при
разработке web сайтов, когда необходимо показать часть HTML кода как текст или при разработке программ для изучения иностранных языков (подробнее это рассмотрено во 2 части), когда у пользователя нет поддержки изучаемого языка на компьютере. Так же исходный код можно использовать для быстрого создания программ шифрования и дешифрования текстов.

Курсовая работа

      Стандартный VB проект
      
      Создадим обычный VB-проект, разместим
  форму   Form1, два экземпляра   TextBox   – Text1 и Text2 и кнопку Command1.
      
      Полный VB проект – в файле vb1.zip (Листинг для курсовой работы)
      
      Text1 будем использовать для ввода строки с кириллицей, а Text2 для показа результата трансляции в Unicode.
      
      Объявим
  массив   Dim A(72) As String для хранения Cyrillic символов и массив Dim B(72) As String для хранения соответствующих Unicode строк.
      
      Краткая информация о массивах -
progs.biz/vbnet/


      Заполним массивы A() и B() значениями:

Массив
      
      

Массив
      
      


      
      Можно использовать иные варианты заполнения элементов массивов. Например, из файлов. Но для упрощения листинга, мы используем самый простой способ – впишем значения вручную.
      

Курсовая работа на Visual Basic

      Полный VB проект – в файле vb2.zip
      
      Самый простой вариант программы – минимум VB кода
      
      Теперь нужно написать процедуру обработки введенной в TextBox – Text1 строки кириллицы.
      
      Краткий справочник по работе со строками на VB -
www.microsoft.com/Rus/Msdn/
      
      Объявим
      
      Dim Cyrillic As String ' строка переменной длины для введенного текста
      Dim Unicode As String ' строка переменной длины для Unicode
      Dim Mt As String * 1 ' строка фиксированной длины (=1) для одного Cyr символа
      Dim Bt As String 'Для Unicode для одной буквы
      Dim It 'Длина строки


      Напишем процедуру обработки нажатия кнопки Command1 (Translate):
      
      Private Sub Command1_Click()
      Cyrillic = Text1.Text 'Прочитать текст в строковую переменную
      It = Len(Cyrillic) – 1 'Длина введенной строки
      
      For i = 1 To It Step 1 'Просматривать введенную строку
        Mt = Mid$(Cyrillic, i, 1) 'Одна буква из введенной строки кириллицы
        For j = 0 To 71
          If Mt = A(j) Then Bt = B(j) 'Если в A(j) буква определена, то в Bt записать её Unicode
        Next j
      Next i
      
      Text2.Text = Bt 'Написать Unicode в строку Text2
      
      End Sub
      
      Полный VB проект – в файле vb3.zip
      

Бесплатная курсовая работа


      Эта программа уже работает. Она позволяет конвертировать 1 cyrillic символ из верхней строки в 1 unicode в нижней строке.

Таблица


      Краткая статья по операторам цикла - club.shelek.com
      
      Краткая статья по условным операторам - hiprog.com
      
      Как производить обработку целой строки Cyrillic символов    
[   Справочник VB   ]
      


      Допишем программу для конвертирования всей строки текста.
      Для этого надо дописать всего одну строку:
      
      Unicode = Unicode + Bt 'Сформировать строку unicode из отдельных unicode
      
      Полный VB проект – в файле vb4.zip
      
      Иллюстрация работы программы:

Транслятор


      Достигнут определенный результат – создана работоспособная программа (для курсовой работы) с минимальным Visual Basic кодом.   
[ Hand Made ]
      Осталось написать обработку ошибок и «пропуск» некириллических символов.


      Обработка none-Cyrillic символов
      
      Допишем программу так, чтобы можно было пропускать (не обрабатывать) не-Cyrillic символы. Объявим триггер
      
      Dim Tr 'Триггер =1, если найден Cyrillic символ
      
      и будем обнулять значение триггера Tr при выборе каждой буквы из введенной строки
      
      For i = 1 To It Step 1 'Просматривать введенную строку
        Mt = Mid$(Cyrillic, i, 1) 'Одна буква из введенной строки кириллицы
        Tr = 0 'Предполагаем, что символ - не Cyrillic
        For j = 0 To 71
          If Mt = A(j) Then Bt = B(j) 'Если в A(j) буква определена, то в Bt записать её Unicode
          If Mt = A(j) Then Tr = 1 'Триггер =1, если найден Cyrillic символ
        Next j
        If Tr = 1 Then Unicode = Unicode + Bt 'Сформировать строку unicode из отдельных unicode
        If Tr = 0 Then Unicode = Unicode + Mt 'Если символ – не Cyrillic, то его просто вписать
        Text2.Text = Unicode 'Написать Unicode в строку Text2
      
      Здесь цветом выделена часть кода, которую нужно было дописать для обработки не-Cyrillic символов, знаков и цифр. Теперь программа может корректно обрабатывать любые строки. В приведенном ниже примере видно, что цифры 1234 добавлены в нижнюю строку без обработки.

Курсовик


      Полный VB проект – в файле vb5.zip
      
      Программы для перекодировки символов могут использоваться во многих ситуациях: при разработке веб сайтов, шифровании HTML кода, при перекодировании почтовых сообщений в "читаемый" вид, для защиты почтовых сообщений и т.д.
      
      
Скачать курсовую работу >>  Следующая курсовая >>
      
      
Vedeckotechnicky scenar >>
      
      
Wiki Dictionary >>
      
       Visual Basic Source Code

      
      Курсовая  Курсовая
      
      
プログラマーがチュートリアルを作成するための無料の辞書
      
      OFLAMERON - 外国語を覚えるカード - 外国語を学ぶための新技術。 無料で学ぶ
      
Shmeleff       Shmeleff       Shmeleff       Shmeleff  
      外国語を記憶するための新しい方法-面白い、美しい、無料
      
      ロシアの村
      
      Sitemap  Sitemap  Java  Free dictionaries  Russian village  Shmeleff  Deutsche  One Day Travel

      
      



         Source code    Science and technology scenario    Free ebook    Книги    sitemap.html


      Программа для изучения иностранных языков
      
      Простая и удобная программа для изучения иностранных языков - для запоминания иностранных слов. Не требует инсталляции, работает на вашем персональном компьютере в OS Windows.
      
      Freeware
      
      После запуска программа периодически показывает небольшое, высплывающее поверх всех окон, поле с иностранным словом и его переводом. Это аналог flashcards - учебных карточек. Через несколько секунд окно с словами исчезает. В качестве словаря используется обычный текстовый файл, в который вы можете добавлять слова, которые надо выучить. Соотсетственно, какие слова запишете, такой язык и будете учить. Всё сделано предельно просто.
      Программа ничего не пишет на HDD или в реестр. Это полноценная portable программа.
      Чтобы скачать программу в ZIP архиве - Click-ните по картинке.
      
      
Download >>  Sitemap >>
      
      
Advanced >>
      
      

   Яндекс цитирования         

Исходные коды на Visual Basic бесплатно. Программы на Visual Basic. Source code Visual Basic Czech scenario sitemap.xml Wiki scenario
eXTReMe Tracker