My Favorite Place

About Me

My photo
DKI Jakarta, Java, Indonesia
I currently learning about the business enterpreneur network.

Friday, February 4, 2011

Cara Membuat Tes Kraeplin Sendiri

Hai kawan semua... saya ingin berbagi nih untuk yang bekerja sebagai recruitment di suatu instansi swasta... jika kalian di minta membuat alat tes untuk menguji kecerdasan dan kecepatan seseorang, maka bisa kalian berikan alat tes buatan sendir, yaitu TES KRAEPLIN....
Bagaimana cara membuat nya..?
Ikuti saja cara nya step by step....

1. Kalian bukan Microsoft Office














2. Tekan tombol Alt & F11, maka akan muncul seperti ini..........













3. Kemudian ada tulisan visual basic... pilih kolom Insert, kemudian tulisan Module














4. Setelah itu akan ada.... gambar seperti ini...









Jangan lupa copy paste kode ini :

Sub PsikoNumGenerator()



Randomize Timer



theEnd = InputBox("Jumlah angka yang akan dibuat", "Jumlah Angka")



If Not IsNumeric(theEnd) Then Exit Sub



If Int(theEnd) = 0 Then Exit Sub



For i = 1 To theEnd



theText = theText & vbTab & Int(Rnd(i) * 10)



Next



Selection.TypeText Text:=theText



End Sub


















5. Lalu kembali ke microsoft word Tekan Alt + F8, akan muncul gambar seperti ini :


 






6. Tekan rombol Run, setelah di tekan maka akan muncul seperti ini :









7. Setelah terbuka masukkan angka yang kalian kehendaki untuk mengetes nya.... Perhatikan ukuran kertas sesuaikan dengan kolom dan baris nya...











8. Kemudian jika sudah dimasukkan angka maka akan tampak seperti ini :









9. Lakukan tes, pada beberapa subjek

10. Interprestasikan hasil tes tersebut, apakah makna nya!!!! dan apakah kandidat calon karyawan anda memenuhi persyaratan nilai standart perusahaan....

Sekali lagi terimakasih telah menyimak karya tulis saya kali ini, karena saya juga baru belajar hari ini... cara membuat nya, dan ingin membaginya untuk kawan-kawan seperjuangan...
Kalau untuk artinya saya tidak bisa membocorkannya, jika ingin tahu kalian harus membeli dan membaca bukunya.


Regrads With Love 
Prohibited from copying my writing 
Created By : Tasya Zigy

No comments:

Advertise Adbrite

Your Ad Here

Popular Posts

Your Coments

Advertise by chitika

Flag

free counters

Since 02.09.2009

Bonus Jajanan

Bonus Dahsyat Klik Disini