Texnologiyalari va kommunikatsiyalarni rivojlantirish vazirligi toshkent axborot texnologiyalari universiteti

Tajriba ishi №18 
Mavzu: Mini loyihalar yaratish: dastur tuzish. 
Ishni bajarishdan maqsad: Visual Studio 2012 muhitida C++ dasturlash tilida 
mobil aloqa kompaniyalari mijozlariga hizmat ko’rsatish dasturini yaratish. 
Nazariy qism: 
 Mabil aloqa kompaniyalarida mijozlarga xizmat ko’rsatish qudagi turlardan iborat 
1.Tariflar bilan ishlash, qulay tariflarni tanlash, tariflar qo’shish va tariflarni o’chirsh 
mumkin. 
2. Internet paketlarini tanlash va ularga o’zgartirishlar kiritish. 
3.Administrator bo’limini yaratish(1 - rasm). 
  
 
1-rasm . Form oynasi  

---

 
113 
18 – Tajriba ishida internet paketlar bo’limini shakillantiramiz. 
Internet paketlar bo’limi operator va mijozlarga xizmat qiladi. 
Dastlab  form  mihozlar  uchun  xizmat  qiladi.  Agar  login  va  parol  kiritilsa  bu 
form operatorlar uchun xizmat qiladi. 
Mijozlarning imkoniyatlari bir muncha cheklangan bo’ladi, faqat o’zlariga 
maqul Internet to’plamini tanlab biladilar.  
 
1-rasm.Mijozlar uchun 
Login va parol kiritilsa unda formda o’zgarishlar yuz beradi. 
 
2 – rasm. Operator uchun 

---

 
114 
Operatorlar internet to’plamini qo’shib bilishi mumkin. 
 
Yuklash tugmasi bosilsa yangi to’plam qo’shiladi.  
 
//Paket bo’limi kodi 
#pragma
 
endregion
 
 
private
: System::
Void
 listView1_SelectedIndexChanged(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) { 
 
 
 
 } 
private
: System::
Void
 button1_Click(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) 
{ 
 
 
 } 
private
: System::
Void
 Paket_Load(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) { 

---

 
115 
 
 
 
 
Paket
 ^ F = 
gcnew
 
Paket
; 
 
if
(ok) 
 
 
 
 
this
->Width = 875; 
 
 
 
 oleDbDataAdapter1->Fill(dataSet1); 
 
 
 
 oleDbDataAdapter2->Fill(dataSet1); 
 
 
 
 oleDbDataAdapter3->Fill(dataSet1); 
 
 
} 
private
: System::
Void
 dataGridView1_CellContentClick(System::
Object
^ 
sender
, 
System::Windows::Forms::
DataGridViewCellEventArgs
^ 
e
) { 
 
 
 } 
private
: System::
Void
 tabPage1_Click(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) { 
 
 
 } 
private
: System::
Void
 button1_Click_1(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) { 
 
 
 
 oleDbDataAdapter1 -> Update(dataSet1-
>Tables[
"Paket_kunlik"
]); 
 
 
 } 
private
: System::
Void
 groupBox1_Enter(System::
Object
^ 
sender
, 
System::
EventArgs
^ 
e
) { 
 
 
 } 
private
: System::
Void
 textBox1_TextChanged(System::
Object
^ 
sender
, 
System::
EventArgs
^ 
e
) { 
 
 
 } 
private
: System::
Void
 bindingNavigatorCountItem_Click(System::
Object
^ 
sender
, 
System::
EventArgs
^ 
e
) { 
 
 
 } 
private
: System::
Void
 button5_Click(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) 
{ 
 
 
 
 
if
(k1 -> Text != 
""
 && k2 -> Text != 
""
 && k3 -> Text != 
""
 && 
k4 -> Text != 
""
 && k5 -> Text != 
""
) 

---

 
116 
 
 
 
 { 
 
 
 dataSet1 -> Tables[
"Paket_kunlik"
] -> Rows -> Add(k1 -> Text , k2 -> 
Text , k3 -> Text , k4 -> Text , k5 -> Text); 
  
oleDbDataAdapter1 -> Update(dataSet1 -> Tables[
"Paket_kunlik"
]);  
  
 
 
 
 k1 -> Text = 
""
;  
 
 
 
 k2 -> Text = 
""
; 
 
 
 
 k3 -> Text = 
""
;  
 
 
 
 k4 -> Text = 
""
; 
 
 
 
 k5 -> Text = 
""
; 
 
 
 
} 
 
 
 
 
else
 
 
 
 
 
 
MessageBox
::Show(
"Iltimos jadvalni to'ldiring"
); 
 
 
 } 
 
