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 Visual Basic

0 komentar





Langkah pertama:
·       Klik label pada toolbox
·       Lalu  kita buat 3 label


Langkah kedua:
·       Klik textbox pada toolbox
·       Kita buat 3 textbox


Langkah ketiga:
·       Klik combobox pada toolbox
·       Kita buat 1 textbox

 
Langkah ke ampat:
·       Klik command pada toolbox
·       Kita buat 2 command button
Pengaturan Objek
objek
properti
nilai
label
caption
Bilangan1
label
caption
Bilangan2
label
caption
Jenis perhitungan
label
caption
Hasil perhirungan
textbox
Text1
Text1
textbox
Text2
Text2
textbox
Text3
Text3
Combo box
text
text
Command button
caption
proses
Command button
caption
hapus


Private Sub Command1_Click()
If Combo1.Text = "+" Then
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
ElseIf Combo1.Text = "-" Then
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
ElseIf Combo1.Text = "*" Then
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
Text3.Text = Val(Text1.Text) / Val(Text2.Text)
End If
End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
MEMBUAT PERHITUNGAN GAJI


Dim nilai(1 To 2) As String
Dim angka(1 To 2) As String

Private Sub Combo1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
    If Combo1.Text = "ya" Or Combo1.Text = "tidak" Then
    Command1.SetFocus
    Else
    Combo1.SetFocus
    End If
End If
End Sub

Private Sub Command1_Click()
If Text1.Text = "" Then
Text1.SetFocus
ElseIf Text2.Text = "" Then
Text2.SetFocus
ElseIf Combo1.Text = "" Then
Combo1.SetFocus
Else
If Text2 > 40 Then
nilai(1) = Val(Text2.Text) - Val(40)
nilai(2) = nilai(1) * Val(25000)
Text4.Text = nilai(2)
Else
Text4.Text = "0"
End If
If Combo1.Text = "tidak" Then
angka(1) = Val(Text1.Text) * Val(10)
angka(2) = angka(1) / Val(100)
Text3.Text = angka(2)
Else
Text3.Text = "0"
End If
End If
Text5.Text = Val(Text1.Text) + Val(Text3.Text) + Val(Text4.Text)
End Sub


Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Combo1.Text = ""
End Sub

Private Sub Command3_Click()
MsgBox " anda ingin keluar...?", vbInformation

End
End Sub

Private Sub Form_Load()
Combo1.AddItem "ya"
Combo1.AddItem "tidak"
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
    If Text1.Text = "" Then
    Text1.SetFocus
    Else
    Text2.SetFocus
    End If
End If
If Not (KeyAscii >= Asc("0") & Chr(13) And KeyAscii <= Asc("9") & Chr(13) Or KeyAscii = 13 Or KeyAscii = vbKeyBack Or KeyAscii = vbKeyDelete) Then
KeyAscii = 0
MsgBox "hanya angka saja..!!!", vbCritical, "Ooo tidak bisa..!!!"
End If
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
    If Text2.Text = "" Then
    Text2.SetFocus
    Else
    Combo1.SetFocus
    End If
End If
If Not (KeyAscii >= Asc("0") & Chr(13) And KeyAscii <= Asc("9") & Chr(13) Or KeyAscii = 13 Or KeyAscii = vbKeyBack Or KeyAscii = vbKeyDelete) Then
KeyAscii = 0
MsgBox "hanya angka saja..!!!", vbCritical, "Ooo tidak bisa..!!!"
End If
End Sub
 

FISIKA

0 komentar

Gerak Lurus Berubah Beraturan (GLBB)



Suatu benda dikatakan melakukan gerak lurus berubah beraturan (GLBB) jika percepatannya selalu konstan. Percepatan merupakan besaran vektor (besaran yang mempunyai besar dan arah). Percepatan konstan berarti besar dan arah percepatan selalu konstan setiap saat. Walaupun besar percepatan suatu benda selalu konstan tetapi jika arah percepatan selalu berubah maka percepatan benda tidak konstan. Demikian juga sebaliknya jika arah percepatan suatu benda selalu konstan tetapi besar percepatan selalu berubah maka percepatan benda tidak konstan.
Karena arah percepatan benda selalu konstan maka benda pasti bergerak pada lintasan lurus. Arah percepatan konstan = arah kecepatan konstan = arah gerakan benda konstan = arah gerakan benda tidak berubah = benda bergerak lurus.Besar percepatan konstan bisa berarti kelajuan bertambah secara konstan atau kelajuan berkurang secara konstan. Ketika kelajuan benda berkurang secara konstan, kadang kita menyebutnya sebagai perlambatan konstan. Untuk gerakan satu dimensi (gerakan pada lintasan lurus), kata percepatan digunakan ketika arah kecepatan = arah percepatan, sedangkan kata perlambatan digunakan ketika arah kecepatan dan percepatan berlawanan.

