This is featured post 1 title

Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation test link ullamco laboris nisi ut aliquip ex ea commodo consequat.

This is featured post 2 title

Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation test link ullamco laboris nisi ut aliquip ex ea commodo consequat.

This is featured post 3 title

Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation test link ullamco laboris nisi ut aliquip ex ea commodo consequat.

This is featured post 4 title

Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation test link ullamco laboris nisi ut aliquip ex ea commodo consequat.

This is featured post 5 title

Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation test link ullamco laboris nisi ut aliquip ex ea commodo consequat.

Contoh perulangan dalam c#

0 komentar


using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace tugas1
{
    class Program
    {
        static void Main(string[] args)
        {
           
            string kata;
            int i,angka;
            Console.WriteLine("Masukkan sebuah kata :");
            kata = Console.ReadLine();
            Console.WriteLine("masukkan maksimal perulangan : ");
            angka = Convert.ToInt32(Console.ReadLine());
         
           
            for (i = 0; i <= angka; i++)
            {
                Console.WriteLine("{0}", kata);
            }
            Console.ReadLine();
        }
    }
}

contoh program pengecek bilangan genap ganjil

0 komentar


using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace ConsoleApplication2
{
    class Program
    {
        static void Main(string[] args)
        {
            int angka;
            //string lagi;
            string input;
        lagi:
            Console.WriteLine("\t CONTOH PROGRAM PENGECEK BILANGAN GANJIL / GENAP ");
        Console.WriteLine("");
            Console.WriteLine("Masukkan sebuah angka :");
            //angka = int.Parse(Console.ReadLine());
            input = Console.ReadLine();
            int.TryParse(input, out angka);
            if (angka % 2 == 0)
            {
                Console.WriteLine("Bilangan yang anda masukkan adalah bilangan genap" );
            }
            else if (angka % 2 == 1)
            {
                Console.WriteLine("Bilangan yang anda masukkan adalah bilangan ganjil" );
            }
            else
            {
                Console.WriteLine("bilangan emboh");
            }
            Console.ReadLine();
           
           // Console.Clear;

        }
    }
}

Contoh Program Konversi angka ke bulan di c#

0 komentar


using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            int angka;
            string pesan;
            //lagi:
            Console.WriteLine("\t CONTOH PROGRAM KONVERSI ANGKA KE BULAN ");
            Console.WriteLine("");
            Console.Write("masukkan sebuah angka =");
            /*input = Console.ReadLine();
            int.TryParse(input, out angka);*/
            angka = Convert.ToInt32(Console.ReadLine());
            switch (angka)
            {
                case 1: pesan = "Januari"; break;
                case 2: pesan = "Februari"; break;
                case 3: pesan = "Maret"; break;
                case 4: pesan = "April"; break;
                case 5: pesan = "Mei"; break;
                case 6: pesan = "Juni"; break;
                case 7: pesan = "Juli"; break;
                case 8: pesan = "agustus"; break;
                case 9: pesan = "september"; break;
                case 10: pesan = "oktober"; break;
                case 11: pesan = "November"; break;
                case 12: pesan = "Desember"; break;
                default: pesan = "Bulan tidak ada"; break;

            }
            Console.WriteLine("Bulan Yang anda pilih adalah  " + pesan);
            Console.ReadLine();
        }
    }
}

Contoh Program konversi angka ke hari di c#

1 komentar


using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace konversi_angka_kehari
{
    class Program
    {
        static void Main(string[] args)
        {
            int angka;
            string pesan;
            //lagi:
            Console.WriteLine(" \t CONTOH PROGRAM KONVERSI ANGKA MENJADI HARI ");
            Console.Write("masukkan sebuah angka =");
            angka = Convert.ToInt32(Console.ReadLine());
            switch (angka)
            {
                case 1: pesan = "Senin"; break;
                case 2: pesan = "Selasa"; break;
                case 3: pesan = "Rabu"; break;
                case 4: pesan = "Kamis"; break;
                case 5: pesan = "jumat"; break;
                case 6: pesan = "Sabtu"; break;
                case 7: pesan = "Minggu"; break;
                default: pesan = "hari tidak ada"; break;

            }
            Console.WriteLine("Hari ini adalah hari "+ pesan);
            Console.ReadLine();
        }
    }
}

contoh program diskon dengan c#

0 komentar






Contoh program diskon dengan c# 

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;


namespace ConsoleApplication5
{
class Program
{
static void Main(string[] args)
{
double t, d, b;
Console.Write("Total Belanja = ");
t = double.Parse(Console.ReadLine());
if (t < 150000)
{
d = t * 0 / 100;
b = t - d;
Console.WriteLine("Diskon = " + d.ToString());
Console.Write("Yang Harus Dibayar = " + b.ToString());
}
else if (t < 275000)
{
d = t * 10 / 100;
b = t - d;
Console.WriteLine("Diskon = " + d.ToString());
Console.Write("Yang Harus Dibayar = " + b.ToString());
}
else if (t < 300000)
{
d = t * 15 / 100;
b = t - d;
Console.WriteLine("Diskon = " + d.ToString());
Console.Write("Yang Harus Dibayar = " + b.ToString());
}
else if (t < 400000)
{
d = t * 20 / 100;
b = t - d;
Console.WriteLine("Diskon = " + d.ToString());
Console.Write("Yang Harus Dibayar = " + b.ToString());
}
else
{
d = t * 25 / 100;
b = t - d;
Console.WriteLine("Diskon = " + d.ToString());
Console.Write("Yang Harus Dibayar = " + b.ToString());
}
Console.WriteLine("\n");
Console.Write("Terima kasih");
Console.ReadLine();
}
}
}

