Cara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007 ( Pauli test generator).
Karena inti test ini adalah dari banyaknya latihan, berikut cara membuat lembar kerja pauli test dan kraepelin test sendiri menggunakan Ms. Word 2007. Silahkan dicoba. Berikut langkah-langkahnya :
- Buka Microsoft Word ;
- Setelah itu tekan tombol ALT + F11 ;
- Pilih INSERT pada menu lalu selanjutnya pilih MODULE ;
Kemudian masukan kode dibawah ini (Copas Aja):
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
- Kemudian kembali ke Microsoft Word, tekan tombol ALT + F8 dan pilih RUN;
- Masukan jumlah angka yang kamu inginkan missal 5000 angka dan tada angka-angka tersebut akan secara otomatis di generate oleh perintah diatas.
Pauli test dan Kraepelin test generator online
Selain cara diatas, anda juga bisa berlatih pauli test dan kraepelin test secara online di halaman web berikut :
http://apps.prabowomurti.com/paulitest.php
Tidak ada komentar:
Posting Komentar