Pengertian, Tujuan, UU, dan peraturan mengenai K3

K3 (Keselamatan Kesehatan Kerja) adalah pemberian perlindungan kepada setiap orang yang
berada ditempat kerja, yang berhubungan dengan penggunaan peralatan kerja, proses kerja dan lingkungan sekitar tempat kerja.

Tujuan K3 adalah sebagai berikut :

1. Melindungi tenaga kerja

2. Menjamin keselamatan tenaga kerja di tempat kerja

3. melindungi sumber produksi agar dapat digunakan secara aman dan efisien

Yang secara umumnya Tujuan K3 adalah salah satu bentuk upaya untuk menciptakan tempat kerja yang aman, sehat dan bebas, yang dapat mengurangi atau bebas dari kecelakaan

Berikut adalah beberapa Undang-Undang yang mengatur mengenai K3:

1.       Undang-undang No. 1 Tahun 1970 tentang Keselamatan Kerja

2.       Undang-undang nomor 23 tahun 1992 tentang Kesehatan.

3.       Undang-undang No. 13 Tahun 2003 tentang Ketenagakerjaan

Pemerintah juga mengeluarkan Peraturan Pemerintah (PP) dan Keputusan Presiden terkait penyelenggaraan Keselamatan dan Kesehatan Kerja (K3), diantaranya adalah :

• Peraturan Pemerintah Republik Indonesia No. 11 Tahun 1979 tentang Keselamatan Kerja Pada Pemurnian dan Pengolahan Minyak dan Gas Bumi
• Peraturan Pemerintah Nomor 7 Tahun 1973 tentang Pengawasan Atas Peredaran, Penyimpanan dan Penggunaan Pestisida
• Peraturan Pemerintah Nomor 13 Tahun 1973 tentang Pengaturan dan Pengawasan Keselamatan Kerja di Bidang Pertambangan
• Keputusan Presiden Nomor 22 Tahun 1993 tentang Penyakit Yang Timbul Akibat Hubungan Kerja
• UU No. 14 tahun 1969 menyebutkan bahwa tenaga kerja merupakan modal utama serta pelaksana dari pembangunan

Read More

VB Tutor - 4. Pengenalan Bahasa OOP

Yang berbeda adalah bahwa VB2010 penuh dengan bahasa Object Oriented Programming sementara VB6 mungkin memiliki bahasa OOP, namun tidak sepenuhnya berorientasi objek. Dalam rangka memenuhi syarat sebagai sepenuhnya berorientasi objek bahasa pemrograman, ia harus memiliki tiga teknologi inti yaitu enkapsulasi, inheritance dan polymorphism. Ketiga istilah tersebut dijelaskan di bawah ini:

 A. Encapsolation

Encapsulation mengacu pada pembuatan modul mandiri yang mengikat fungsi pengolahan data . Tipe user-defined data ini disebut kelas . Setiap kelas berisi data serta seperangkat metode yang memanipulasi data . Komponen data kelas disebut variabel instan dan satu contoh dari kelas adalah obyek . Sebagai contoh, dalam sistem perpustakaan , kelas bisa menjadi anggota , dan John dan Sharon bisa dua contoh ( dua benda ) dari kelas perpustakaan .

B. Inheritanc 

Dalam pemrograman berorientasi objek , kelas dibuat menurut hirarki mereka , dan warisan memungkinkan struktur dan metode dalam satu kelas yang akan diturunkan hirarki ke kelas lain . Itu berarti lebih sedikit pemrograman diperlukan saat menambahkan fungsi untuk sistem yang kompleks , oleh karena itu menghemat waktu dan usaha . Jika langkah yang ditambahkan di bagian bawah hirarki , maka hanya proses dan data yang terkait dengan langkah unik perlu ditambahkan . Segala sesuatu tentang langkah yang diwariskan . Kemampuan untuk menggunakan kembali benda-benda yang ada dianggap sebagai keuntungan utama dari pemrograman berorientasi objek .

C. Polymorphism

Pemrograman berorientasi obyek memungkinkan prosedur tentang objek yang akan dibuat yang tepat jenis tidak diketahui sampai runtime . Sebagai contoh, sebuah kursor layar dapat berubah bentuk dari anak panah ke garis tergantung pada mode program . Rutin untuk memindahkan kursor pada layar dalam menanggapi gerakan mouse akan ditulis untuk " kursor , " dan polimorfisme kursor yang memungkinkan untuk mengambil bentuk apapun yang diperlukan pada saat runtime . Hal ini juga memungkinkan bentuk baru untuk dengan mudah diintegrasikan .

VB6 bukan OOP penuh dalam arti bahwa ia tidak memiliki kemampuan warisan meskipun dapat menggunakan beberapa manfaat dari warisan . Namun, VB2010 adalah Object Oriented Programming Language berfungsi penuh , seperti OOP lainnya seperti C + + dan Java . Hal ini berbeda dari versi sebelumnya dari VB karena lebih memfokuskan pada data itu sendiri sedangkan versi sebelumnya lebih fokus pada tindakan . Versi sebelumnya dari VB dikenal sebagai bahasa pemrograman prosedural atau fungsional . Beberapa bahasa pemrograman prosedural lainnya adalah C , Pascal dan Fortran .

