Дипломная работа: Автоматизация процесса контроля знаний учащихся ГОУ СОШ №17

Скачать

Заказать новую работу

Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам
100
}
public: System::Void comboBox1_SelectedIndexChanged(System::Object^ sender,
System::EventArgs^ e) {
НазваниеТеста = comboBox1->Text;
}
public: System::Void button1_Click(System::Object^ sender, System::EventArgs^
e) {
try
{
int АдресТеста = НазваниеТеста->IndexOf("Тест");
String^ НазваниеПредмета = НазваниеТеста->Substring(0,
АдресТеста - 1);
label16->Text = НазваниеПредмета;
label4->Text = "1";
Команда = gcnew OleDb::OleDbCommand(String::Format("SELECT *
From [{0}]", НазваниеТеста), Подключение);
Подключение->Open();
//Создаем объект класса Adapter и выполняем SQL-запрос
Адаптер = gcnew OleDb::OleDbDataAdapter(Команда);
//Создаем объект класса DataSet
НаборДанных = gcnew DataSet();
//Заполняем DataSet результатом SQL-запроса
Адаптер->Fill(НаборДанных, String::Format("{0}", НазваниеТеста));
Подключение->Close();
dataGridView1->DataSource = НаборДанных;
101
dataGridView1->DataMember = String::Format("{0}", НазваниеТеста);
КоличествоКолонок = dataGridView1->ColumnCount;
textBox1->Text = Convert::ToString(dataGridView1[0, 0]->Value);
textBox2->Text = Convert::ToString(dataGridView1[0, 1]->Value);
textBox3->Text = Convert::ToString(dataGridView1[0, 2]->Value);
textBox4->Text = Convert::ToString(dataGridView1[0, 3]->Value);
textBox5->Text = Convert::ToString(dataGridView1[0, 4]->Value);
textBox6->Text = Convert::ToString(dataGridView1[0, 5]->Value);
textBox7->Text = Convert::ToString(dataGridView1[0, 6]->Value);
textBox8->Text = Convert::ToString(dataGridView1[0, 7]->Value);
textBox9->Text = Convert::ToString(dataGridView1[0, 8]->Value);
textBox10->Text = Convert::ToString(dataGridView1[0, 9]->Value);
НомерВопроса = 1;
}
catch (Exception ^ Ситуация) {
// Отчет о других ошибках:
MessageBox::Show(Ситуация->Message, "Ошибка",
MessageBoxButtons::OK, MessageBoxIcon::Exclamation);
}
}
public: System::Void button3_Click(System::Object^ sender, System::EventArgs^
e) {
//Вперед
try {
102
//Сохранить данные
dataGridView1[НомерВопроса - 1, 0]->Value = textBox1->Text;
dataGridView1[НомерВопроса - 1, 1]->Value = textBox2->Text;
dataGridView1[НомерВопроса - 1, 2]->Value = textBox3->Text;
dataGridView1[НомерВопроса - 1, 3]->Value = textBox4->Text;
dataGridView1[НомерВопроса - 1, 4]->Value = textBox5->Text;
dataGridView1[НомерВопроса - 1, 5]->Value = textBox6->Text;
dataGridView1[НомерВопроса - 1, 6]->Value = textBox7->Text;
dataGridView1[НомерВопроса - 1, 7]->Value = textBox8->Text;
dataGridView1[НомерВопроса - 1, 8]->Value = textBox9->Text;
dataGridView1[НомерВопроса - 1, 9]->Value = textBox10->Text;
//Листать в перед
if (НомерВопроса < КоличествоКолонок)
{
НомерВопроса = Convert::ToInt32(label4->Text) + 1;
}
else
{
НомерВопроса = 1;
}
label4->Text = Convert::ToString(НомерВопроса);
textBox1->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 0]->Value);
103
textBox2->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 1]->Value);
textBox3->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 2]->Value);
textBox4->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 3]->Value);
textBox5->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 4]->Value);
textBox6->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 5]->Value);
textBox7->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 6]->Value);
textBox8->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 7]->Value);
textBox9->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 8]->Value);
textBox10->Text = Convert::ToString(dataGridView1[НомерВопроса -
1, 9]->Value);
}
catch (Exception ^ Ситуация) {
// Отчет о других ошибках:
MessageBox::Show(Ситуация->Message, "Ошибка",
MessageBoxButtons::OK, MessageBoxIcon::Exclamation);
}
}
104
public: System::Void button2_Click(System::Object^ sender, System::EventArgs^
e) {
//Назад
try {
//Сохранить данные
dataGridView1[НомерВопроса - 1, 0]->Value = textBox1->Text;
dataGridView1[НомерВопроса - 1, 1]->Value = textBox2->Text;
dataGridView1[НомерВопроса - 1, 2]->Value = textBox3->Text;
dataGridView1[НомерВопроса - 1, 3]->Value = textBox4->Text;
dataGridView1[НомерВопроса - 1, 4]->Value = textBox5->Text;
dataGridView1[НомерВопроса - 1, 5]->Value = textBox6->Text;
dataGridView1[НомерВопроса - 1, 6]->Value = textBox7->Text;
dataGridView1[НомерВопроса - 1, 7]->Value = textBox8->Text;
dataGridView1[НомерВопроса - 1, 8]->Value = textBox9->Text;
dataGridView1[НомерВопроса - 1, 9]->Value = textBox10->Text;
//Листать в назад
if (НомерВопроса == 1)
{
НомерВопроса = КоличествоКолонок;
}
else
{
НомерВопроса = Convert::ToInt32(label4->Text) - 1;
}
Источник: https://baza.diplomsite.ru/previewfile/2096

Смотрите также:

144969
16.04.20 г. Определение цены и объёма сбыта
Анализ и оценка деятельности предприятия ООО КАПС дизайн
Билеты к экзамену по модулю
Ветеринарно-санитарная экспертиза меда
Возникновение и формирование идеи образа человек без направления на страницах публицистических произведений Н.С. Лескова
Геномные исследования как проявление трансформации меры свободы в юридически значимом поведении
Диагностика и тактика хирургического лечения обструктивно-гнойного калькулезного пиелонефрита у детей
Знаки соответствия на товарах
Исследование взаимосвязи литературы и культуры за рубежом