Visual Basic - Program Aplikasi Penghitung Nilai Ujian Akhir Semester

Salam hangat pengunjung terhormat,
    Pembahasan kali ini kita akan membahas mengenai Visual Basic dan disini adalah syntak pembuatan program aplikasi PENGHITUNG NILAI UJIAN AKHIR SEMESTER

'syintax dibawah merupakan syintak untuk membersihkan text
Private Sub cmdbersih_Click()
'ket: dari txtnm s/d txtakhir berilah tanda 0 jika berupa angka atau tanda kutip saja "" sbg ket kosong
txtnm.Text = ""
txtabsen = 0
txttugas = 0
txtuts = 0
txtuas = 0
txtakhir = 0
'ket: untuk membuat kursor mouse terfokus di textbox tertentu ketika menekan tombol bersih, ketiklah namatext.setfocus contoh: txtnama.setfocus
txtnm.SetFocus
'ket: syntak dibawah dari cmdporses s/d txtakhir merupakan syntak untuk menonaktifkan tombol ketika menekan tombol bersih
'contoh : namatombol.enabled=false (untuk menonaktifkan gunakan "False" dan enabled)
cmdproses.Enabled = False
cmdkeluar.Enabled = False
cmdbersih.Enabled = False
txtakhir.Enabled = False
End Sub
'ket : syntak dibawah untuk keluar dari program, caranya dengan menggunakan logika IF
Private Sub cmdkeluar_Click()
'ket: "c" disana sebagai variable (bebas menggunakan abjad apapun)
'Msgbox = merupakan format untuk membuat jendela dialog ketika kita menekan tombol keluar,
'contoh untuk membuat rumus msgbox : c=MsgBox("Gunakan kalimat yang ingin anda tampilkan disini", vbOKCANCEL + vbQuestion, "keterangan")
'ket: vbOKCANCEL sebagai opsi pilihan tombol OK dan CANCEL di Massage Box, jika OK maka Keluar, jika CANCEL maka tetap
'ket: vbQuestion sebagai opsi pertanyaan (simbol tandatanya di Massage Box atau bisa menggunakan vbINFORMATION sebagai opsi Perhatian di MsgBox
c = MsgBox("Apakah Anda yakin ingin keluar?", vbOKCancel + vbQuestion, "Perhatian!")
'gunakanlah rumus if setelah mengetikan MsgBox
If c = vbOK Then 'jika c memilih OK maka program akan berakhir (end) lalu (end if)
End
End If
End Sub

Private Sub cmdproses_Click()
txtakhir = Val((txtabsen.Text) * 0.1) + Val((txtuts.Text) * 0.3) + Val((txttugas.Text) * 0.2) + Val((txtuas.Text) * 0.4)
txtakhir.Enabled = True 'syntax untuk mengaktifkan textbox nilai akhir ketika klik tombol proses
End Sub

Private Sub Form_Load() 'ket : form load yaitu saat form dijalankan maka tombol cmdproses s/d txtakhir dalam keadaan tidak aktif dengan menggunakan "false"
cmdproses.Enabled = False
cmdkeluar.Enabled = False
cmdbersih.Enabled = False
txtakhir.Enabled = False
End Sub


Private Sub txtnm_Change()
txtnm.SetFocus
End Sub

Private Sub txtuas_Change() 'ket : ketika mengetik di text box uas maka tombol cmdproses s/d cmdbersih dalam keadaan aktf "True"
cmdproses.Enabled = True
cmdkeluar.Enabled = True
cmdbersih.Enabled = True
End Sub

Tampilan dibawah setelah dirun


Terima kasih semoga berhasil

Contoh C++ Program Array Dimensi Tiga - Data Entri Karyawan

Salam hangat pengunjung yang terhormat,
     Ini adalah program yang sudah lama saya buat, dan hari ini saya membagikannya untuk anda yang sedang mencari referensi untuk study, Contoh C++ Program Array Dimensi Tiga - Data Entri Karyawan, jika anda yang sudah pernah berkunjung kesini tentunya sudah melihat:
Tampilan C++ Array Dimensi 3, Program Kasir Penjualan dan Contoh C++ Array Dimensi Tiga, Program Kasir Pesanan Pizza.
     Program ini masih sangat sederhana, didalamnya difungsikan untuk menginput data banyaknya karyawan dan sistem penggajian.

