Membuat Form Penjumlahan Angka Psikotes Pauli and Kreaplin di Ms.Word

ada yang pernah liat angka bejibun di kertas A3 yang kaya gini ?



langkah pertama gan :D


1. pertama buka ms.office word dulu pastinya.

2. setelah itu tekan tombol pada keyboard kamu ALT+F11, nanti akan muncul window baru microsoft visial basic seperti gambar dibawah.

3. lalu pada window yang baru (Ms. Visual basic) cari insert>module

4. Setelah itu masukan code script nya pada kolom module yang sudah dibuat, dengan code dibawah ini yang sudah saya warnai biru :
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. jika sudah selesai memasukan code diatas yang saya warnai biru, silahkan kembali ke ms.word, lalu tekan tombol > ALT+F8 pada keyboard

nanti muncul nya kaya gini :D

6. setelah itu akan muncul gambar seperti dibawah, silahkan run > lalu masukan angka yang ingin kamu taru misal 5000 angka or 2000 angka terserah kamu :D

selamat mencoba ya, meskipun angkanya ga begitu sama kemungkinannya, tapi lumayan untuk melatih ketenangan dan biasa dengan tes ini. selamat mencoba dan semoga lulus tes psikotesnya
semoga bermanfaat ya :D

Sedikit Saran

1.Konsentrasi pada lembar jawaban sendiri,jangan terpengaruh dengan peserta ujian yang lain,walaupun mereka telah mengerjakan dengan sangat cepat,karena belum tentu mereka lebih teliti.

2.Cermat dan teliti

3.Buatlah dan pertahankan Ritme pengerjaan (jika anda sudah mendapatkan ritmenya,maka akan terasa lebih mudah)

4. Istirahat Yang cukup/ Jangan Tidur Kemalaman

Sumber:
jobfly@idws
http://www.indowebster.web.id/showthread.php?t=99795&highlight=pauli
www.fajriphoto.com