SMK Khaidir Nur

SMK Khaidir Nur

          SMK Khaidir Nur merupakan sekolah yang tepatnya berada di jl.samanhuddin
tanah merah pasar 2,5. ini merupakan sekolah yang beneran bergerak di bidang IT/komputer.
Keistimewaan SMK Khaidr Nur adalah:
Banyak pelajaran pelajaran jurusan SMK Khaidr Nur yang menyamai pelajaran-pelajaran di universitas,
Dan SMK Khaidir Nur  harus sudah siap diterjunkan didunia kerja.
SMK Khaidir Nur mempunyai pasilitas-pasilitas yang lengkap, dari pasilitas olah raga sampai pasilitas untuk komputer.
Disini saya hanya mengutamakan membahas tentang komputer .

1. Rekayasa Perangkat Lunak atau RPL

Untuk pelajaran :

      SMK Khaidir Nur merupakan sekolah pertama kali di binjai yang mempunyai jurusan Rekayasa Perangkat Lunak atau RPL.
jurusan ini sangat menyenangkan bagi kami karna sering membuat kepala kami pusing. jurusan yang satu ini
banyak membahas tentang software software komputer. pelajaran ini sebenarnya mudah, kalau kita menganggap mudah
dan sulit jika kita menganggap sulit. intinya adalah suatu keyakinan, kalau kita yakin, apapun yang kita impikan pasti akan tercapai. pepatah mengatakan (dimana ada usaha pasti ada jalan). itu lah sebenarnya yang harus dipikirkan
seorang programer.

Daftar Pelajaran

1. quick basic
2. visual basic
3. html

1. quick basic  








quick basic merupakan pelajaran software berbasis dekstop yang dapat mencari logikal-logikal komputer atau bahasa komputer

---

• Mengenal Bahasa Basic
• Menggunakan Basic
• Arithmetic Operator
• Operator Pembanding
• Logical Operator

• Mengenal Bahasa Basic 

    Bahasa basic diciptakan dengan tujuan utama sebagai bahasa awam media perantara antar pemakai berinteraksi langsung dengan komputer. Basic merupakan singkatan dari "beginner all purpose symbolic instruction code". bahasa basic awam disebut juga dengan nama bahwa tingkat tinggi atau orientasi ke pemecahan masalah 

• Menggunakan Basic

contoh perkalian:

cls 

input a 

input b

hsl=a*b 

print"a"a 

print"b"b

print"hasil"hsl 

end 

• Operator Arithmetic  

operator	maksud
( )	kurung pemisah
^	pangkat
*	kali
/	pembagian desimal
\	pembagian bulat
MOD	sisa pembagian
+	tambah
-	kurang

 

sistem operator akan dieksekusi dari atas kebawah

contoh :

8 mod 3 + 2 - 6 * 6 

maka 8 mod 3 + 2 - 36 2 + 2 - 36 =-32

keterangan :

1. komputer membaca perkalian dulu

2. trs membaca mod

3. trs ditambah dan dikurangkan 

• Operator Pembanding

tanda	berarti
<	lebih kecil dari
>	lebih besar dari
<=	lebih kecil sama dengan
>=	lebih besar sama dengan
=	sama dengan
<>	tidak sama dengan

 

Operator pembanding ini lebih banyak digunakan di kondisi if contoh :

cls

input usia";usia print"usia";usia

if usia = < 5 then elseif usia = < 12 then

print"anak-anak" elseif usia = < 18 then

print"remaja" elseif usia = < 30 then 

print"dewasa" else print"manula" endif end 

 

• Logical Operator

operator logika digunakan untuk menunjukan hubungan logika antara dua belah elemen 

 

operator		keterangan
NOT		tidak/kebalikan
OR		atau/ salah satu ada yang benar maka true
AND		dan/ salah satu ada yang salah maka false
contoh :
A	B	OR	AND	NOT
T	T	T	T	F
T	F	T	F	F
F	T	T	F	F
F	F	F	F	T

 

gmudah bukan quick basic nya

                         smk khaidir nur                                           

   2.visual basic 

---

     1. pengertian visual basic 6

      2. contoh program visual basic 6

  1. Pengertian Visual Basic
 

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)


  2. Contoh program

Membuat Kalkulator

langkah-langkah membuat kalkulator dengan visual basic 6 adalah

    1. mengatur properties:


 