#include <conio.h>
#include <stdio.h>
#include <iostream.h>
main()
{
char nama[100][20],nip[100][6],*bulan,*status[10],kostat,*jabatan[100];
long totkes;
int a,b,kobul,kojab,gapok[100],tunjangan[100],totgaj[100];
cout<<"                 Data Entry Operator"<<endl;
cout<<"                    PD TANI JAYA    "<<endl;
cout<<"          Jl.Gn.Sabeulah No 12 Kota Tasikmalaya"<<endl;
cout<<"======================================================"<<endl;
cout<<" Admin : Alfy Maghfira"<<endl;
cout<<" Input Data Karyawan "<<endl;
cout<<" Jumlah Karyawan     = ";cin>>b;
cout<<" Bulan               = ";cin>>kobul;
for(a=1;a<=b;a++)
{

cout<<" Input Data Karyawan   "<<endl;
cout<<" Data Karyawan ke    = "<<a<<endl;
cout<<" NIP Karyawan        = ";cin>>nip[a];
cout<<" Nama Karyawan       = ";cin>>nama[a];
cout<<" Kode Jabatan [1/2]  = ";cin>>kojab;
cout<<" Kode Status [M/S]   = ";cin>>kostat;
if(kojab==1)
{
jabatan[a]="Operator";
gapok[a]=800000;
  if(kostat=='M'||kostat=='m')
  { status[a]="Menikah";
    tunjangan[a]=200000;}
  else if(kostat=='S'||kostat=='s')
  { status[a]="Single";
    tunjangan[a]=100000;}
 else
   {cout<<"Kode Status salah";}}
else if(kojab==2)
{ jabatan[a]="Sales";
  gapok[a]=850000;
  if(kostat=='M'||kostat=='m')
  { status[a]="Menikah";
    tunjangan[a]=250000;}
    else if(kostat=='S'||kostat=='s')
  { status[a]="Single";
    tunjangan[a]=150000;}
    else
    {cout<<"Kode Status Salah";}}

else
cout<<"Kode Jabatan salah, input lagi : ";


{

cout<<endl;
if(kobul==1)
{
bulan="Januari";}
 else if(kobul==2)
{ bulan="Februari";}
 else if(kobul==3)
{ bulan="Maret";}
 else if(kobul==4)
{ bulan="April";}
 else if(kobul==5)
{ bulan="Mei";}
 else if(kobul==6)
{ bulan="Juni";}
 else if(kobul==7)
{ bulan="Juli";}
 else if(kobul==8)
{ bulan="Agustus";}
 else if(kobul==9)
{ bulan="September";}
 else if(kobul==11)
{ bulan="November";}
 else if(kobul==12)
{ bulan="Desember";}
else
cout<<"Anda Salah Memasukan bulan";

} }
clrscr();
cout<<"                   Daftar Gaji Karyawan         "<<endl;
cout<<"                    ""PD TANI JAYA""            "<<endl;
cout<<"          Jl.Gn.Sabeulah No.12 Kota Tasikmalaya "<<endl;
cout<<" Bulan    = "<<bulan<<endl;
cout<<"======================================================================"<<endl;
cout<<"No   NIP  Nama     Nama      Status     Gaji   Tunjangan   Total      "<<endl;
cout<<"                   Jabatan              Pokok              Gaji       "<<endl;
cout<<"======================================================================"<<endl;
     //1234567890123456789012345678901234567890123456789012345678901234567890
totkes=0;
for(a=1;a<=b;++a)
{
gotoxy(1, a+8);    cout<<a;
gotoxy(5, a+8);    cout<<nip[a];
gotoxy(10, a+8);   cout<<nama[a];
gotoxy(20,a+8);    cout<<jabatan[a];
gotoxy(30,a+8);    cout<<status[a];
gotoxy(40,a+8);    cout<<gapok[a];
gotoxy(49,a+8);    cout<<tunjangan[a];
totgaj[a]=gapok[a]+tunjangan[a];
gotoxy(60,a+8);    cout<<totgaj[a];

totkes=totkes+totgaj[a];

}
cout<<"\n======================================================================"<<endl;
cout<<"                             Total Gaji Keseluruhan  Rp.  "<<totkes<<endl;

cout<<"Pastikan dengan benar, input data hari ini!"<<endl;

getch();
}

    Berikut adalah tampilan setelah di RUN :

 

Tampilan setelah di enter

Semoga bermanfaat, ada baiknya anda juga mengunjungi contoh file Program C++ Penghituangan Luas Segi TIga

Download File Program Data Entry Operator disini 

Contoh C++ Fungsi IF - Program Transaksi Penginapan Hotel

Salam hangat pengunjung yang terhormat,
Contoh C++ Fungsi IF - Program Transaksi Penginapan Hotel
     Ini adalah program C++ yang sudah banyak dikenal dan dipakai, tapi ada baiknya saya share kembali guna memberikan ilmu yang bermanfaat bagi anda yang sedang masa studi, belajar C++.