VB2010 memungkinkan pengguna untuk menulis program yang terurai menjadi modul . Modul ini akan mewakili Objek dunia nyata dan diketahui sebagai kelas atau type . Sebuah objek dapat diciptakan dari sebuah kelas dan dikenal sebagai instance dari kelas . Kelas A juga dapat terdiri dari subclass . Misalnya, pohon apel merupakan subclass dari kelas tanaman dan apel di halaman belakang Anda adalah turunan dari kelas pohon apel . Contoh lain adalah siswa kelas adalah subclass dari kelas manusia sementara anak Anda John adalah turunan dari siswa kelas .

Mari kita lihat satu contoh tentang bagaimana untuk membuat kelas . Contoh berikut ini menunjukkan Anda bagaimana untuk membuat sebuah kelas yang dapat menghitung BMI Anda ( Body Mass Index ) .

Untuk membuat kelas , mulai VB2010 seperti biasa dan memilih Windows Aplikasi . Di VB2010 IDE , klik pada Project pada menu bar dan pilih Add Class, Add New Item dialog muncul, seperti terlihat pada Gambar di bawah ini :

 Kelas standar Class1.vb akan muncul sebagai tab baru dengan jendela kode . Ubah nama Class sebagai MyClass.vb . Ubah nama form sebagaimana MyFirstClass.vb .
Sekarang , di jendela MyClass.vb , masukkan kode berikut

Public Function BMI(ByVal height As Single, ByVal weight As Single)

BMI = Format((weight) / (height ^ 2), “0.00″)

End Function

Sekarang Anda telah membuat sebuah Class ( objek ) disebut MyClass dengan metode yang dikenal sebagai BMI .
Untuk menggunakan kelas BMI , masukkan tombol ke dalam formulir dan klik pada tombol untuk memasukkan kode berikut :

Private Sub BtnCalBmi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnCalBmi.Click

Dim MyObject As Object

Dim h, w As Single

MyObject = New MyClass1()

h = InputBox(“What is your height in meter”)

w = InputBox(“What is your weight in kg”)

MessageBox.Show(MyObject.BMI(h, w))
End Sub

Ketika Anda menjalankan program ini dan klik tombol , pengguna akan disajikan dengan dua kotak input untuk memasukkan tinggi dan berat badan nya kemudian dan nilai BMI akan ditampilkan dalam kotak pesan pop - up .

Read More

Cara membuat kalkulator dengan banyak Form di VB2010

Disini kita akan membuat sebuah kalkulator dengan banyak Form yang saling berhubungan. Berikut adalah contohnya :

1. Pertama-tama buka VB anda, seperti biasa buat sebuah project baru dengan nama yang anda inginkan.
 2. Setelah muncul sebuah form, tambahkan beberapa tool seperti radio button dan combobox. seperti di bawah ini.

3. Setelah itu buat form yang ke-2, dan tambahkan beberapa tool juga yaitu 4 radio button untuk 4 Operator.

4. Untuk Form yang ke-3, tambahkan 3 Textbox, 2 label, dan 1 Button. seperti dibawah ini

6.

5. Dan untuk Form yang terakhir, tambahkan 2 Label dan 2 Button

6. Langkah selanjutnya adalah menambahkan kode pada setiap form agar dapat terhubung satu dengan yang lain. Untuk Form1 kita dapat mengisi kode dibawah ini setelah mengklik double pada Radio Button. untuk MouseClick anda dapat klik di bagian atas yang bertuliskan Clik, lalu pilih dengan MouseClick

Private Sub RadioButton1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RadioButton1.MouseClick
        If RadioButton1.Checked Then
            Form2.Show()
            Me.Hide()
        End If
    End Sub

7. Untuk yang Form2 anda harus mengklik pada setiap radio buttonnya
Private Sub Radiobutton1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RadioButton1.MouseClick
        Form3.Show()
        Form3.Lbloperator.Text = " + "
        Me.Hide()
    End Sub

    Private Sub RadioButton2_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RadioButton2.MouseClick
        Form3.Show()
        Form3.Lbloperator.Text = " - "
        Me.Hide()
    End Sub

    Private Sub RadioButton3_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RadioButton3.MouseClick
        Form3.Show()
        Form3.Lbloperator.Text = " * "
        Me.Hide()
    End Sub

    Private Sub RadioButton4_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RadioButton4.MouseClick
        Form3.Show()
        Form3.Lbloperator.Text = " / "
        Me.Hide()
    End Sub

Lbloperator adalah sebuah Name label untuk operator apa yang ingin kita gunakan

8. Untuk yang Form3 berikut kodenya
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If Form2.RadioButton1.Checked = True Then
            TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
        ElseIf Form2.RadioButton2.Checked = True Then
            TextBox3.Text = Val(TextBox1.Text) - Val(TextBox2.Text)
        ElseIf Form2.RadioButton3.Checked = True Then
            TextBox3.Text = Val(TextBox1.Text) * Val(TextBox2.Text)
        ElseIf Form2.RadioButton4.Checked = True Then
            TextBox3.Text = Val(TextBox1.Text) / Val(TextBox2.Text)
        End If
        Form4.Show()
        Me.Close()
    End Sub
