Aplikasi Penghitung Jumlah Kata Pada Artikel
Aplikasi Penghitung Jumlah Kata Pada Artikel – Pada kesempatan kali ini saya akan sedikit memberikan informasi mengenai Aplikasi Penghitung Jumlah Kata Pada Artikel.Aplikasi ini diperuntukan untuk teman – teman semua yang sering mengikuti kontes SEO yang mengharuskan Jumlah Kata Pada Artikel dengan ketentuannya.Oleh karena itu saya membuat sebuah Aplikasi Penghitung Jumlah Kata Pada Artikel.
Penghitung Jumlah Kata ini masih sangat minimalis sekali tanpa adanya gambar apa – apa yang saya buatkan.Pada Aplikasi Penghitung Jumlah Kata Pada Artikel yang saya buatkan ini,selain untuk menghitung Jumlah Kata saya juga membuatkan untuk menghitung jumlah karakter dan jumlah spasi dengan 1 kali klik saja.
Bagaimana ?? Penasaran ?? Berikut akan saya berikan source code Aplikasi Penghitung Jumlah Kata Pada Artikel.
Penghitung Jumlah Kata
Berikut ini adalah source code dari Aplikasi Penghitung Jumlah Kata yang saya buatkan untuk teman – teman pembaca setia blog sederhana saya ini :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
| Private Sub Command1_Click() 'jalan Dim i, jmlA, jmlB As Integer Dim a, b As String Dim nItem As Integer Dim aItem As Variant Dim sTeks As String If Text1 . Text = "" Then Text1 . SetFocus Exit Sub End If 'Tampilkan Jumlah Kata a = Text1 . Text jmlA = 1 For i = 1 To Len(Trim$(a)) If Asc(Mid(a, i, 1 )) = 13 Or Asc(Mid(a, i, 1 )) = 32 Then jmlA = jmlA + 1 Next i Text2 = jmlA 'Tampilkan Jumlah Karakter Text3 = Len(Text1) 'Tampilkan Jumlah spasi sTeks = Text1 aItem = Split(sTeks, " ") nItem = UBound(aItem) Text4 = nItem End Sub Private Sub Command2_Click() 'keluar End End Sub Private Sub Command3_Click() 'clear Text1 . Text = "" Text2 . Text = "" Text3 . Text = "" Text4 . Text = "" Text1 . SetFocus End Sub Private Sub Form_Load() Text1 . Text = "" End Sub |
Diatas tadi adalah sebuah script sederhana yang saya buatkan untuk Aplikasi Penghitung Jumlah Kata Pada Artikel.Jika teman – teman bingung,project tersebut bisa didapatkan pada link berikut yang sudah saya upload berikut ini Aplikasi Penghitung Jumlah Kata Pada Artikel.
Sekian
informasi sederhana saya ini,semoga dengan adanya artikel ini teman –
teman semua terbantu.Jika ada yang ingin ditanyakan silahkan berkomentar
pada kolom komentar setelah artikel Aplikasi Penghitung Jumlah Kata Pada Artikel.
6 komentar untuk "Aplikasi Penghitung Jumlah Kata Pada Artikel"
search engine optimization seo
[url=http://avmost.com]Free Porn Video[/url]
[url=http://avmost.com]Free Porn Video[/url]
[url=http://onlinepokiesking4u.com]real money pokies[/url]
[url=http://xrumergeek.com]xrumer[/url]
[url=http://truebluepokies4u.com]view more information here[/url]
Bila Ada Pertanyaan/Saran Opini Silakan Dilayangkan Di kotak Komentar/Buku Tamu
Dan Dimohon Para Visitor Menggunakan Bahasa Yang Sopan
Bila Tidak Menggunakan Bahasa Yang Sopan Komentar Anda Akan Kami Hapus
Mohon Maaf Bila Ingin Menyalin Artikel ini Harap Mencantumkan Sumbernya
When the Any Questions / Suggestions Please posted in Opinion Comment box / Guest Book
Please Use The Visitor and The Polite Language
When Not Using Polite Language That We Will Delete Your Comment
Sorry if this article Want to Copy Please Include the SourceSorry If you want to copy this article if Please Include the Source