обовий рахунок! n »;
label4- gt; Text=label4- gt; Text + «Ваш особовий рахунок:« + tv- gt; getid () + » n»; - gt; Text=label4- gt; Text + « Ваш баланс: «+ tv- gt; getamount () +» n »;
exit;
}
}
{: Show («Ви заповнили не всі поля! Пожалуста перевірте введення!», «Помилка») ;;
}
} - gt; Enabled=1; - gt; Text=»»; - gt; Text=«0»;
}
Кнопка «Оплатити»:
private: System: Void button4_Click (System: Object ^ sender, System: EventArgs ^ e) {((textBox1- gt; Text!=»») amp; amp; (textBox2- gt; Text !=»»)) {int flag; gt; openFileDialog1- gt; Filter=«txt files (* .txt) | * .txt | Всі файли (*. *) | *. *»; gt; openFileDialog1- gt; FilterIndex=1;=this- gt; openFileDialog1- gt; FileName; (! filename- gt; IsNullOrEmpty (filename)) {(textBox1- gt; Text =="") {
MessageBox: Show («Будь ласка введіть номер особового рахунку!», «Помилка»);
exit;
}
{((Convert: ToInt32 (textBox2- gt; Text)% 10!=0) || (Convert: ToInt32 (textBox2- gt; Text)% 10 gt; 10000) || (Convert:ToInt32 (textBox2- gt; Text)% 10 lt; 0))
{: Show («Будь ласка перевірте введення суми! Сума повинна бути неотрицательной і кратної 10!», «Помилка»);
exit;
}
{= tv- gt; pay («1.txt», Convert: ToInt32 (textBox1- gt; Text), Convert: ToInt32 (textBox2- gt; Text)," »); - gt ; Visible=1; ((flag!=300) amp; amp; (flag!=900))
{- gt; Text=»»; - gt; Text=«Операція пройшла успішно! n»;
label9- gt; Text=label9- gt; Text + «Ваш особовий рахунок:« + tv- gt; getid () + » n»; - gt; Text=label9- gt; Text + « Ваш баланс: «+ tv- gt; getamount () +» n »;
exit;
}
{(flag == 900)
{: Show («Дана обліковий запис була зареєстрована раніше! Залогіньтесь реєстрацію!», «Помилка») ;;
}
{- gt; Text=»» ;: Show («На вашому особовому рахунку недостатньо коштів! Поповніть рахунок!», «Помилка»);
label9- gt; Text=label9- gt; Text + «Ваш особовий рахунок:« + tv- gt; getid () + » n»;
label9- gt; Text=label9- gt; Text + «Ваш баланс:« + tv- gt; getamount () + » n» ;;
}
}
}
}
}
}: Show («Ви не ввели всі дані! Будь ласка заповніть всі поля!», «Помилка»); - gt; Text=»»; - gt; Text=«0»;
}
Далі представлений текст програми для роботи з вікном оплати послуг мобільного зв'язку.
Кнопка «Оплатити»:
private: System: Void button4_Click (System: Object ^ sender, System: EventArgs ^ e) {str1; (textBox1- gt; Text!=»») {int flag; gt; openFileDialog1- gt ; Filter=«txt files (* .txt) | * .txt | Всі файли (*. *) | *. *»; gt; openFileDialog1- gt; FilterIndex=1;=this- gt; openFileDialog1- gt; FileName; (! filename- gt; IsNullOrEmpty (filename)) {(textBox1- gt; Text == »») {
MessageBox: Show («Будь ласка введіть свій номер!», «Помилка»);
exit;
}
{(Convert: ToInt32 (textBox2- gt; Text)% 10!=0)
{: Show («Сума повинна бути кратна 10!», «Помилка»);
exit;
}
{((label2- gt; Text), str1);=mobile_l- gt; pay («3.txt», Convert: ToInt32 (textBox1- gt; Text), Convert: ToInt32 (textBox2- gt; Text), str1); - gt; Visible=1; - gt; Text=»»; - gt; Text=«Баланс вашого рахунку успішно поповнений n»; - gt; Text=label1- gt; Text + « Ваш номер: «+ label2- gt; Text + mobile_l- gt; getid () +» n »; - gt; Text=label1- gt; Text +« Ваш баланс: «+ mobile_l- gt; getamount () +» n »;
}
}
}
}: Show («Будь ласка введіть свій номер і суму оплати!», «Помилка»);
button2- gt; Enabled=1; - gt; Enabled=1; - gt; Enabled=1;
}
Далі представлений текст програми для роботи з вікном оплати послуг ЖКГ.
Кнопка «Оплатити»:
private: System: Void button1_Click (System: Object ^ sender, System: EventArgs ^ e) {str1; int flag;((textBox1-gt;Text!=»»)amp;amp;(textBox2-gt;Text!...