private
: System::
Void
 button4_Click(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) { 
 
 
 
 
if
(h1 -> Text != 
""
 && h2 -> Text != 
""
 && h3 -> Text != 
""
 && 
h4 -> Text != 
""
 && h5 -> Text != 
""
) 
 
 
 
 { 
  
  
 dataSet1 -> Tables[
"Paket_Haftalik"
] -> Rows -> Add(h1 -> Text , h2 -
> Text , h3 -> Text , h4 -> Text , h5 -> Text); 
  
oleDbDataAdapter2 -> Update(dataSet1 -> Tables[
"Paket_Haftalik"
]); 
 
 
 
 h1 -> Text = 
""
 ;  
 
 
 
 
h2 -> Text = 
""
 ; 
 
 
 
 
h3 -> Text = 
""
 ; 
 
 
 
 
h4 -> Text = 
""
 ;  
 
 
 
 
h5 -> Text = 
""
 ; 
 
 
 
 } 
 
 
 
 
else
 
 
 
  
 
 
MessageBox
::Show(
"Iltimos jadvalni to'ldiring"
); 
 
 
 } 

---

 
117 
private
: System::
Void
 button3_Click(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) 
{ 
 
 
 
 
if
(o1 -> Text != 
""
 && o2 -> Text != 
""
 && o3 -> Text != 
""
 && 
o4 -> Text != 
""
 ) 
 
 
 
 { 
  
  
 dataSet1 -> Tables[
"Paket_oylik"
] -> Rows -> Add(o1 -> Text , o2 -> 
Text , o3 -> Text , o4 -> Text); 
  
oleDbDataAdapter3 -> Update(dataSet1 -> Tables[
"Paket_oylik"
]);   
  
 
 
 
 o1 -> Text = 
""
 ; 
 
 
 
 o2 -> Text = 
""
 ; 
 
 
 
 o3 -> Text = 
""
 ; 
 
 
 
 o4 -> Text = 
""
 ; 
 
 
 
 } 
 
 
 
 
else
 
 
 
  
 
 
MessageBox
::Show(
"Iltimos jadvalni to'ldiring"
); 
 
 
 } 
private
: System::
Void
 button6_Click(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) 
{ 
 
  
oleDbDataAdapter1 -> Update(dataSet1 -> Tables[
"Paket_kunlik"
]);  
 
 
  
 
MessageBox
::Show(
"Saqlash bajarildi"
); 
 
 
 } 
private
: System::
Void
 button2_Click(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) 
{ 
 
 
  
oleDbDataAdapter2 -> Update(dataSet1 -> 
Tables[
"Paket_Haftalik"
]); 
 
 
 
 
MessageBox
::Show(
"Saqlash bajarildi"
); 
 
 
 } 
private
: System::
Void
 button1_Click_2(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) { 
 
 
  
oleDbDataAdapter3 -> Update(dataSet1 -> 
Tables[
"Paket_oylik"
]); 

---

 
118 
 
 
  
MessageBox
::Show(
"Saqlash bajarildi"
); 
 
 
 } 
private
: System::
Void
 bindingNavigator1_RefreshItems(System::
Object
^ 
sender
, 
System::
EventArgs
^ 
e
) { } 
Tajriba ishi №19 
Mavzu: Individual erkin dastur loyihalash. 
Ishni bajarishdan maqsad: Calendar dasturini Visual Studio dasturida yaratish. 
Nazariy qism: 
Calendar dasturi – hohlagan sanani kiritgan vaqtda bizga shu sananing haftaning 
qaysi  kuniga  to’g’ri  kelishini  ko’rsatuvchi  dastur  hisoblanadi.  Bu  dastur  yordamida 
boshqa calendar dasturlaridan farqli faqat hafta kuni ko’rsatiladi. Afzallik tomoni bu 
dastur  yordamida  C  ++  dasturlash  tilida  int  tipi  qabul  qila  oladigana  barcha  yillar 
uchun hafta kunlarini aniqlashimiz mumkin. 
Buni quyidagiga dasturda ko’rib chiqamiz: 
Calendar dasturi faqat asosiy oynadan tashkil topgan bo’lib, hamma amallar shu 
oynada bajariladi. Bu oynaning ko’rinishi quyidagicha: 
 
 
Bunda  sana  kun,  oy  va  yilni  kiritish  uchun  comboBox  komponentasidan 
foydalanamiz.  Sanani  yil,  oy  va  kunni  kiritigandan  so’ng  Xisoblash  tugmachasi 
bosiladi bunda quyi textBox komponentasida bizga natija ko’rsatiladi. 

---

 
119 
Natija : 
 
 
 
Agar  sana  xato  kiritilsa  bunda  bizga  sana  xato  kiritilganligi  to’g’risida  xabar 
beriladi: 
 