sumber : http://www.suwargo.com/2012/06/contoh-program-diskon-dalam-c.html

Contoh Program Konversi Suhu dengan c#

0 komentar

Contoh Program Konversi Suhu


using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace suhu1
{
    class Program
    {
        static void Main(string[] args)
        {
           
            double c, f, k, r;

            Console.WriteLine("-------CONTOH PROGRAM KONVERSI SUHU-------");
            Console.Write("Masukkan suhu Celcius : ");
            c = Convert.ToDouble(Console.ReadLine());

            f = (1.8 * c) + 32;
            k = c + 273.15;
            r = c * 0.8;
            Console.WriteLine("Celcius ke Farennheit : " + f);
            Console.WriteLine("Celcius ke Kelvin : " + k);
            Console.WriteLine("Celcius ke Reamur : " + r);
            Console.WriteLine("CREATED BY @ ELPINA");

           
            Console.ReadLine();
        }
    }
}

Contoh Program Input/output dengan C#

1 komentar


Contoh Program input/output c#

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            string nama_lengkap, nama_panggilan, tempat_lahir, alamat, input, nim, telepon;
            int umur;
            Console.WriteLine("============THE EXAMPLE OF MY PROGRAM===============");
            Console.Write("Enter your name =");
            nama_lengkap = Console.ReadLine();
            Console.Write("Enter your nick name =");
            nama_panggilan = Console.ReadLine();
            Console.Write("Enter your NIM=");
            nim = Console.ReadLine();
            Console.Write("Born Place =");
            tempat_lahir = Console.ReadLine();
            Console.Write("Enter your old=");
            input = Console.ReadLine();
            int.TryParse(input, out umur);
            Console.Write("Enter your address =");
            alamat = Console.ReadLine();
            Console.Write("Enter your telephone number =");
            telepon = Console.ReadLine();
            Console.WriteLine("");

            Console.Write ("Assalamualaikum....let me introduce my self my name is {0},but you can call me {1},my NIM is {2},i was born in {3},and i'am {4} years old.i'm very glad if you want to invite my house in {5},so don't forget to call me before with the number telepon {6}.thank you", nama_lengkap, nama_panggilan, nim, tempat_lahir, umur, alamat, telepon);
            Console.ReadLine();

        }
    }
}

Visual Basic

0 komentar


