Membuat Fungsi Terbilang Mengunakan VB

Disini saya akan memberikan source codenya siapa tau bermanfaat bagi anda :

Option Explicit

Private Function Konversi(ByVal nNilai As Currency) As String

Dim Grade As Variant
Dim strTerbilang As String
Dim strPart As String
Dim iGrade As Byte

Grade = Array("Triliun", "Milyar", "Juta", "Ribu", "")

strTerbilang = ""

If Len(CStr(nNilai)) > 15 Then
   
    strTerbilang = ""
   
Else
    If Trim(nNilai) = "0" Then Konversi = "Nol": Exit Function
       
        strPart = Format(nNilai, String(15, "0"))
       
        For iGrade = 1 To 5
            If Val(Mid(strPart, (iGrade - 1) * 3 + 1, 3)) > 0 Then
                strTerbilang = strTerbilang & GetRatus(Mid(strPart, (iGrade - 1) * 3 + 1, 3), iGrade)
            End If
        Next iGrade
   
    Konversi = strTerbilang
   
End If

End Function
Private Function GetRatus(ByVal strPart As String, ByVal iGrade As Byte) As String

Dim Angka1 As Variant, Angka2 As Variant
Dim i As Integer
Dim strHasil As String
Dim nTemp As Byte

Angka1 = Array("Satu ", "Dua ", "Tiga ", "Empat ", _
"Lima ", "Enam ", "Tujuh ", "Delapan ", "Sembilan ")
Angka2 = Array("Ratus ", "Puluh ", "")

For i = 1 To 3

nTemp = Val(Mid(strPart, i, 1))

If nTemp = 1 Then

If i = 1 Then

strHasil = "Seratus "

ElseIf i = 2 Then

i = i + 1

nTemp = Val(Mid(strPart, i, 1))

If nTemp = 0 Then

strHasil = strHasil & "Sepuluh "

ElseIf nTemp = 1 Then

strHasil = strHasil & "Sebelas "

Else

strHasil = strHasil & Angka1(nTemp - 1) & "Belas "
End If

ElseIf Val(strPart) = 1 And iGrade = 4 Then

strHasil = strHasil & "Se"

Else

strHasil = strHasil & "Satu "

End If

ElseIf nTemp <> 0 Then

strHasil = strHasil + Angka1(nTemp - 1) + Angka2(i - 1)

End If

Next i

GetRatus = strHasil

End Function


Private Sub Command1_Click()
 Me.Text2.Text = Konversi(Me.Text1.Text)
End Sub

Untuk Melihat Source yang sebenarnya bisa di download di sini

Update NOD 32 Terbaru

Username:TRIAL-0091765613
Password:2hu8jkjh52

Username:TRIAL-0091765614
Password:mdtv5jfcta

Username:TRIAL-0091765634
Password:mkrvbhek8c

Username:TRIAL-0091764676
Password:5buue5acpv

Username:TRIAL-0091764685
Password:uhc2h8ednv

Username:TRIAL-0091764688
Password:rp5mpfpvbs

Down Lagu

Beberapa Koleksi saya 

1. Geisha-Lumpuhkan Ingatanku download disini
2. CAKRA KHAN - Setelah Kau Tiada download disini
3. yovie & nuno - mengejar mimpi download disini
4. Delyno-Private Love download disini
5. ARASH feat Helena Pure Love download disini
6. Green Day - 21 Guns download disini
7. Green Day - Backet Case download disini
8.  Pink - Just Give Me A Reason download disini
9.  Ungu - Bila tiba.mp3 download disini
10. Angel Vie - Gara-Gara Facebook download disini
11. andra and the backbone - bersedih download disini
12. Fatin Shidqia Lubis Aku Memilih Setia download disini  
13. Florida Georgia Line - Cruise download disini
14. lacuna-celebrate the summer download disini

Kapan-Kapan Lanjut lagi

Buku Panduan VB 6.0

 Please download my book, which I created for people who want to learn the basic language programming language through Ms.Visual Studio 6.0, probably less complete in my book so please understand because I worked for 3 weeks, and for the english version yet I translate the whole. download in here


Translate Indonesia Language