Untuk properties dari masing-masing objek, saya contohkan seperti dibawah ini, dengan letak
masing-masing objek disesuaikan dengan gambar diatas.

Textbox 1:
(Name) : txtDisplay
Alignment: 1-Right Justify
Text : (kosongkan)
Maxlength : 12

Command Button 1:
(Name) : cmdAngka
Index : 1
Caption : 1
Command Button 2:
(Name) : cmdAngka
Index : 2
Caption : 2

Command Button 3:
(Name) : cmdAngka
Index : 3
Caption : 3

Command Button 4:
(Name) : cmdAngka
Index : 4
Caption : 4

Command Button 5:
(Name) : cmdAngka
Index : 5
Caption : 5

Command Button 6:
(Name) : cmdAngka
Index : 6
Caption : 6

Command Button 7:
(Name) : cmdAngka
Index : 7
Caption : 7
Command Button 8:
(Name) : cmdAngka
Index : 8
Caption : 8

Command Button 9:
(Name) : cmdAngka
Index : 9
Caption : 9

Command Button 10:
(Name) : cmdAngka
Index : 0
Caption : 0

Command Button 11:
(Name) : cmdPlusMinus
Caption : +/-

Command Button 12:
(Name) : cmdKoma
Caption : .

Command Button 13:
(Name) : cmdOperator
Index : 1
Caption : +

Command Button 14:
(Name) : cmdOperator
Index : 2
Caption : -

Command Button 15:
(Name) : cmdOperator
Index : 3
Caption : x

Command Button 16:
(Name) : cmdOperator
Index : 4
Caption : /

Command Button 17:
(Name) : cmdClearEntry
Caption : CE

Command Button 18:
(Name) : cmdClear
Caption : C

Command Button 19:
(Name) : cmdSamaDengan
Caption : =


  2. memasukan source code

    Berikutnya, Anda tinggal membuat coding dari kalkulator tersebut. Jika Anda mengikuti semua
setting properties seperti diatas, maka codingnya saya contohkan seperti ini:

Option Explicit
Private Hasil As Double
Private Const opNol = 0
Private Const opTambah = 1
Private Const opKurang = 2
Private Const opKali = 3
Private Const opBagi = 4
Private Operator As Integer
Private NilaiBaru As Boolean

' untuk menghapus karakter terakhir
Private Sub Hapus()
Dim txt As String
Dim min_len As Integer
txt = txtDisplay.Text
If Left$(txt, 1) = "-" Then
min_len = 2
Else
min_len = 1
End If
If Len(txt) > min_len Then
txtDisplay.Text = Left$(txt, Len(txt) - 1)
Else
txtDisplay.Text = "0"
End If
End Sub
' hapus angka, hasil terakhir dan operator
Private Sub cmdClear_Click()
cmdClearEntry_Click
Hasil = 0
Operator = opNol
End Sub
' hapus angka
Private Sub cmdClearEntry_Click()
txtDisplay.Text = ""
End Sub
' menambahkan koma (desimal)
Private Sub cmdKoma_Click()
If InStr(txtDisplay.Text, ".") Then
Beep
Else
If NilaiBaru Then
txtDisplay.Text = "."
NilaiBaru = False
Else
txtDisplay.Text = txtDisplay.Text & "."
End If
End If
End Sub

' Menghitung
Private Sub cmdSamaDengan_Click()
Dim HasilBaru As Double
If txtDisplay.Text = "" Then
HasilBaru = 0
Else
HasilBaru = CDbl(txtDisplay.Text)
End If
Select Case Operator
Case opNol
Hasil = HasilBaru
Case opTambah
Hasil = Hasil + HasilBaru
Case opKurang
Hasil = Hasil - HasilBaru
Case opKali
Hasil = Hasil * HasilBaru
Case opBagi
'Tidak bisa dibagi nol
If HasilBaru = 0 Then
MsgBox "Tidak bisa dibagi 0", vbOKOnly + vbCritical, "Kalku ERROR"
Call cmdClear_Click
Elsev Hasil = Hasil / HasilBaru
End If
End Select
Operator = opNol NilaiBaru = True
txtDisplay.Text = Format$(Hasil)
End Sub
' menuliskan angka
Private Sub cmdAngka_Click(Index As Integer)
If NilaiBaru Then
txtDisplay.Text = Format$(Index)
NilaiBaru = False
Else
txtDisplay.Text = _
txtDisplay.Text & Format$(Index)
End If End Sub
' tombol tambah/kurang/bagi/kali
Private Sub cmdOperator_Click(Index As Integer)
cmdSamaDengan_Click
Operator = Index
NilaiBaru = True
End Sub

