Aplikasi Manipulasi Teks dengan Visual Basic 2008

Aplikasi Manipulasi Teks dengan Visual Basic 2008 - Mungkin anda pernah menggunakan Ms.Word untuk mengetik sebuah surat, artikel atau yang lain, ada perintah keyboard Shift + F3 yang dapat digunakan di Ms. Word untuk mengubah teks menjadi UPERCASE, lowercase, Proper Case dan Reverse. Pada tutorial ini saya akan membuat aplikasi manipulasi teks seperti di Ms.Word, berikut langkah - langkahnya:

1. Buatlah project baru
2. Desain project sesuai dengan gambar berikut :

3. Masukan control – control berikut :

No	Object	Property	Nilai
1	Form1	Text	Aplikasi Manipulasi Text
2	Label1	Text	Kalimat:
3	TextBox1	Name Text	TxtInput -
4	Label2	Name Text BorderStyle AutoSize	LblHasil - FixedSingle False
5	Button1	Name Text	BtnUCase UPERCASE
6	Button2	Name Text	BtnLCase Lower case
7	Button3	Name Text	BtnProperCase Proper Case
8	Button4	Name Text	BtnReverse Reverse

4. Berikut kode program masing – masing Button :
Button UPERCASE

Private Sub BtnUCase_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BtnUCase.Click LblHasil.Text = Strings.UCase(TxtInput.Text) End Sub

Button lower case

Private Sub BtnLCase_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BtnLCase.Click LblHasil.Text = Strings.LCase(TxtInput.Text) End Sub

Button Proper Case

Private Sub BtnProperCase_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BtnProperCase.Click LblHasil.Text = StrConv(TxtInput.Text, VbStrConv.ProperCase) End Sub

Button Reverse

Private Sub BtnReverse_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BtnReverse.Click LblHasil.Text = Strings.StrReverse(TxtInput.Text) End Sub

5. Jalankan program dengan menekan tombol F5 atau melalui menu Debug > Start
Debugging atau melalui icon Start Debugging