Silahkan Download Buku saya, yang saya ciptakan untuk masyarakat yang ingin mempelajari bahasa pemrograman bahasa basic melalui MS.Visual Studio 6.0, mungkin didalam buku saya kurang lengkap jadi harap maklum soalnya saya mengerjakan selama 3 minggu, dan untuk versi bahasa inggris belum saya translate keseluruhannya. silahkan download disini

Language Database or Bahasa Basis Data

Commercial database system for a query language wants a very easy to understand and easy to use (user-friendly), then introduced SQL as a query language that is more marketable. SQL uses a combination of relational algebra and relational calculus. although SQL is a query language, SQL Ability other than querying the database, the ability to:

1. Defining Data Structures
2. The data in the database modifications
3. Constraints specify security

SQL language has two parts, namely:

1. Data Definition Language (DDL)
2. Data Manipulation Language (DML)

I will explain each one of the SQL language

1. Data Definition Language ( DDL )

    DDL will give commands to define and modify the database and its structure, including constraints-constraints that exist in a table. 

2. Data Manipulation Language ( DML )

    DML is a query language that is used to manage the data is in a database

Translate To Indonesia Language

Sistem basis data untuk komersial menginginkan adanya sebuah bahasa query yang sangat mudah di pahami dan mudah digunakan (user-friendly), maka diperkenalkan SQL sebagai bahasa query yang lebih marketable. SQL mengunakan kombinasi aljabar relasional dan kalkulus relasional. meskipun SQL adalah bahasa Query, SQL Mempunyai kemampuan yang lain selain melakukan query terhadap basis data, kemampuannya yaitu :

1. Mendefinisikan Struktur Data
2. Modifikasi Data dalam basis data
3. Menentukan Konstrain pengamanan

Bahasa SQL mempunyai dua bagian, yaitu :
1. Data Definition Language (DDL)
2. Data Manipulation Language (DML)

Saya akan jelaskan satu persatu mengenai bahasa SQL

1. Data Definition Language (DDL)

 
    DDL akan memberikan perintah untuk mendefinisikan dan memodifikasi database dan strukturnya termasuk konstrain-konstrain yang ada di suatu tabel.

2. Data Manipulation Language (DML)
    DML adalah bahasa query yang digunakan untuk melakukan pengelolaan terhadap data yang ada di dalam sebuah database

 

Islam Wahabi ? Aneh Menurutku