9. Untuk yang Form4 berikut kodenya
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Form2.Show()
        Me.Close()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.Close()
    End Sub

    Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label2.Text = Form3.TextBox3.Text
    End Sub

Read More

Penggunaan Operator pada c++

Dalam C++ kita harus menggunakan operator untuk melakukan suatu kondisi. Operator dapat dibagi menjadi 3 yaitu;

1. Operator Aritmatika

• + (Pertambahan)
• - (Pengurangan)
• * (Perkalian)
• / (Pembagian)
• % (Modulus = Sisa hasil Bagi)

2. Operator Relasi

• < (Lebih kecil dari)
• > (Lebih besar dari)
• <= (Lebih kecil sama dengan)
• >= (Lebih besar sama dengan)
• == (Sama dengan)
• != (Tidak sama dengan)

3. Operator Logika

• && (Logika And = Jika semua pernyataan bernilai benar maka akan bernilai "True", Jika ada salah satu pernyataan maka akan bernilai "False")
• || (Logika Or = Akan bernilai "True" jika saluh satu pernyataannya benar)
• ! (Logika Not = Jika kondisi menyatakan True maka akan menghasilkan "False", Jika kondisi menyatakan false maka akan bernilai "True")

Read More

Percabangan IF dan Switch (Case) Pada Pascal

Percabangan adalah proses pemilihan suatu tindakan yang dilakukan berdasarkan kondisi yang ada dengan nilai true atau false. Pada pemrograman Pascal terdapat beberapa cara seleksi diantaranya  if then, if then else , dan case.

A. Percabangan IF

1. if Tunggal

If (kondisi)
Then
Begin
Statement1;
End;

Bila kondisi terpenuhi maka statment1 dijalankan. jika tidak terpenuhi maka program tidak melakukan apa-apa.

2. if Bersarang
If (kondisi)
Then
Begin
Statement1;
End
Else
Begin
Statement2;
End;
jika kondisi terpenuhi, maka statement1 akan dijalankan. Jika kondisi tidak terpenuhi, maka statement2 akan dijalankan.

B. Percabangan Switch
Percabagan Switch sama dengan Case jika dalam Pascal

3. Case of
Merupakan peluasan dari struktur IF. Karena kalau dalam struktur IF hanya disediakan dua pilihan (berdasarkan kondisi logikanya) maka dalam struktur Case..of dimungkinkan untuk memilih satu pilihan di antara banyak pilihan yang ada.

Case (variabel) of
Option1 : begin
Statements 1
end;
Option2 : begin
Statements 2
end;
.
.
.
Else begin
Statements
End;
End;

Read More

VB Tutor - 3. Bekerja dengan Control Properties

3.1 Control Properties di VB2010

Judul Form ditentukan oleh Properties text dan nama defaultnya adalah Form1. Untuk mengubah judul form untuk setiap nama yang anda sukai, klik dalam kotak disebelah kanan properties Text dan ketikkan nama baru. Di bagian bawah, item yang tercantum di kolom kiri merupakan nama-nama berbagai properti yang berhubungan dengan objek yang dipilih.

Properties dapat diatur dengan menyorot item dalam kolom kanan kemudian mengubahnya dengan mengetik atau memilih pilihan yang tersedia. Anda juga dapat mengubah berbagai hal dari suatu form seperti font, letak, ukuran, warna foreground, dan warna Background, dan masih banyak lagi.

Visual Basic 2010 menggunakan RGB (Red, Green, Blue) untuk menentukan warna. Rumus untuk menentukan warna RGB adalah Color.FormArgb(kode RGB). Prosedurnya dalah sebagai berikut :

Private Class Form1 Private Sub Form1_Load(ByVal sender As System Object, ByVal e As System.EventArgs)Handles MyBase.Load


Me.BackColor = Color.FromArgb(255, 0, 255)

End Sub

End Class

Anda juga dapat menggunakan prosedur berikut untuk menetapkan warna pada saat program berjalan.
Private Sub Form1_Load(ByVal sender as System Object, ByVal e As System EventArgs)Handles MyBase.Load

Me.BackColor = Color.Magenta

End Sub

Kedua Prosedur diatas akan memuat formulir dengan latar belakang Magenta sebagai berikut

Berikut adalah beberapa warna yang umum dan sesuai kode RGB. Anda dapat selalu bereksperimen dengan kombinasi lainnya, tapi ingat jumlah Max umum untuk setiap warna adalah 255 dan jumlah minimum adalah 0.

Berikut adalah sebuah program yang digunakan untuk mencoba kode RGB saat program sedang berjalan

Kode
Private Sub Button1_Click(ByVal sender As System Object, ByVal e As System.EventArgs)Handles Button1.click

Dim rgb1,rgb2,rgb3 As Integer
rgb1 = Textbox1.Text
rgb2 = Textbox2.Text
rgb3 = Textbox3.Text
Me.BackColor = Color.FromArgb(rgb1,rgb2,rgb3)

End Sub

Read More