Friday 9 October 2015

Fungsi Bagian II


Kami telah belajar konsep dasar fungsi dalam Visual Basic 2010, khususnya penggunaan fungsi MsgBox dan InputBox dalam Pelajaran 12. I. Bahkan, saya telah menunjukkan Anda beberapa fungsi manipulasi string dalam Pelajaran 8, mereka adalah Len fungsi, fungsi kiri dan fungsi Kanan. Dalam pelajaran ini, kita akan belajar bagaimana menulis kode yang melibatkan fungsi manipulasi string lainnya di Visual Basic 2010.


13.1 Mid Fungsi
Fungsi Mid digunakan untuk mengambil bagian dari teks membentuk frase tertentu. Sintaks Fungsi Mid adalah

Mid(phrase, position,n)

where

frase adalah string dari mana bagian dari teks yang akan diambil.

Posisi adalah posisi awal dari frase dari mana proses retrieving dimulai.

n adalah jumlah karakter untuk mengambil.



Contoh 13.1:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myPhrase As String
myPhrase = Microsoft.VisualBasic.InputBox(“Enter your phrase”)
Label1.Text = Mid(myPhrase, 2, 6)
End Sub


* Dalam contoh ini, ketika pengguna mengklik tombol perintah, kotak input akan muncul meminta pengguna untuk memasukkan frase. Setelah frase dimasukkan dan tombol OK ditekan, label akan menampilkan teks diekstraksi mulai dari posisi 2 kalimat dan jumlah karakter yang diambil adalah 6


Diagram adalah sebagai berikut:

/////////////////////////////////////////Gambar hasil//////////////////////////////////////////////////////


13.2 Fungsi Kanan

Fungsi Kanan ekstrak bagian kanan frase. Sintaks

Microsoft.Visualbasic.Right (“Phrase”, n)

Di mana n adalah posisi awal dari kanan dari fase di mana bagian kalimat yang akan diekstraksi. Sebagai contoh:

Microsoft.Visualbasic.Right (“Visual Basic”, 4) = asic

Contoh 13.2: Kode berikut ekstrak bagian kanan setiap frase dimasukkan oleh pengguna.


Private Sub Button1_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim myword As String

myword = TextBox1.Text

Label1.Text = Microsoft.VisualBasic.Right (myword, 4)

End Sub




13.3 Fungsi Kiri Fungsi Kiri ekstrak bagian kiri frase. Sintaks

Microsoft.Visualbasic.Right (“Phrase”, n)

Di mana n adalah posisi awal dari kiri dari fase di mana bagian kalimat yang akan diekstraksi. Sebagai contoh:

Microsoft.Visualbasic.Left(“Visual Basic”, 4) = asic

Contoh 13.3: Kode berikut ekstrak bagian kiri setiap frase dimasukkan oleh pengguna.

Private Sub Button1_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim myword As String

myword = TextBox1.Text

Label1.Text = Microsoft.VisualBasic.Left (myword, 4)

End Sub





13.4 Potong Fungsi

Fungsi Potong trims ruang-ruang kosong di kedua sisi frase. Formatnya adalah

Trim(“Phrase”)

.For example, Trim (” Visual Basic 2010 “) = Visual basic 2010


Contoh 13.4 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myPhrase As String
myPhrase = Microsoft.VisualBasic.InputBox(“Enter your phrase”)
Label1.Text = Trim(myPhrase)
End Sub



13,5 The Ltrim Fungsi

Fungsi Ltrim trims ruang-ruang kosong dari bagian kiri frase. Sintaks


Ltrim(“Phrase”)

.Untuk Contoh,

Ltrim (” Visual Basic 2010 “)= Visual basic 2010


13,6 The rtrim Fungsi

Fungsi rtrim trims ruang-ruang kosong dari bagian kanan frase. Sintaks

Rtrim(“Phrase”)

.Untuk Contoh.

Rtrim (“Visual Basic “) = Visual Basic



13,7 Fungsi InStr

Fungsi InStr mencari frase yang tertanam dalam frase asli dan mengembalikan posisi awal dari frase tertanam. Sintaks

InStr (n, fase asli, frase tertanam)

Di mana n adalah posisi di mana fungsi Instr mulai melirik untuk frase tertanam. Sebagai contoh

Instr(1, “Visual Basic 2010 “,”Basic”)=8

* Fungsi mengembalikan nilai numerik.

Anda dapat menulis kode program seperti berikut:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Label1.Text = InStr(1, “Visual Basic 2010”, “Basic”)

 End Sub



13,8 The UCase dan Fungsi lcase

Fungsi UCase mengkonversi semua karakter dari string ke huruf kapital. Di sisi lain, fungsi lcase mengkonversi semua karakter dari string ke huruf kecil.

Formatnya adalah

Microsoft.VisualBasic.UCase (Frase)

Microsoft.VisualBasic.LCase (Frase)


Sebagai contoh,

Microsoft.VisualBasic.Ucase ("Visual Basic 2010") = VISUAL BASIC 2010

Microsoft.VisualBasic.Lcase ("Visual Basic 2010") = visual basic 2010



13,9 Chr dan fungsi Asc

Fungsi Chr mengembalikan string yang sesuai dengan kode ASCII sedangkan fungsi Asc mengkonversi karakter ASCII atau simbol untuk kode ASCII yang sesuai. ASCII singkatan dari "American Standard Kode untuk Informasi Interchange". Secara keseluruhan ada 255 kode ASCII dan banyak karakter ASCII. Beberapa karakter mungkin tidak ditampilkan karena dapat mewakili beberapa tindakan seperti menekan sebuah tombol atau menghasilkan suara bip. Sintaks fungsi Chr adalah

Chr (charcode)

dan sintaks dari fungsi Asc adalah

Asc (Character)


Berikut ini adalah beberapa contoh:

Chr(65)=A, Chr(122)=z, Chr(37)=% ,

Asc(“B”)=66, Asc(“&”)=38

0 comments:

Post a Comment

https://medansuccess.blogspot.co.id/search/label/Lowongan%20Kerja medansuccess.blogspot.co.id medansuccess.blogspot.co.id medansuccess.blogspot.co.id