В этой статье объясняется, как создать простой
Приложения Visual Basic 6.0 и последующего обновления приложения на Visual Basic
.NET или Visual Basic 2005 с помощью мастера обновления Visual Basic в Visual Studio.NET или в Visual Studio 2005.
Примечание В Visual Basic.Мастер обновления NET включается в Visual
Studio.NET Professional.
Примечание Мастер обновления Visual Basic 2005 было усовершенствовано в предыдущих версиях Visual Basic. Для получения дополнительных сведений посетите следующий веб-узел Microsoft Developer Network (MSDN):
Следующие пункты описывают рекомендуемого оборудования, программного обеспечения,
Сетевая инфраструктура, навыки, знания и пакеты обновления потребуется:
Microsoft Windows 2000 Professional (или сервера) или
Microsoft Windows XP Professional (или сервера).NET Framework
Установлено
Microsoft Visual Basic 6.0
Microsoft SQL Server 7.0 или более поздней версии с "Борей"
базы данных,
соответствующие разрешения и значения идентификатор пользователя и пароль
Необходимые знания:
Общие знания того, как создавать приложения с помощью
Visual Basic 6.0
Используйте мастер обновления Visual Basic
Ниже показано, как создать простой Visual Basic
6.0 приложения и последующего обновления приложения Visual Basic.NET или Visual Basic 2005, используя
Мастер обновления Visual Basic в Visual Studio.NET или в Visual Studio 2005:
На Начало Выберите пункт Программы, выберите пункт Microsoft Visual Studio 6.0, а затем нажмите кнопку Microsoft Visual Basic 6.0.
В Новый проект диалоговое окно, нажмите кнопку Стандартный файл EXE, а затем нажмите кнопку Открыть.
Первая форма в приложении используется ADO для извлечения
набор записей и затем отображает набор записей в иерархической FlexGrid Microsoft
Элемент управления. В Имя поле Свойства диалоговое окно для формы Form1, типfrmADO.
Если не открыто, в панели элементов Представление меню, нажмите кнопку Панели инструментов.
Из панели элементов, поместите MSHFlexGrid в форме, так что он заполняет большую часть формы. Оставить достаточно свободного места
в нижней части формы, чтобы поместить кнопку.
ПРИМЕЧАНИЕ: Если вы не видите MSHFlexGrid значок на панели инструментов, добавить его в панель элементов. Щелкните правой кнопкой мыши
Панель инструментов, а затем нажмите Компоненты. В Компоненты диалоговое окно, выберите Корпорация Майкрософт иерархического элемента управления FlexGrid 6.0 (OLEDB) из списка доступных компонентов и нажмите кнопку ОК.
Из панели элементов, поместите CommandButton в форме под MSHFlexGrid. В Заголовок поле Свойства диалоговое окно, тип ОК.
Щелкните правой кнопкой мыши mADO, а затем нажмите кнопку Просмотр кода. Добавьте следующий код, который создает подключение к базе данных и
Возвращает набор записей, содержащий все данные из Продукты Таблица базы данных "Борей".
ПРИМЕЧАНИЕ: В следующем примере кода необходимо изменить Идентификатор пользователя =<username></username> и пароль =<strong password=""></strong> правильными значениями. Убедитесь, что идентификатор пользователя
имеет соответствующие разрешения на выполнение этой операции в базе данных.
Private Sub Command1_Click()
Unload Me
End Sub
Private Sub Form_Load()
Dim cn As Connection
Set cn = New Connection
cn.ConnectionString = "Provider=sqloledb;Data Source=localhost;database=northwind;user id=<username>;password=<strong password>"
cn.Open
Dim rs As Recordset
Set rs = New Recordset
rs.CursorLocation = adUseClient
rs.Open "select * from products", cn
Set MSHFlexGrid1.DataSource = rs
End Sub
Нажмите CTRL + S, чтобы сохранить форму. На Файл меню, нажмите кнопку Сохранить как. В Сохранить как диалоговое окно, нажмите кнопку Сохранить.
В обозревателе проекта щелкните правой кнопкой мыши Project1, нажмите кнопку Добавить, а затем нажмите кнопку Форма. Нажмите кнопку Открыть.
В Имя поле Свойства диалоговое окно, тип frmClipboard.
Из панели элементов, поместите Текстовое поле в этой форме. В Текст поле типа По сравнению с отложенной jumped булок
собака.
Место CommandButton Ниже Текстовое поле. В Заголовок поле Свойства диалоговое окно, тип Копировать.
Поместите секунды CommandButton в этой форме. В Заголовок поле Свойства диалоговое окно, тип Вставить.
Щелкните правой кнопкой мыши frmClipboard, а затем нажмите кнопку Просмотр кода. Вставьте следующий код для CommandButton события click.
В этом коде используется Буфер обмена объект для получения и вставьте текст:
Private Sub Command1_Click()
Clipboard.SetText Text1.SelText
End Sub
Private Sub Command2_Click()
Text1.SelText = Clipboard.GetText
End Sub
Нажмите CTRL + S, чтобы сохранить форму.
Последняя форма требуется является главной формы приложения.
В обозревателе проекта щелкните правой кнопкой мыши Project1, нажмите кнопку Добавить, нажмите кнопку Форма, а затем нажмите кнопку Открыть.
В Имя поле Свойства диалоговое окно, тип frmMain.
Из панели элементов, поместите CommandButton в форме frmMain. В Заголовок поле Свойства диалоговое окно, тип ADO.
Поместите секунды CommandButton в этой форме. В Заголовок поле Свойства диалоговое окно, тип Буфер обмена.
Щелкните правой кнопкой мыши frmMain, а затем нажмите кнопку Просмотр кода. Вставьте следующий код для CommandButton события click, чтобы
Показать две формы:
Private Sub Command1_Click()
frmADO.Show
End Sub
Private Sub Command2_Click()
frmClipboard.Show
End Sub
Нажмите CTRL + S, чтобы сохранить форму.
В обозревателе решений щелкните правой кнопкой мыши Project1, а затем нажмите кнопку Свойства Project1. В Начальный объект Нажмите кнопку, frmMain, а затем нажмите кнопку ОК.
Чтобы добавить ссылку на компонент ADO на Проект меню, нажмите кнопку Ссылки. В списке Доступные ссылки нажмите кнопку для выбора Библиотека объектов данных ActiveX Microsoft (подойдет любой версии 2.0 или более поздней версии). Нажмите кнопку ОК.
Чтобы скомпилировать проект, на Файл меню, нажмите кнопку Сделать Project1.exe. В Создать проект диалоговое окно, нажмите кнопку ОК (примите имя по умолчанию).
Нажмите клавишу F5 для запуска приложения в режиме отладки.
ПРИМЕЧАНИЕ: Вам не нужно убедитесь, что прежних версий Visual Basic
приложение работает без проблем, перед обновлением.
Закройте среду разработки Visual Basic. В
запрос на сохранение изменений в проект, нажмите кнопку Да. Используйте имя по умолчанию и сохранить проект.
На Начало Выберите пункт Программы, выберите пункт Microsoft Visual Studio.NET, а затем нажмите кнопку Microsoft Visual Studio.NET.
На начальной странице нажмите кнопку Открытие проекта. Найдите папку, содержащую проект Visual Basic 6.0
что только что созданный файл (обычно C:\Program Files\Microsoft Visual
Studio\VB98). Нажмите кнопку Project1.vdp, а затем нажмите кнопку Открыть.
Visual Studio.NET обнаруживает, что это прежних версий Visual
Базового проекта и запуска мастера обновления Visual Basic. Мастер отобразит
Описание каждого шага, как выполнить шаги в следующих
последовательность:
Создайте новый проект, в котором существующие проекта
обновляется.
Скопируйте файлы классов и файлы формы в новый
проект.
Предоставить отчет об обновлении, которая содержит список компонентов
проект, который успешно обновлен и компоненты, которые не удалось обновить
успешно.
Нажмите кнопку Далее все действия, пока процесс обновления начинается. В
обновление занимает приблизительно 30-60 секунд.
В обозревателе решений дважды щелкните значок _UpgradeReport.htm. Этот отчет отображает результаты обновления. Обратите внимание, что все
в формах, за исключением frmClipboard, обновлены без проблем.
Разверните узел frmClipboard.vb Просмотр вопросов. Clipboard.SetText и GetText обновление не правильно. Щелкните соответствующую ссылку в Описание Чтобы просмотреть способы устранения проблем.
В обозревателе решений следует отметьте все формы хранятся
меняется с .frm с исходными именами, но расширение файла
. vb.
Разверните узел Ссылки. Обратите внимание, что ссылки на все компоненты, которые необходимы
Чтобы использовать компоненты прежних версий Visual Basic и ADO были добавлены
автоматически.
Щелкните правой кнопкой мыши любой из форм и нажмите кнопку Просмотр кода. Разверните узел Обновление технической поддержки регион. В этой области отображаются как в Visual Studio.NET или настроить Visual Studio 2005
различные свойства и переменные для поддержки обновленный код.
В обозревателе решений щелкните правой кнопкой мыши frmClipboard.vb, а затем нажмите кнопку Просмотр кода. Обратите внимание, что комментарии, размещенные до строки, которые были
не обновлять.
Изменение Command1_Click и Command2_Click следующие события:
Private Sub Command1_Click(ByVal eventSender As System.Object, _
ByVal eventArgs As System.EventArgs) Handles Command1.Click
Clipboard.SetDataObject(Text1.Text)
End Sub
Private Sub Command2_Click(ByVal eventSender As System.Object, _
ByVal eventArgs As System.EventArgs) Handles Command2.Click
Text1.SelectedText = _
Clipboard.GetDataObject().GetData(GetType(System.String))
End Sub
Полный листинг кода
Полный пример кода (frmADO.frm)
Private Sub Command1_Click()
Unload Me
End Sub
Private Sub Form_Load()
Dim cn As Connection
Set cn = New Connection
cn.ConnectionString = "Provider=sqloledb;Data Source=localhost;database=northwind;user id=<username>;password=<strong password>"
cn.Open
Dim rs As Recordset
Set rs = New Recordset
rs.CursorLocation = adUseClient
rs.Open "select * from products", cn
Set MSHFlexGrid1.DataSource = rs
End Sub
Полный пример кода (frmClipboard.frm)
Private Sub Command1_Click()
Clipboard.SetText Text1.SelText
End Sub
Private Sub Command2_Click()
Text1.SelText = Clipboard.GetText
End Sub
Complete Code Listing (frmMain.frm)
Private Sub Command1_Click()
frmADO.Show
End Sub
Private Sub Command2_Click()
frmClipboard.Show
End Sub
Проверка работы приложения
Нажмите клавишу F5 для запуска приложения.
В строке, чтобы сохранить проект нажмите кнопку ОК.
В форме Form1 щелкните ADO. На экране появляется форма, содержащий данные в сетке. Закройте это
форма.
В форме Form1 щелкните Буфер обмена.
Нажмите кнопку Копировать.
Поместите курсор в текстовое поле в начале
текст и нажмите кнопку Вставить. Вы увидите вставленного текста.
Устранение неполадок
Visual Basic.NET является радикальные перемены из предыдущих версий
Visual Basic. Для многих проектов рекомендуется использовать некоторые обширная подготовительная работа
Перед обновлением. Ссылки на документ для информации, которая может
помогают упростить обновление:
ВНИМАНИЕ! Перевод данной статьи был выполнен не человеком, а с помощью программы машинного перевода, разработанной корпорацией Майкрософт. Корпорация Майкрософт предлагает вам статьи, переведенные как людьми, так и средствами машинного перевода, чтобы у вас была возможность ознакомиться со статьями базы знаний KB на родном языке. Однако машинный перевод не всегда идеален. Он может содержать смысловые, синтаксические и грамматические ошибки, подобно тому как иностранец делает ошибки, пытаясь говорить на вашем языке. Корпорация Майкрософт не несет ответственности за неточности, ошибки и возможный ущерб, причиненный в результате неправильного перевода или его использования. Корпорация Майкрософт также часто обновляет средства машинного перевода.
Спасибо! Благодаря вашему отзыву мы сможем сделать справочные материалы еще лучше. Чтобы воспользоваться дополнительными возможностями поддержки, посетите домашнюю страницу центра справки и поддержки.