#include<iostream.h>
#include<conio.h>
#include<stdio.h>

main()
{
char kd_kamar,nm_tamu[20],kd_kls,nm_kls[10],nm_kamar[10];
int  lama,by;
long harga,total;

cout<<"=================================================="<<endl;
cout<<"\t\t       HOTEL ALFY \n";
cout<<"=================================================="<<endl;
cout<<"Nama Penginap : ";gets(nm_tamu);
cout<<"=================================================="<<endl;
cout<<"Pilihan Kamar :\n";
cout<<"1.Mawar \n";
cout<<"2.Melati \n";
cout<<"3.Anggrek \n";
cout<<"==================================================="<<endl;
cout<<"Input Pilihan Kamar [1/2/3] : ";cin>>kd_kamar;
cout<<"Input Pilihan Kelas [A.VIP/B.Reguler]   : ";cin>>kd_kls;


if (kd_kamar=='1')
{
    	strcpy(nm_kamar,"Mawar");
     	if (kd_kls=='a'||kd_kls=='A')
     	{strcpy(nm_kls,"VIP");
       by=25000;
       harga=250000;}
      else
      {strcpy(nm_kls,"Reguler");
       by=0;
       harga=250000;}
}
else if (kd_kamar=='2')
{
    	strcpy(nm_kamar,"Melati");
      if (kd_kls=='a'||kd_kls=='A')
     	{strcpy(nm_kls,"VIP");
       by=25000;
      harga=200000;}
      else
      {strcpy(nm_kls,"Reguler");
       by=0;
       harga=200000; }
}
else
{
    	strcpy(nm_kamar,"Anggrek");
     	if (kd_kls=='a'||kd_kls=='A')
     	{strcpy(nm_kls,"VIP");
       by=25000;
       harga=250000;}
      	else
      {strcpy(nm_kls,"Reguler");
       by=0;
       harga=250000;}

}

clrscr();

cout<<"\t\t         HOTEL ALFY \n";
cout<<"==================================================="<<endl;
cout<<"Nama Penginap  : "<<nm_tamu<<endl;
cout<<"Nama Kamar     : "<<nm_kamar<<endl;
cout<<"Kelas          : "<<nm_kls<<endl;
cout<<"Harga Kamar    : "<<harga<<endl;
cout<<"Biaya Tambahan : "<<by<<endl;
cout<<"Lama Inap      : ";cin>>lama;
cout<<"==================================================="<<endl;
total=lama*harga+by;
cout<<"Total          : "<<total<<endl;
cout<<"==================================================="<<endl;

cout<<"                  Terima Kasih "<<endl;
cout<<" Semoga Anda nyaman dengan fasilitas dan pelayanan kami"<<endl;
getch();
}

dan tampilan jika di RUN :
Tampilan Pertama

 

Tampilan Kedua

    Keterangan :

Fungsi if diatas bisa anda ganti dengan versi anda sendiri.

Semoga bermanfaat, jangan lupa untuk melihat contoh Program C++ Sederhana Untuk Mengungkapkan Cinta

Program C++ untuk mengungkapkan cinta

Salam hangat pengunjung yang terhormat,
     Setelah saya mengotak-atik program sederhana C++, saya pun berinisiatif untuk membuat Program C++ untuk mengungkapkan cinta, tampilannya sangat sederhana, begitu pula kata-kata yang diungkapkan begitu simple :

#include <conio.h>
#include <iostream.h>
#include <stdio.h>

main()
{
   char a [50],*b,c[10];
   clrscr();
   cout<<"   Program Cinta Sederhana   "<<endl;
   cout<<"        Alfy Maghfira        "<<endl;
   cout<<"Tiga kata yang ingin kukatakan"<<endl;
   cout<<"Kata pertama : ";gets(a);
   cout<<"kata kedua   : ";gets(b);
   cout<<"kata ketiga  : ";cin>>c;
   clrscr();
   cout<<"     Isi hatiku adalah  "<<a;
   cout<<"  "<<b;
   cout<<"  "<<c;

   getch();
}

Petunjuknya :
Kata Pertama, isilah dengan isi hati anda,  begitu pula untuk kata kedua dan ketiga, seperti contoh :

 

     Apakah sudah mengerti?, ayo waktunya untuk dipraktekan, dan ungkapkan cintamu sekarang juga. Mari kita lanjut ke Contoh Pemrograman C++ Penghitungan Keliling Persegi panjang