' merubah tanda +/-
Private Sub cmdPlusMinus_Click()
If NilaiBaru Then
txtDisplay.Text = "-"
ElseIf Left$(txtDisplay.Text, 1) = "-" Then
txtDisplay.Text = Right$(txtDisplay.Text, 2)
Else
txtDisplay.Text = "-" & txtDisplay.Text
End If
End Sub
' filter untuk angka saja yg dapat diketikkan
Private Sub Form_KeyPress(KeyAscii As Integer)
txtDisplay_KeyPress KeyAscii
End Sub
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
txtDisplay_KeyUp KeyCode, Shift
End Sub
' supaya kursor tetap di kanan
Private Sub txtDisplay_Change()
txtDisplay.SelStart = Len(txtDisplay.Text)
End Sub
Private Sub txtDisplay_GotFocus()
txtDisplay_Change
End Sub
' untuk mengetikkan angka di keyboard
Private Sub txtDisplay_KeyPress(KeyAscii As Integer)
Dim ch As String
ch = Chr$(KeyAscii)
Select Case ch
Case "0"
cmdAngka_Click 0
Case "1"
cmdAngka_Click 1
Case "2"
cmdAngka_Click 2
Case "3"
cmdAngka_Click 3
Case "4"
cmdAngka_Click 4
Case "5"
cmdAngka_Click 5
Case "6"
cmdAngka_Click 6
Case "7"
cmdAngka_Click 7
Case "8"
cmdAngka_Click 8
Case "9"
cmdAngka_Click 9
Case "*", "x", "X"
cmdOperator_Click opKali
Case "+"
cmdOperator_Click opTambah
Case vbCrLf, vbCr, "="
cmdSamaDengan_Click
Case "-"
cmdOperator_Click opKurang
Case "."
cmdKoma_Click
Case "/"
cmdOperator_Click opBagi
Case "C", "c"
cmdClearEntry_Click
End Select
KeyAscii = 0
End Sub
 

                 smk khaidir nur                                                 



menyenangkan bukan, pelajaran SMK Khaidir Nur

 Itu merupakan sebagian dari pelajaran SMK Khaidir Nur yang dapat saya berikan pada anda semua.
mungkin banyak kekurangan yang ada pada blog saya, tentang pelajaran Rekayasa Perangkat Lunak.
saya mohon maaf jika ada kesalahan pada blog saya

banyak hal yang harus kita dipelajari di SMK Khaidir Nur dari tata makan sampai tata belajar

                                                                                       SMK Khaidir Nur   Tampil beda

  

ceramah singkat

ceramah singkat

 pengertian sholat

sholat adalah suatu kewajiban bagi kita umat islam
Menurut bahasa shalat artinya adalah berdoa, sedangkan menurut istilah shalat adalah suatu perbuatan serta perkataan yang dimulai dengan takbir dan diakhiri dengan salam sesuai dengan persyaratkan yang ada.
sholat fardhu lima kali sehari adalah wajib bagi semua orang yang telah dewasa atau akil baligh serta normal tidak gila
.

• HIKMAH SHOLAT 

Sholat disyari'atkan sebagai bentuk tanda syukur kepada Allah, untuk menghilangkan dosa-dosa, ungkapan kepatuhan dan merendahkan diri di hadapan Allah, menggunakan anggota badan untuk berbakti kepada-Nya yang dengannya bisa seseorang terbersih dari dosanya dan tersucikan dari kesalahan-kesalahannya dan terajarkan akan ketaatan dan ketundukan.
Allah telah menentukan bahwa sholat merupakan syarat asasi dalam memperkokoh hidayah dan ketakwaan, sebagaimana disebutkan dalam firman-Nya:



"Alif Laaam Miiim. Kitab (Al Qur-an) tidak ada keraguan di dalamnya, menjadi petunjuk bagi mereka yang bertakwa. Yaitu mereka yang beriman kepada yang ghaib, mendirikan sholat dan menafkahkan sebagian rezki yang Kami anugerahkan kepada mereka." (QS. Al Baqarah : 1-3).
Di samping itu Allah telah mengecualikan orang-orang yang senantiasa memelihara sholatnya dari kebiasaan manusia pada umumnya: berkeluh kesah dan kurang bersyukur, disebutkan dalam fiman-Nya:




"Sesungguhnya manusia diciptakan bersifat keluh kesah dan kikir. Apabila ia ditimpa kesusahan ia berkeluh kesah, dan apabila ia mendapat kebaikan ia amat kikir, kecuali orang-orang yang mengerjakan sholat, yang mereka itu tetap mengerjakan sholat." (QS Al Ma'arij: 19-22).

• MENINGGALKAN SHOLAT

Saudara-saudara Rahimakumullah, ketahuilah bahwa sesungguhnya bencana yang dahsyat, perbuatan yang paling buruk, dan aib yang paling nista adalah kurangnya perhatian masyarakat kita pada Sholat Lima Waktu, Sholat Jum'at dan Sholat Berjamaah, padahal semua itu adalah ibadah-ibadah yang dengannya Allah meninggikan derajat dan menghapuskan dosa-dosa maksiat. Dan sholat adalah cara ibadah seluruh penghuni bumi dan langit.

Rasulullah SAW bersabda: "Langit merintih dan memang ia pantas merintih, karena pada setiap tempat untuk berpijak terdapat malaikat yang bersujud atau berdiri (sholat) kepada Allah Azza Wa Jalla." (HR. Imam Turmudzi, Ibnu Majah dan Ahmad)

Orang yang meninggalkan sholat karena dilalaikan oleh urusan dunia akan celaka nasibnya, berat siksanya, merugi perdagangannya, besar musibahnya, dan panjang penyesalannya.

Dengarkanlah nasihatku tentang nasib orang yang meninggalkan sholat, baik semasa hidup maupun setelah meninggal. Sesungguhnya Allah merahmati orang yang mendengarkan nasihat kemudian memperhatikan dan mengamalkannya.

Allah SWT berfirman: "Sesungguhnya sholat adalah kewajiban yang ditentukan waktunya bagi orang-orang yang beriman." (QS. An-Nisa', 4:103)

Abu Hurairah RA meriwayatkan, "Setelah Isya' aku bersama Umar bin Khattab RA pergi ke rumah Abu Bakar AsShiddiq RA untuk suatu keperluan. Sewaktu melewati pintu rumah Rasulullah SAW, kami mendengar suara rintihan. Kami pun terhenyak dan berhenti sejenak. Kami dengar beliau menangis dan meratap."

"Ahh..., andaikan saja aku dapat hidup terus untuk melihat apa yang diperbuat oleh umatku terhadap sholat. Ahh..., aku sungguh menyesali umatku."

"Wahai Abu Hurairah, mari kita ketuk pintu ini," kata Umar RA. Umar kemudian mengetuk pintu. "Siapa?" tanya Aisyah RA. "Aku bersama Abu Hurairah."

Kami meminta izin untuk masuk dan ia mengizinkannya. Setelah masuk, kami lihat Rasulullah SAW sedang bersujud dan menangis sedih, beliau berkata dalam sujudnya:

"Duhai Tuhanku, Engkau adalah Waliku bagi umatku, maka perlakukan mereka sesuai sifat-Mu dan jangan perlakukan mereka sesuai perbuatan mereka."

"Ya Rasulullah, ayah dan ibuku menjadi tebusanmu. Apa gerangan yang terjadi, mengapa engkau begitu sedih?"

"Wahai Umar, dalam perjalananku ke rumah Aisyah sehabis mengerjakan sholat di mesjid, Jibril mendatangiku dan berkata, "Wahai Muhammad, Allah Yang Maha Benar mengucapkan salam kepadamu," kemudian ia berkata, "Bacalah!"

"Apa yang harus kubaca?"

"Bacalah: "Maka datanglah sesudah mereka pengganti (yang jelek) yang menyia-nyiakan sholat dan memperturutkan hawa nafsunya, mereka kelak akan menemui kesesatan." (QS. Maryam, 19:59)

"Wahai Jibril, apakah sepeninggalku nanti umatku akan mengabaikan sholat?"

"Benar, wahai Muhammad, kelak di akhir zaman akan datang sekelompok manusia dari umatmu yang mengabaikan sholat, mengakhirkan sholat (hingga keluar dari waktunya), dan memperturutkan hawa nafsu. Bagi mereka satu dinar (uang) lebih berharga daripada sholat." Hadits ini juga diriwayatkan oleh Ibnu Umar RA.

Abu Darda` berkata, "Hamba Allah yang terbaik adalah yang memperhatikan matahari, bulan dan awan untuk berdzikir kepada Allah, yakni untuk mengerjakan sholat."

Diriwayatkan pula bahwa amal yang pertama kali diperhatikan oleh Allah adalah sholat. Jika sholat seseorang cacat, maka seluruh amalnya akan ditolak.

Rasulullah SAW bersabda: "Wahai Abu Hurairah, perintahkanlah keluargamu untuk sholat, karena Allah akan memberimu rezeki dari arah yang tidak pernah kamu duga."

Atha' Al-Khurasaniy berkata, "Sekali saja seorang hamba bersujud kepada Allah di suatu tempat di bumi, maka tempat itu akan menjadi saksinya kelak di hari kiamat. Dan ketika meninggal dunia tempat sujud itu akan menangisinya."

Rasulullah SAW bersabda: "Sholat adalah tiang agama, barang siapa menegakkannya, maka ia telah menegakkan agama, dan barang siapa merobohkannya, maka ia telah merobohkan agama." (HR. Imam Baihaqi)

"Barang siapa meninggalkan sholat dengan sengaja, maka ia telah kafir." (HR. Bazzar dari Abu Darda`), kafir yang dimaksud disini adalah ingkar terhadap perintah Allah karena perbuatan orang kafir adalah tidak pernah shalat. Dalam Shahih Muslim dijelaskan bahwa Rasulullah saw bersabda yang membedakan antara orang beriman dengan orang kafir adalah shalat. Maka maukah kita disamakan dengan orang kafir, padahal Rasulullah saw bersabda"Barang siapa mengikuti kebiasaan suatu kaum maka dia termasuk kaum tersebut". Orang2 kafir adalah orang yang tidak pernah shalat, maukah kita termasuk golongan mereka.

"Barang siapa bertemu Allah sedang ia mengabaikan sholat, maka Allah sama sekali tidak akan mempedulikan kebaikannya." (HR. Thabrani)

"Barang siapa meninggalkan sholat dengan sengaja, maka terlepas sudah darinya jaminan Muhammad." (HR. Imam Ahmad dan Baihaqi)

"Allah telah mewajibkan sholat lima waktu kepada hamba-Nya. Barang siapa menunaikan sholat pada waktunya, maka di hari kiamat, sholat itu akan menjadi cahaya dan bukti baginya. Dan barang siapa mengabaikannya, maka ia akan dikumpulkan bersama Firaun dan Haman." (HR. Ibnu Hibban dan Ahmad) .

*Wasiat ini mudah-mudahan sangat bermanfaat buat kita semuanya umat Islam. Tugas kita semua untuk saling mengingatkan sesama Muslim akan pentingnya Sholat!

syarat2 sholat

1. Beragama Islam
2. Memiliki akal yang waras alias tidak gila atau autis
3. Berusia cukup dewasa
4. Telah sampai dakwah islam kepadanya
5. Bersih dan suci dari najis, haid, nifas, dan lain sebagainya
6. Sadar atau tidak sedang tidur Syarat sah pelaksanaan sholat adalah sebagai berikut ini :
1. Masuk waktu sholat
2. Menghadap ke kiblat
3. Suci dari najis baik hadas kecil maupun besar
4. Menutup aurat
C. Rukun Shalat
Dalam sholat ada rukun-rukun yang harus kita jalankan, yakni :
1. Niat
2. Posisis berdiri bagi yang mampu
3. Takbiratul ihram
4. Membaca surat al-fatihah
5. Ruku / rukuk yang tumakninah
6. I'tidal yang tuma'ninah
7. Sujud yang tumaninah
8. Duduk di antara dua sujud yang tuma'ninah
9. Sujud kedua yang tuma'ninah
10. Tasyahud
11. Membaca salawat Nabi Muhammad SAW
12. Salam ke kanan lalu ke kiri
D. Yang Membatalkan Aktivitas Sholat Kita
Dalam melaksanakan ibadah salat, sebaiknya kita memperhatikan hal-hal yang mampu membatalkan shalat kita, contohnya seperti :
1. Menjadi hadas / najis baik pada tubuh, pakaian maupun lokasi
2. Berkata-kata kotor
3. Melakukan banyak gerakan di luar sholat bukan darurat
4. Gerakan sholat tidak sesuai rukun shalat dan gerakan yang tidak tuma'ninah.