Dastur kodi quyidagicha: 
#pragma endregion 
private: System::Void button1_Click(System::Object^ sender, 
System::EventArgs^ e) { 

---

 
120 
ok = 1; 
kun = System::Convert::ToInt64(comboBox1->Text); 
yil = System::Convert::ToInt64(comboBox3->Text); 
if(comboBox2->Text == "Yanvar") 
 oy = 1; 
else if(comboBox2->Text == "Fevral") 
 oy = 2; 
else if(comboBox2->Text == "Mart") 
oy = 3; 
else if(comboBox2->Text == "Aprel") 
oy = 4; 
else if(comboBox2->Text == "May") 
oy = 5; 
 else if(comboBox2->Text == "Iyun") 
oy = 6; 
else if(comboBox2->Text == "Iyul") 
 oy = 7; 
else if(comboBox2->Text == "Avgust") 
oy = 8; 
else if(comboBox2->Text == "Sentabr") 
oy = 9; 
else if(comboBox2->Text == "Oktabr") 
oy = 10; 
else if(comboBox2->Text == "Noyabr") 
 oy = 11; 
 else if(comboBox2->Text == "Dekabr") 
 oy = 12; 
else 
ok = 0; 
 
if(yil < 0 || kun <= 0 || kun > 31) 

---

 
121 
ok = 0; 
if(oy == 4 || oy == 6 || oy == 9 || oy == 11){ 
if(kun == 31) 
ok = 0; 
} 
 if(ok && oy == 2){ 
if(yil % 4 != 0){ 
if(kun > 28) 
ok = 0; 
} 
else{ 
 if(yil % 100 == 0){ 
 
 
 
 
  
 if(yil % 400 == 0){ 
 if(kun > 29) 
 ok = 0; 
 } 
 
 
 
 
 
 
else{ 
if(kun > 28) 
 ok = 0; 
 } 
 } 
else{ 
if(kun > 29) 
 ok = 0; 
} 
} 
} 
for(int i = 1; i < oy; i ++) 
if(i == 1 || i == 3 || i == 5 || i == 7 || i == 8 || i == 10 || i == 12) 
kun += 31; 
else if(i == 2) 

---

 
122 
if(yil % 4 == 0) 
if(yil % 100 == 0 && yil % 400 != 0) 
 kun += 28; 
else 
 kun += 29; 
else 
 kun += 28; 
 else 
 kun += 30; 
 __int64 s = ((yil - 1) * 365 + (yil - 1) / 4 + kun - (yil - 1) / 100 + (yil - 1) / 400) % 7; 
 if(ok) 
switch(s) { 
case 0 : textBox1 ->Text = "Yakshanba"; break; 
case 1 : textBox1 ->Text = "Dushanba"; break; 
case 2 : textBox1 ->Text = "Seshanba"; break; 
case 3 : textBox1 ->Text = "Chorshanba"; break; 
 case 4 : textBox1 ->Text = "Payshanba"; break; 
case 5 : textBox1 ->Text = "Juma"; break; 
case 6 : textBox1 ->Text = "Shanba"; break; 
} 
else 
textBox1->Text = "Bunday sana mavjud emas !"; 
} 
}; 
} 

---

 
123 
Tajriba ishi №20 
Mavzu: Individual erkin dastur yaratish 
Ishni bajarishdan maqsad: Visual Studio 2012 muhitida C++ dasturlash tilida  
Individual dastur yaratish. 
Nazariy qism: 
 Windows media player dasturi – Video ilovalarni ochish uchun va uni ko’rish uchun 
hizmat qiladi.  
 
 Dasturni yaratish. 
1.Form oynasi yaratiladi. 
2.Toolbox dan Choose Items tanlanadi va Com components bo’limidan windows 
media player tanlanadi. 

---

 
124 
 
 toolboxda yangi kompanenta xosil bo’ladi. 
 
Kerakli kompanentalarni tanlab form oynasini qurib olamiz. 
 

---

 
125 
 
 
Dastur kodi: 
#pragma
 
endregion
 
 
private
: System::
Void
 button1_Click(System::
Object
^ 
sender
, 
System::
EventArgs
^ 
e
) { 
 
 
 
 
 
OpenFileDialog
 ^ op = 
gcnew
 
OpenFileDialog
; 
 
 
 
 
 op->ShowDialog(); 
 
 
 
 
 textBox1->Text = op->FileName; 
 
 
 
 } 

---

 
126 
 
private
: System::
Void
 button2_Click(System::
Object
^ 
sender
, 
System::
EventArgs
^ 
e
) { 
 
 
 
 
 axWindowsMediaPlayer1->URL = textBox1->Text; 
 
 
 
 
 axWindowsMediaPlayer1->Ctlcontrols->play(); 
 
 
 
 } 
private
: System::
Void
 button3_Click(System::
Object
^ 
sender
, System::
EventArgs
^ 
e
) 
{ 
 
 
 
 axWindowsMediaPlayer1->Ctlcontrols->stop(); 
 
 
 } 
 
 
 
 
 
 

---

 
127 
 
 
 
 
 
 
 
 
 
 
 
 
 

---

 
128 
 
 
 
 
 
 
 
 
 
 
 
ALIYEV O.A, XO‘JAMURATOV B. 
 
«C++ da dasturlash» fanidan tajriba ishlarini bajarish 
bo‘yicha uslubiy ko‘rsatma 
 
 
 
 
 
 
 
 
 
 
 
 
Qog’oz formati 60х90 1/8. Shartli bosma tabog’ 2,1. Nashr tabog’i 2,0. Adadi 100 nusxa. 
TATU Urganch filiali ARMda tarqatma material sifatida ko‘paytirildi. Urganch shaxri, Al-
Xorazmiy ko’chasi 110-uy. 

---

 
129