LOSPALOS, MEHARA LATA: Cara Membuat Angka Seperti Tes Pauli dan Krapelin di Microsoft Word

Kursor

HASIL PERTANDINGAN BOLA

NONO BLOG - DAFTAR LIVE SCORES SEPAKBOLA DUNIA

Cara Membuat Angka Seperti Tes Pauli dan Krapelin di Microsoft Word



Saat ini para pencari kerja di Indonesia tiap tahunnya terus bertambah terutama lulusan muda dari seluruh universitas di Indonesia. Tidak imbangnya pencari kerja dan lowongan kerja menyebabkan banyaknya pengangguran dan tingkat persaingan yang tinggi. Oleh okarena itu setiap perusahaan jika akan merekrut perlu menyeleksi para pekerja yang berkompeten. Dalam penyeleksian tersebut dilakukan beberapa tes , salah satunya Psikotes. Dalam Psikotes pasti semua orang menakuti pada sesi tes Pauli dan Krapelin.

Tes Pauli dan Krapelin yaitu tes yang mengetahui tingakt kecepatan, ketepatan, dan kecermatan diri anda serta seberapa lama anda bertahan dalam kondisi tekanan. Pada tes ini anda hanya menjumlahkan angka satuan dari 1-9 yang diacak dari atas kebawah maupun bawah ke atas. Dalam mengerjakan tes ini orang yang pintar belumlah bisa lolos namun orang yang terampil dan sering berlatih kemungkinan lolos peluangnya sangat besar.

Makanya seringlah anda belajar berhitung dengan model Pauli/Krapelin. Untuk itu pada kesempatan ini saya akan mengajarkan anda cara membuat simulasi seperti tes sebenarnya yaitu Cara Membuat Angka Seperti Tes Pauli dan Krapelin di Microsoft Word. Berikut caranya:

1. Buka Microsoft Word anda

2. Setelah itu tekan tombol di Keyboard–> ALT F11. Setelah itu akan muncul Microsoft Visual Basic.

Membuat angka tes pauli di word

Kemudian pilih Menu Insert>>Module.



3. Maka akan muncul Document kosong,

Membuat angka tes pauli di word

Copy dan Pastekan kode di bawah ini ke Dokumen kosong tersebut:

=====================================================
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
==========================================================


4. Kemudian kembali ke Microsoft Word anda, lalu tekan tombol ALT F8



5. Pilih RUN

6. Masukkan berapa banyak jumlah angka yang ingin dibuat



7. Dan inilah hasilnya maka angka tes seperti tes pauli dan krapelin muncul di dokumen word anda.

Membuat angka tes pauli di word




Silahkan anda cetak dokumen tersebut dan bsa digunakan untuk berlatih buat anda, selamat mencoba dan semoga sukses untuk tes Psikotesnya.