Sabtu, 25 April 2015

Program Sederhana Konversi Suhu (Celcius, Farenheit, Kelvin)

ini postingan ke empat saya, dalam postingan ini program yang dibuat berbasis ilmu fisika , yang  dibahas yakni mengenai bagaimana cara mengkonversi atau mengubah suhu ,  ini dia tutorialnya




  • Langkah awalnya buatlah 3 groupbox, 3 label, 6 textbox, 3 buttton, dan 3 combobox lalu desain sesuai keinginan atau seperti pada gambar di bawah ini :

  • Untuk mengubah nama label, groupbox, ataupun button masukkan coding seperti dibawah ini:
        Label1.Text = "NILAI"
        Label2.Text = "NILAI"
        Label3.Text = "NILAI"
        GroupBox1.Text = "konverensi Celcius"
        GroupBox2.Text = "Konverensi Farenheit"
        GroupBox3.Text = "Konverensi Kelvin"
        GroupBox1.Font = New Font(Font, FontStyle.Bold)
        GroupBox2.Font = New Font(Font, FontStyle.Bold)
        GroupBox3.Font = New Font(Font, FontStyle.Bold)
        Button1.Text = "HASIL"
        Button2.Text = "HASIL"
        Button3.Text = "HASIL"

  • Setelah di RUN maka tampilan yang muncul yakni :

  • Selanjutnya untuk memasukkan daftar yang ingin di konverensi kan ke dalam combobox, contohnya konverensi dari celcius ke farenheit atau yang lainnya dapat dilakukan dengan cara klik pada combobox , lalu pada properties, klik pada ikon items maka akan muncul tab String Collection Editor , lalu tulis lah daftar tersebut pada tab itu, seperti pada gambar dibawah ini :
  • Begitu pula dengan combobox 2 , seperti ini :
  • Dan juga pada combobox3, seperti gambar di bawah ini :
  • Selanjutnya agar program mengkoversi celcius, farenheit, dan kelvin dapat berjalan maka lakukan double klik pada button1 untuk celcius, button2 untuk farenheit dan button3 untuk kelvin
Button1 seperti berikut :

        If (ComboBox1.SelectedItem = "C ke R") Then
            TextBox2.Text = Val(4 / 5) * Val(TextBox1.Text)
        ElseIf (ComboBox1.SelectedItem = "C ke F") Then
            TextBox2.Text = Val(9 / 3) * Val(TextBox1.Text)
        ElseIf (ComboBox1.SelectedItem = "C ke K") Then
            TextBox2.Text = Val(TextBox1.Text) + Val(273)


        End If
  • Button2 seperti berikut :

If (ComboBox2.SelectedItem = "F ke C") Then
            TextBox4.Text = Val(5 / 9) * Val(TextBox2.Text) - Val(32)
        ElseIf (ComboBox2.SelectedItem = "F ke R") Then
            TextBox4.Text = Val(4 / 9) * Val(TextBox2.Text) - Val(32)
        ElseIf (ComboBox2.SelectedItem = "F ke K") Then
            TextBox4.Text = Val(5 / 9) * Val(TextBox2.Text) - Val(32) +    Val(273)
        End If
  • Button3 seperti berikut :


        if (ComboBox3.SelectedItem = "K ke C") Then
            TextBox6.Text = Val(TextBox3.Text) - Val(273)
        ElseIf (ComboBox3.SelectedItem = "K ke R") Then
            TextBox6.Text = Val(4 / 5) * Val(TextBox3.Text) - Val(273)
        ElseIf (ComboBox3.SelectedItem = "K ke F") Then
            TextBox6.Text = Val(9 / 5) * Val(TextBox3.Text) - Val(273) + Val(32)
        End If
  • Jika semua sudah dilakukan dan benar maka hasil akhir setelah di RUN seperti dibawah ini, dan anda dapat mencoba program pengkonversian suhu ini .



sekian tutorial yang di publish dalam postingan kali ini, untuk catatan : human error dapat mempengaruhi proses pembuatan program , apakan program yang dibuat dapat berjalan atau tidak.  
Terima Kasih





Minggu, 19 April 2015

Program Menghitung Volume Balok Menggunakan Microsoft Visual Studio 2010

Hai kawan , ini postingan saya yang ketiga , tutorial program yang di bawas di postingan ini menurut saya sangat simple dan mudah dimengerti , di postingan saya yang ketiga ini akan di bahas mengenai program berbasis matematika salah satu contohnya yakni menghitung volume balok , mari belajar bersama sama !!!

Tahap pertama yang dilakukan yakni buatlah 3 label , 4 textbox , dan 2 button , seperti pada gambar dibawah ini :



Selanjutnya  untuk mengubah nama , dan desain atau warna  dari masing masing  label , ataupun  button , lakukan double klik pada area form design dan  lakukan pengcodingan pada  form_load  seperti dibawah ini :
        Me.Text = "Menghitung Volume Segitiga "
        Label1.Text = "PANJANG"
        Label2.Text = "LEBAR"
        Label3.Text = "TINGGI"
        Button1.Text = "HASIL"
        Button2.Text = "HAPUS"
        Label1.Font = New Font(Font, FontStyle.Bold)
        Label2.Font = New Font(Font, FontStyle.Bold)
        Label3.Font = New Font(Font, FontStyle.Bold)
        Label1.ForeColor = Color.OrangeRed
        Label2.ForeColor = Color.OrangeRed
        Label3.ForeColor = Color.OrangeRed



Setelah pengcodingan di atas  sudah di lakukan maka tampilan yang akan muncul setelah di RUN  seperti di bawah ini :


Setelah itu agar program menghitung volume balok dapat dijalankan , lakukan double klik pada button1 dan masukkan coding seperti pada gambar di bawah ini :



Setelah  dilakukan coding , lalu di RUN maka tampilan yang muncul seperti pada gambar di bawah ini : 


Dan untuk menghapus angka atau nilai tersebut lakukan double klik pada button2 dan lakukan pengcodingan seperti gambar dibawah ini :


Untuk memberikan kesan menarik pada tampilan form anda ,  anda dapat menyisipkan gambar . caranya, klik pada area form design , setelah itu pada properties klik bagroundimage, maka akan muncul tab select resource , klik import dan masukkan gambar yang di inginkan lalu klik ok , seperti pada gambar dibawah ini:

 
Setelah  di RUN maka akan muncul tampilan seperti ini :  


Untuk mengatur layout gambar pada form anda , dapat dilakukan pada properties , klik backgroundimagelayout  dan pilih sesuai keinginan anda , seperti ini :

 
Setelah  semuanya sudah dilkukan program anda sudah dapat dijalankan , tampilan yang muncul akan seperti pada gambar di bawah ini :  




 SELAMAT MENCOBA !!!