Seringkali dalam membuat aplikasi dalam lingkungan Visual Basic, kita sudah disuguhkan dengan bentuk jendela dengan tampilan yang sama. Bagaimana kalau kita ingin membuat bentuk tampilan jendela sesuai dengan selera kita ? Bisa, karena tutorial kali ini kita akan membuat suatu bentuk jendela dengan TitleBar, tombol Minimize, Maximize dan Exit ala sendiri dan sangat mudah sekaligus sederhana dalam pembuatannya. Sudah tidak sabar ? Kalau begitu kita langsung saja ke langkah yang pertama yaitu,
Buatlah form untuk merancang tampilan jendela aplikasi seperti terlihat pada gambar 1. Kontrol-kontrol yang ditambahkan pada form tersebut adalah :
- 1 buah Label
- 5 buah PictureBox
Ubahlah properti-properti dari kontrol-kontrol tersebut seperti tertera pada tabel 1.
Kontrol
Properti
Nilai
Label1BackStyle0 - Transparent
(Name)lblTitle
CaptionJendela buatanku
ForeColor&H00FFFFFF&
Picture1BackColor&H000080FF&
BorderStyle0 - None
Width6735
Height375
(Name)PicTitleBar
Picture2BackColor&H00008000&
BorderStyle0 - None
Width255
Height255
(Name)PicMinimize
ToolTipTextMinimize
Picture3BackColor&H00800000&
BorderStyle0 - None
Width255
Height255
(Name)PicMaximize
ToolTipTextMaximize
Picture4BackColor&H00000080&
BorderStyle0 - None
Width255
Height255
(Name)PicExit
ToolTipTextExit
Picture5BackColor&H000080FF&
BorderStyle0 - None
Width6735
Height135
(Name)PicFootBar
Form1CaptionJENDELA BUATANKU
BorderStyle0 - None
ShowInTaskbarTrue
StartUpPosition2 - CenterScreen
Width6720
Height4440
Tabel 1.
Sebagai keterangan, kotak-kotak kecil  berwarna pada Form masing-masing memiliki fungsi yang berbeda. Kotak berwarna hijau akan diberi fungsi Minimize jendela, sebaliknya kotak berwarna biru akan kita beri fungsi Maximize jendela , dan kemudian kotak berwarna merah sebagai fungsi untuk menutup jendela atau exit.  Sebagaimana jendela aplikasi pada umumnya, jendela harus mudah dipindah-pindah yang bisanya mendrag bagian TitleBar.
Maka pada PicTitleBar, kita akan memasukkan kode program yang dapat menggeser jendela seperti yang tertera pada Listing 1. Sekarang buat Module dan kemudian isi dengan kode program pada Listing 2 untuk mendeklarasikan fungsi yang dibutuhkan untuk mendrag jendela. Pada Listing 3 terdapat kode program untuk PicMinimize supaya ketika kita klik kotak warna hijau , tampilan jendela dalam keadaan minimize. Sekarang bagaimana mengatur tampilan menjadi Maximize ? Isi kode program pada PicMaximize dan PicTitleBar seperti yang terlihat pada Listing 4 .
Untuk mengaktifkan Maximize kita perlu mengatur lebar dan tinggi jendela baik dalam keadaan normal atau maximize seperti pada Listing 5. Ukuran-ukuran yang ada pada Listing 5 hanya berlaku bila jendela yang kita buat berada pada layar monitor yang berresolusi 1024x768 pixel. Di luar resolusi itu hasil tampilan jendela akan terlihat berantakan. Maka jika itu terjadi, kita dapat menyesuaikannya dengan mengatur kembali  nilai lebar dan tinggi jendela aplikasi yang kita buat.
Seperti kode program yang tertera pada Listing 5, kita mengatur agar saat jendela dalam keadaan normal, ToolTip pada PicMaximize menampilkan tulisan ”Maximize”. Saat tampilan dalam keadaan Maximize, ToolTip menampilkan tulisan ”Restore Down”.   Langkah yang terakhir, pada PicExit kita memasukkan kode program yang berfungsi menutup aplikasi seperti yang tertera pada Listing 6. Supaya tampilan lebih menarik lagi, kita juga dapat mengimpor gambar pada setiap kontrol PictureBox.  Tutorial berikutnya kita akan mencoba memeberikan efek trasparan pada jendela aplikasi yang kita buat. Selamat mencoba !!!
Listing 1
CODE:
  1. Private Sub PicTitleBar_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
  2. ‘Jika tampilan dalam keadaan Maximize, Jendela tidak akan pernah dapat digeser-geser
  3. If  Me.WindowState &lt;&gt; 2 Then
  4. GeserJendela Me
  5. End If
  6. End Sub
Listing 2
CODE:
  1. Public  Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
  2. (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lparam _
  3. As Any) As Long
  4. Declare Sub ReleaseCapture Lib "user32" ()
  5.  
  6. Public Sub GeserJendela(TheForm As Form)
  7. ReleaseCapture
  8. Call SendMessage(TheForm.hWnd, &amp;HA1, 20&amp;)
  9. End Sub
Listing 3
CODE:
  1. Private Sub PicMinimize_Click()
  2. Me.WindowState = 1
  3. Me.PicMinimize.BackColor = &amp;H8000&amp;
  4. End Sub
Listing 4
CODE:
  1. Private Sub PicMaximize_Click()
  2. AksiMaximize
  3. Me.PicMaximize.BackColor = &amp;H800000
  4. End Sub
  5.  
  6. Private Sub PicTitleBar_DblClick()
  7. AksiMaximize
  8. End Sub
  9.  
  10. Private Sub lblTitle_DblClick()
  11. AksiMaximize
  12. End Sub
  13.  
  14. Private Sub lblTitle_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
  15. geser
  16. End Sub
Listing 5
CODE:
  1. Sub AksiMaximize()
  2. If  Me.WindowState = 2 Then
  3. Me.WindowState = 0
  4. Me.PicMinimize.Left = 5640
  5. Me.PicMaximize.Left = 6000
  6. Me.PicExit.Left = 6360
  7. Me.PicMaximize.ToolTipText = "Maximize"
  8. Me.PicFootBar.Top = 4320
  9. Else
  10. Me.WindowState = 2
  11. Me.PicTitleBar.Width = 15400
  12. Me.PicMinimize.Left = 14200
  13. Me.PicMaximize.Left = 14600
  14. Me.PicExit.Left = 15000
  15. Me.PicMaximize.ToolTipText = "Restore Down"
  16. Me.PicFootBar.Width = 16000
  17. Me.PicFootBar.Top = 11400
  18. End If
  19. End Sub
Listing 6
CODE:
  1. Private Sub PicTitleBar_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  2. Me.PicExit.BackColor = &amp;H80&amp;
  3. Me.PicMaximize.BackColor = &amp;H800000
  4. Me.PicMinimize.BackColor = &amp;H8000&amp;
  5. End Sub
  6.  
  7. Private Sub PicMaximize_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  8. Me.PicMaximize.BackColor = &amp;HFF0000
  9. End Sub
  10.  
  11. Private Sub PicMinimize_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  12. Me.PicMinimize.BackColor = &amp;HFF00&amp;
  13. End Sub

 

arpina © 2011 Design by Best Blogger Templates | Sponsored by HD Wallpapers