Recently I heard the news and read kompas.com, the emergence of the terrorist chief in Indonesia by bringing religion-bringing, in fact if we learn about Islam based on my view "Islam is like a plastic ruler bendable and can be straightened out in the sense that Islam is a religion that does not have the nature of force and does not have at its core a terrorist nature"
Next I look for that again in google and memasukin word Wahabi Islam I learned what the heck Wahabi Islam?
"Salafi or Salafi is a term for a group or a religious ideology that attributed to Taqi al-Din Ahmad Ibn Taymiyyah (661 H-728 H) or often known as Ibn Taymiyyah calls. Salafi Salafi or it is often understood as a movement to return to the Qur'an and the Sunnah of the Prophet. along with his companions. "
"Wahabi or Wahabiyah is the name for a group or a religious ideology that attributed to the pioneers who named Muhammad bin Abdul Wahab (1702 AD-1787 AD / 1115 H-1206 H). Actually, the name is not in accordance with the Wahhabi founder's name, Muhammad, but that's people call it. while the followers of the Wahhabi call themselves al-Muwahhiduun (mentauhidkan people of God), although most of them also recognized designation Wahabi. "
Vision and Mission of Wahabi Islam "Back to the Qur'an and the Sunnah of the Prophet"
I question whether that's been in the Learning and Living the contents in the Qur'an? anyway to have a vision of Back To The Qur'an and the Sunnah of Prophet Muhammad SAW
Ok Can we take good vision and mission, but whether it is in fact not entirely apply instead? a little strangely no longer seems a little strange and awkward in my opinion.
Better we have relied on the 4 schools are (Hanafi, Maliki, Shafi'i, and Hanbali), 4 schools was wide enough contents
The next one Isa and Islam nah strange question for me again, if viewed in the Qur'an before the Prophet Isa AS Prophet Muhammad and Scripture Book, much of the content of the Book Truly it was a lot of not benernya, and the second Al The Quran mentions the last book of Allah and the Prophet Muhammad the last prophet so the point of the books which are no longer valid ago, and which applies the Qur'an. 

I accidentally find songs islam, so I was surprised to hear the song that brought by Dawud Wharnsby Ali About Muhammad, I wonder, in the song he hated the Prophet Muhammad strange, try to translate the lyrics of the song that brought Dawud Wharnsby Ali

"It would be such a pleasure to have you come along with me,
I accept your gracious offer of kindness and company.
But as we walk along young man and as you help me with my load,
I?ve only one request as we travel down this road,
Don?t talk to me about Muhammad.
Because of him there is no peace and I have trouble in my mind,
so don?t talk to me about Muhammad
and as we walk along together we will get along just fine,
and as we walk along together we will get along.
That man upsets me so, and so much more than you could know,
I hear of his name and reputation everywhere I go.
Though his family and his clan once knew him as an honest man,
he?s dividing everyone with his claim that ?God is One?
So don?t talk to me about Muhammad.
Because of him there is no peace and I have trouble in my mind,
so don?t talk to me about Muhammad
and as we walk along together we will get along just fine,
and as we walk along together we will get along.
He?s misled all the weak ones and the poor ones and the slaves,
They think they?ve all found wealth and freedom following his ways.
He?s corrupted all the youth with his twisted brand of truth
convinced them they all are strong, given them somewhere to belong.
So don?t talk to me about Muhammad.
Because of him there is no peace and I have trouble in my mind,
so don?t talk to me about Muhammad
and as we walk along together we will get along just fine,
and as we walk along together we will get along.
Thank you now young man, you?ve really been so kind
Your generosity and smile are very rare to find.
Let me give you some advice, since you?ve been so very nice,
From Muhammad stay away, don?t heed his words or emulate his way.
And don?t talk about Muhammad,
or you will never have true peace and trouble is all you will find.
So don?t talk about Muhammad
and as you travel down life?s road you will get along just fine.
Now before we part and go, if it?s alright just the same,
may I ask, my dear young man, who you are? What is your name?
Forgive me – what was that? Your words weren?t very clear,
my ears are getting old – sometimes its difficult to hear.
It is truly rather funny, though I?m sure I must be wrong,
but I thought I heard you said that your name is Muhammad……
Muhammad?
Ash haduallah ilaha il Allah wa Ash hadu ana Muhammad ur-Rasulullah.
Oh talk to me Muhammad!
Upon you I pray for peace for you have eased my troubled mind!
Oh talk to me Muhammad
and as we walk along together we will get along just fine,
and as I travel down life?s road I will get along just fine.  "

Yeah my prayers to those who made ​​this song may be more guidance from God, really strange that these people may not be able to understand the content in the Al-Qur'an

Terjemahan Bahasa Indonesia

Baru saja saya mendengar berita dan membaca kompas.com, munculnya kepala teroris di indonesia dengan membawa-membawa agama, sebenarnya kalau kita pelajari mengenai islam berdasarkan pandangan saya
"Islam itu seperti penggaris plastik yang bisa di bengkokkan dan bisa diluruskan dalam arti islam itu agama yang tidak mempunyai sifat memaksa dan tidak mempunyai sifat teroris pada intinya"

Yang Berikutnya saya cari lagi di google dan memasukin kata Islam Wahabi saya pelajari apa sih Islam Wahabi ?

"Salafi atau Salafiyah adalah sebutan untuk kelompok atau paham keagamaan yang dinisbatkan kepada Ahmad Taqiyuddin Ibnu Taimiyah ( 661 H-728 H) atau yang sering dikenal dengan panggilan Ibnu Taimiyah. Salafi atau Salafiyah itu sering dipahami sebagai gerakan untuk kembali kepada al-Qur’an dan Sunnah Rasulullah Saw. beserta para Sahabat beliau."

"Wahabi atau Wahabiyah adalah sebutan untuk kelompok atau paham keagamaan yang dinisbatkan kepada pelopornya yang bernama Muhammad bin Abdul Wahab (1702 M-1787 M/ 1115 H-1206 H). sebetulnya, nama Wahabi ini tidak sesuai dengan nama pendirinya, Muhammad, tetapi begitulah orang-orang menyebutnya. Sedangkan para pengikut Wahabi menamakan diri mereka dengan al-Muwahhiduun (orang-orang yang mentauhidkan Allah), meskipun sebagian mereka juga mengakui sebutan Wahabi."

Visi dan Misi Islam Wahabi
“Kembali kepada Al-Qur’an & Sunnah Rasulullah Saw"

Yang menjadi pertanyaan saya apakah Sudah Mempelajari dan Menghayati isi di Dalam Al-Qur'an  ? kok sampai punya visi Kembali Kepada Al-Qur'an dan Sunnah Nabi Muhammad S.A.W

Ok Bisa kita anggap visi dan misinya bagus, tapi apakah itu sudah di terapkan seluruhnya justru tidak bukan ? yang sedikit anehnya lagi kayaknya ada sedikit aneh dan janggal menurut saya.

Lebih baik kita berpatokan dari 4 mazhab  yaitu (Hanafi, Maliki, Syafi’i, dan Hambali), 4 mazhab itu saja sudah cukup luas isinya

Yang berikutnya Isa dan Islam nah pertanyaan aneh bagi saya lagi, Kalau dilihat dalam Al-Qur'an Nabi Isa A.S Nabi sebelum Nabi Muhammad dan Kitab Suci Al-Kitab kebanyakan isi dari Al-Kitab Sesungguhnya itu sudah banyak tidak benernya,dan yang kedua Al-Qur'an menyebutkan ini kitab terakhir dari Allah dan Nabi Muhammad nabi terakhir jadi intinya kitab-kitab yang dahulu sudah tidak berlaku lagi, dan yang berlaku yaitu Al-Qur'an. 

Tanpa sengaja saya mencari lagu islam, begitu terkejut saya mendengar lagu yang dibawa oleh Dawud Wharnsby Ali About Muhammad,yang saya herankan di lagu tersebut dia membenci Nabi Muhammad aneh, coba anda terjemahkan lirik lagu yang dibawa Dawud Wharnsby Ali 

"Ini akan menjadi kesenangan untuk kau datang bersama dengan saya,
Saya menerima tawaran Anda murah hati kebaikan dan perusahaan.
Tapi seperti yang kita berjalan di sepanjang anak muda dan ketika Anda membantu saya dengan beban saya,
Saya? Ve hanya satu permintaan ketika kami melakukan perjalanan di jalan ini,
Don t berbicara kepada saya tentang Muhammad.
Karena dia tidak ada perdamaian dan saya mengalami kesulitan dalam pikiran saya,
jadi don? t berbicara kepada saya tentang Muhammad
dan seperti yang kita berjalan bersama bersama-sama kita akan bergaul dengan baik,
dan seperti yang kita berjalan bersama bersama-sama kita akan akur.
Orang itu mengganggu saya begitu, dan jauh lebih banyak daripada yang Anda bisa tahu,
Saya mendengar nama dan reputasinya kemanapun aku pergi.
Meskipun keluarga dan klannya pernah mengenalnya sebagai orang yang jujur,
dia? s membagi semua orang dengan klaimnya itu? Allah adalah Satu?
Jadi don t berbicara kepada saya tentang Muhammad.
Karena dia tidak ada perdamaian dan saya mengalami kesulitan dalam pikiran saya,
jadi don? t berbicara kepada saya tentang Muhammad
dan seperti yang kita berjalan bersama bersama-sama kita akan bergaul dengan baik,
dan seperti yang kita berjalan bersama bersama-sama kita akan akur.
Dia? S menyesatkan semua yang lemah dan orang-orang miskin dan para budak,
Mereka pikir mereka? Semua telah menemukan kekayaan dan kebebasan mengikuti jalan-Nya.
Dia? S rusak semua pemuda dengan merek memutar nya kebenaran
meyakinkan mereka mereka semua kuat, mengingat mereka di suatu tempat milik.
Jadi don t berbicara kepada saya tentang Muhammad.
Karena dia tidak ada perdamaian dan saya mengalami kesulitan dalam pikiran saya,
jadi don? t berbicara kepada saya tentang Muhammad
dan seperti yang kita berjalan bersama bersama-sama kita akan bergaul dengan baik,
dan seperti yang kita berjalan bersama bersama-sama kita akan akur.
Terima kasih sekarang anak muda, kau? Sudah benar-benar telah begitu baik
Kemurahan hati Anda dan senyum yang sangat jarang untuk menemukan.
Mari saya beri beberapa saran, karena Anda? Sudah begitu sangat bagus,
Dari Muhammad menjauh, don? T mengindahkan kata-katanya atau meniru jalan.
Dan don t berbicara tentang Muhammad,
atau Anda tidak akan memiliki kedamaian sejati dan kesulitan adalah semua yang Anda akan menemukan.
Jadi enggak bicara tentang Muhammad
dan saat Anda melakukan perjalanan nyawa? s jalan, Anda akan bergaul dengan baik.
Sekarang sebelum kita berpisah dan pergi, jika itu? S baik-baik saja sama,
mungkin saya bertanya, pria terkasih muda, siapa Anda? Apa nama Anda?
Maafkan saya - apa itu? Kata-kata Anda weren t sangat jelas,?
telinga saya semakin tua - kadang-kadang sulit untuk mendengar.
Ini benar-benar agak lucu, meskipun saya? Yakin saya harus salah,
tapi saya pikir saya mendengar Anda mengatakan bahwa nama Anda adalah Muhammad ......
Muhammad?
Ash haduallah ilaha il Allah wa Ash hadu ana Muhammad ur-Rasulullah.
Oh bicara padaku Muhammad!
Setelah Anda Aku berdoa bagi perdamaian untuk Anda telah mereda pikiran bermasalah saya!
Oh bicara padaku Muhammad
dan seperti yang kita berjalan bersama bersama-sama kita akan bergaul dengan baik,
dan ketika saya melakukan perjalanan nyawa? s jalan Aku akan bergaul dengan baik. "

Ya doa saya bagi yang buat lagu ini semoga dapat bimbingan lagi dari Allah,benar-benar aneh yang mungkin orang ini belum dapat memahami isi di dalam Al-Qur'an 

Meaning of Fasting in Ramadan / Makna Puasa di Bulan Ramadhan

longer we wait for the blessed month, the month between the month of fasting is good for us, is the very core of this besides fasting to draw closer to God, and restrain our passions and emotions, there is the core behind it all is:

"We should not feel we are great in the earth (the first one), the second one we should be grateful for the favors given by God let's look down a lot of people below the poverty level have only met a day of rice, which is the third month to wash away our sins "

Sometimes my sorrow, in the month of Ramadan when many Muslims have passed back keseperti usual, sometimes the month of Ramadan only as a mask alone

I hope that all Muslims stick together, sometimes sad to see a good daily bloodshed in Palestine, Egypt, do not see a class but look at what the religion of Islam means our brother, not enemy and I hope that Muslims could get back its glory.

Terjemahaan

lama kita menunggu bulan barokah ini, bulan diantara bulan yang baik bagi puasa kita, sebenarnya inti dari puasa ini selain mendekatkan diri kepada Allah, dan menahan nafsu serta emosi kita, ada inti di balik itu semua yaitu :

"Kita tidak boleh merasa kita hebat di bumi ini (itu yang pertama), yang kedua kita harus lebih mensyukuri nikmat yang diberi Allah coba kita lihat ke bawah banyak masyarakat dibawah tingkat kemiskinan yang hanya bertemu nasi harus seharian, yang ketiga bulan untuk mencuci dosa-dosa kita"

Terkadang kesedihan saya, pada saat bulan Ramadhan telah berlalu banyak umat muslim kembali keseperti sedia kala, terkadang bulan ramadhan hanya sebagai topeng saja

Saya berharap agar seluruh umat muslim tetap bersatu,terkadang sedih melihat pertumpahan darah setiap hari baik di Palestina,mesir, jangan melihat suatu golongan tapi lihat apa agamanya islam berarti saudara kita, bukan musuh dan saya berharap agar umat muslim bisa kembali kejayaannya.