KIMIA

0 komentar

Pengertian unsur, senyawa, dan campuran dalam kimia
Lambang unsur
Setiap dalam suatu unsur pasti akan diberi lambang sesuai dengan aturan penulisan dalam internasional. Berikut ini adalah aturan penulisan dalam suatu unsur.
a.     Untuk lambang unsur yang hanya terdiri atas satu huruf, penulisannya itu
menggunakan huruf kapital.
Contoh seperti :
  • Karbon dinotasikan C.
  • Unsur Hidrogen dinotasikan H.
  • Unsur Oksigen dinotasikan 0.
b.     Untuk lambang unsur yang terdiri dari dua huruf, penulisan huruf pertama
menggunakan huruf kapital dan huruf kedua dengan mengunakan huruf kecil.
Contohnya seperti :
  • Unsur Natrium dinotasikan Na.
  • Unsur Kalsium dinotasikan Ca.
Berikut ini lambang unsur logam dan nonlogam
Unsur Logam
Unsur Nonlogam
Nama Unsur       Lambang
i Nama Unsur       Lambang
Aluminium          Al Argon                Ar
Antimon Sb Arsen As
Barium Ba Belerang S
Besi Fe Boron B
Bismut Bi Bromin Br
Emas Au Flourin F
Kalium K Fosforus P
Kalsium Ca Helium He
Kobalt                Co Hidrogen H
Kromium Cr lodin 1
Mangan Mn Karbon C
Magnesium Mg Klorin CI
Natrium Na Neon Ne
Nikel Ni Nitrogen N
Perak Ag Oksigen 0
Raksa Hg Silikon Si
Seng Zn Kripton Kr
Tembaga Cu Xenon X
Timah
Sn Selenium Se
Timbal Pb Radon Rn

Bahasa Indonesia

0 komentar

KALIMAT EFEKTIF
Kalimat efektif ialah kalimat yang memiliki kemampuan untuk menimbulkan kembali
gagasan-gagasan pada pikiran pendengar atau pembaca seperti apa yang ada dalam pikiran
pembicara atau penulis. Kalimat sangat mengutamakan keefektifan informasi itu sehingga kejelasan
kalimat itu dapat terjamin.
Sebuah kalimat efektif mempunyai ciri-ciri khas, yaitu kesepadanan struktur, keparalelan
bentuk, ketegasan makna, kehematan kata, kecermatan penalaran, kepaduan gagasan, dan
kelogisan bahasa.
A. Kesepadanan
Yang dimaksud dengan kesepadanan ialah keseimbangan antara pikiran (gagasan) dan

Pascal

0 komentar

Pascal (bahasa pemrograman)



Pascal adalah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971. Dengan mengambil nama dari matematikawan Perancis, Blaise Pascal, yang pertama kali menciptakan mesin penghitung, Profesor Niklaus Wirth membuat bahasa Pascal ini sebagai alat bantu untuk mengajarkan konsep pemrograman komputer kepada mahasiswanya. Selain itu, Profesor Niklaus Wirth membuat Pascal juga untuk melengkapi kekurangan-kekurangan bahasa pemrograman yang ada pada saat itu.

Kelebihan

Kelebihan dari bahasa pemrograman Pascal adalah:

VISUAL BASIC

0 komentar

Microsoft Visual Basic (sering disingkat sebagai VB saja) merupakan sebuah bahasa pemrograman yang menawarkan Integrated Development Environment (IDE) visual untuk membuat program perangkat lunak berbasis sistem operasi Microsoft Windows dengan menggunakan model pemrograman (COM), Visual Basic merupakan turunan bahasa pemrograman BASIC dan menawarkan pengembangan perangkat lunak komputer berbasis grafik dengan cepat, Beberapa bahasa skrip seperti Visual Basic for Applications (VBA) dan Visual Basic Scripting Edition (VBScript), mirip seperti halnya Visual Basic, tetapi cara kerjanya yang berbeda.[1] Para programmer dapat membangun aplikasi dengan menggunakan komponen-komponen yang disediakan oleh Microsoft Visual Basic Program-program yang ditulis dengan Visual Basic juga dapat

 

Letjen Kazuya © 2011 Design by Best Blogger Templates | Sponsored by HD Wallpapers