Rabu, 20 April 2011
Sabtu, 16 April 2011
Sekilas Tentang Visual Basic 6.0 ( VB)
Microsoft Visual Basic adalah merupakan sebuah bahasa pemrograman komputer yang menjadi sarana ( Tools ) untuk menghasilkan program – program aplikasi yang berbasis windows.
1. Sarana akses data yang lebih cepat dan handal untuk membuat aplikasi basis data yang berkemampuan tinggi.
2. Tambahan contol – control baru lebih canggih serta peningkatan kaidah struktur bahasa visual basic.
3. Visual Basic memiliki beberapa versi atau edisi yang disesuaikan dengan kebutuhan pemakainya.
Berikut ini perjalanan Visual Basic ( VB 1.0 sampai VB 10 ) yaitu :
1. Proyek “ Thunder” dirintis.
2. Visual Basic 1.0 ( May 1991 ) di rilis untuk windows pada Comdex / Windows Wordltrade yang dipertunjukkan di Atlanta, Georgia.
3. Visual Basic 1.0 untuk DOS di rilis pada bulan September 1992. Bahasa ini kompatibel dengan Visual Basic For Windows. VB 1.0 for DOS ini pada kenyataannya merupakan versi kelanjutan dari compiler BASIC, Quick Basic dan BASIC Professional Development System
4. Visual Basic 2.0 di rilis pada November 1992, cakupan pemrogramannya cukup mudah untuk digunakan dan kecepatannya juga telah di nodifikasi. Khususnya pada Form yang menjadikan object dapat dibuat secara seketika, serta konsep dasar dari Class modul yang berikutnya di implementasikan pada VB 4.
5. Visual Basic 3.0 di rilis pada musim panas 1993 dan dibagi menjadi versi standard an professional. VB 3 memasukan Versi 1.1 dari Microsoft Jet Data base Engine yang dapat membaca serta menulis database Jet ( atau Access ) 1.x
6. Visual Basic 4.0 ( Agustus 1995 ) merupakan versi pertama yang dapat membuat windows program 32 bit sebaik versi 16 bit nya. VB 4 juga memperkenalkan kemampuan untuk menulis non-GUI class pada Visual Basic.
7. Visual Basic 5.0 ( Februari 1997 ), Microsoft merilis secara ekslusif Visual Basic untuk versi windows 32 bit. Programmer yang menulis programnya pada versi 16 bit dapat dengan mudah melakukan import programnya dari VB 4, VB 5 memperkenalkan kemampuan untuk membuat User Control.
8. Visual Basic 6.0 ( pertengahan 1999), memperbaiki beberapa cakupan, termasuk kemampuannya untuk membuat Aplikasi Web-based. Visual Basic 6 di jadwalkan akan memasuki Microsoft “ fasa non Supported “ dimulai pada Maret 2008.
9. Visual Basic NET ( VB 7 ), di rilis pada tahun 2002, beberapa yang mencoba pada versi pertama. NET ini mengemukakan bahwa bahasa ini sangat powerful tapi bahasa yang digunakan sangat berbeda dengan bahasa sebelumnya, dengan kekurangan diberbagai area, termasuk runtimenya yang 10 kali lebih besar dari paket runtime VB 6 serta peningkatan pengguna memory.
10. Visual Basic NET 2003 ( VB 7.1 ¬), di rilis dengan menggunakan NET framework versi 1.1
11. Visual Basic 2005 ( VB 8.0 ), merupakan iterasi selanjutnya dari Visual Basic NET dan Microsoft memutuskan untuk menghilangkan kata – kata NET pada judulnya. Pada rilis ini Microsoft memasukan beberapa fitur baru diantaranya :
* Edit and Continue, mungkin inilah kekurangan fitur terbesar dari VB NET pada VB 2005 ini kita diperbolehkan melakuakan perubahan kode pada saat program sedang dijalankan.
* Perbaikan pada Konversi dari VB ke VB NET 12 Visual Basic NET 2003 ( VB 7.1 ), di rilis dengan menggunakan NET framework versi 1.1
12. Is Not Patent, merupakan salah satu fitur dari Visual Basic 20005 merupakan konversi If Not X Is Not Y.
13. Visual Basic 2005 Express, merupakan bagian dari Product Visual Studio. Microsoft membuat Visual Studio 2005 Express edition untuk pemula dan yang gemar dengan VB, salah satu produknya adalah Visual Basic 2005 Express yang merupakan produk gratis dari Microsoft.
14. Visual Basic “ Orcas “ ( VB 9.0 ), dijadwalkan akan di rilis pada tahun 2007 dan dibangun diatas NET 3.5. Pada rilis ini, Microsoft menambahkan beberapa fitur diantaranya :
* True Tenary operator, yaitu fungsi If ( boolean, value, value ) yang digunakan untuk mengganti fungsi IF.
* LINQ Support.
* Ekspresi Lambada.
* XML Literals.
* Nullable Type.
* Type Inference.
15. Visual Basic “VB X” ( VB 10.0 ), Visual Basic 10 yang juga dikenal dengan nama VB X akan menawarkan dukungan untuk Dynamic Language Runtime. VB 10 direncanakan akan menjadi bagian dari Silver Light 11
Artikel tentang vb yang lain nyusul belakangan
hatur nuhun
1. Sarana akses data yang lebih cepat dan handal untuk membuat aplikasi basis data yang berkemampuan tinggi.
2. Tambahan contol – control baru lebih canggih serta peningkatan kaidah struktur bahasa visual basic.
3. Visual Basic memiliki beberapa versi atau edisi yang disesuaikan dengan kebutuhan pemakainya.
Berikut ini perjalanan Visual Basic ( VB 1.0 sampai VB 10 ) yaitu :
1. Proyek “ Thunder” dirintis.
2. Visual Basic 1.0 ( May 1991 ) di rilis untuk windows pada Comdex / Windows Wordltrade yang dipertunjukkan di Atlanta, Georgia.
3. Visual Basic 1.0 untuk DOS di rilis pada bulan September 1992. Bahasa ini kompatibel dengan Visual Basic For Windows. VB 1.0 for DOS ini pada kenyataannya merupakan versi kelanjutan dari compiler BASIC, Quick Basic dan BASIC Professional Development System
4. Visual Basic 2.0 di rilis pada November 1992, cakupan pemrogramannya cukup mudah untuk digunakan dan kecepatannya juga telah di nodifikasi. Khususnya pada Form yang menjadikan object dapat dibuat secara seketika, serta konsep dasar dari Class modul yang berikutnya di implementasikan pada VB 4.
5. Visual Basic 3.0 di rilis pada musim panas 1993 dan dibagi menjadi versi standard an professional. VB 3 memasukan Versi 1.1 dari Microsoft Jet Data base Engine yang dapat membaca serta menulis database Jet ( atau Access ) 1.x
6. Visual Basic 4.0 ( Agustus 1995 ) merupakan versi pertama yang dapat membuat windows program 32 bit sebaik versi 16 bit nya. VB 4 juga memperkenalkan kemampuan untuk menulis non-GUI class pada Visual Basic.
7. Visual Basic 5.0 ( Februari 1997 ), Microsoft merilis secara ekslusif Visual Basic untuk versi windows 32 bit. Programmer yang menulis programnya pada versi 16 bit dapat dengan mudah melakukan import programnya dari VB 4, VB 5 memperkenalkan kemampuan untuk membuat User Control.
8. Visual Basic 6.0 ( pertengahan 1999), memperbaiki beberapa cakupan, termasuk kemampuannya untuk membuat Aplikasi Web-based. Visual Basic 6 di jadwalkan akan memasuki Microsoft “ fasa non Supported “ dimulai pada Maret 2008.
9. Visual Basic NET ( VB 7 ), di rilis pada tahun 2002, beberapa yang mencoba pada versi pertama. NET ini mengemukakan bahwa bahasa ini sangat powerful tapi bahasa yang digunakan sangat berbeda dengan bahasa sebelumnya, dengan kekurangan diberbagai area, termasuk runtimenya yang 10 kali lebih besar dari paket runtime VB 6 serta peningkatan pengguna memory.
10. Visual Basic NET 2003 ( VB 7.1 ¬), di rilis dengan menggunakan NET framework versi 1.1
11. Visual Basic 2005 ( VB 8.0 ), merupakan iterasi selanjutnya dari Visual Basic NET dan Microsoft memutuskan untuk menghilangkan kata – kata NET pada judulnya. Pada rilis ini Microsoft memasukan beberapa fitur baru diantaranya :
* Edit and Continue, mungkin inilah kekurangan fitur terbesar dari VB NET pada VB 2005 ini kita diperbolehkan melakuakan perubahan kode pada saat program sedang dijalankan.
* Perbaikan pada Konversi dari VB ke VB NET 12 Visual Basic NET 2003 ( VB 7.1 ), di rilis dengan menggunakan NET framework versi 1.1
12. Is Not Patent, merupakan salah satu fitur dari Visual Basic 20005 merupakan konversi If Not X Is Not Y.
13. Visual Basic 2005 Express, merupakan bagian dari Product Visual Studio. Microsoft membuat Visual Studio 2005 Express edition untuk pemula dan yang gemar dengan VB, salah satu produknya adalah Visual Basic 2005 Express yang merupakan produk gratis dari Microsoft.
14. Visual Basic “ Orcas “ ( VB 9.0 ), dijadwalkan akan di rilis pada tahun 2007 dan dibangun diatas NET 3.5. Pada rilis ini, Microsoft menambahkan beberapa fitur diantaranya :
* True Tenary operator, yaitu fungsi If ( boolean, value, value ) yang digunakan untuk mengganti fungsi IF.
* LINQ Support.
* Ekspresi Lambada.
* XML Literals.
* Nullable Type.
* Type Inference.
15. Visual Basic “VB X” ( VB 10.0 ), Visual Basic 10 yang juga dikenal dengan nama VB X akan menawarkan dukungan untuk Dynamic Language Runtime. VB 10 direncanakan akan menjadi bagian dari Silver Light 11
Artikel tentang vb yang lain nyusul belakangan
hatur nuhun
VALIDASI INPUTAN ANGKA PADA VB
Untuk menghindari inputan berupa huruf dari user maka kita perlu melakukan validasi terhadap inputan tersebut. Di sini saya akan menerangkan bagaimana metode validasi bekerja.
Pertama buatlah Project Baru. Kemudian buatlah textbox pada sebuah form dan beri nama textbox itu text1.
Selanjutnya click dua kali textbox tersebut, maka akan muncul tampilan view code. Kemudian isilah script sebagai berikut :
Private Sub Text1_Change()
Dim betul As Boolean
betul = True
If Text1.Text <> "" Then
jumlah = Len(Text1.Text)
For i = 1 To jumlah
If Asc(Right(Text1.Text, i)) < 48 Or Asc(Right(Text1.Text, i)) > 57 Then
betul = False
End If
Next i
If betul = False Then
MsgBox "harus angka"
Text1.Text = ""
Text1.SetFocus
End If
End If
End Sub
Penjelasan :
Pengecekan angka terjadi pada baris ke-7, yaitu pengecekan code ASCII dari inputan, jika kurang dari 48 dan lebih dari 57 maka inputan bukan angka.
Pertama buatlah Project Baru. Kemudian buatlah textbox pada sebuah form dan beri nama textbox itu text1.
Selanjutnya click dua kali textbox tersebut, maka akan muncul tampilan view code. Kemudian isilah script sebagai berikut :
Private Sub Text1_Change()
Dim betul As Boolean
betul = True
If Text1.Text <> "" Then
jumlah = Len(Text1.Text)
For i = 1 To jumlah
If Asc(Right(Text1.Text, i)) < 48 Or Asc(Right(Text1.Text, i)) > 57 Then
betul = False
End If
Next i
If betul = False Then
MsgBox "harus angka"
Text1.Text = ""
Text1.SetFocus
End If
End If
End Sub
Penjelasan :
Pengecekan angka terjadi pada baris ke-7, yaitu pengecekan code ASCII dari inputan, jika kurang dari 48 dan lebih dari 57 maka inputan bukan angka.
OPERASI MATRIK VB
Operasi Matrik
Aljabar matrik mempunyai peranan yang sangat penting di bidang teknik dan sain untuk penyelesaian masalah, khususnya di bidang terapan yang mana memerlukan operasi dan sifat matrik. Operasi matrik tersebut antara lain adalah operasi dasar yaitu operasi penjumlahan, pengurangan, perkalian, transpose dan invers matrik.
Penjumlahan atau pengurangan Matrik
Penjumlahan dua buah matrik A dan B dapat berlangsung jika kedua matrik tersebut berordo sama. Ordo sebuah matrik ditentukan oleh banyaknya baris dan kolomnya. Jadi dua buah matrik dapat dijumlahkan (atau dikurangkan) jika keduanya mempunyai jumlah baris dan jumlah kolom yang sama.
Kode Program untuk penjumlahan dan pengurangan matrik :
view plaincopy to clipboardprint?
1. b = 5 'baris
2. k = 8 'kolom
3. Dim A(b,k), B(b,k), C(b,k)
4. For i = 1 to b
5. For j = 1 to k
6. 'jika pengurangan ganti tanda plus jadi minus
7. C(i,j) = A(i,j) + B(i,j)
8. Next j
9. Next i
b = 5 'baris k = 8 'kolom Dim A(b,k), B(b,k), C(b,k) For i = 1 to b For j = 1 to k 'jika pengurangan ganti tanda plus jadi minus C(i,j) = A(i,j) + B(i,j) Next j Next i
Transpose Matrik
Transpose matrik A atau matrik AT dihasilkan dari matrik A dengan memindahkan baris-baris dan kolom-kolom dari matrik A, yaitu baris pertama dari matrik A menjadi kolom pertama dari matrik AT, baris kolom matrik A menjadi kolom kedua matrik AT dan seterusnya.
Kode program untuk transpose matrik adalah :
view plaincopy to clipboardprint?
1. baris = 5
2. kolom = 8
3. Dim A(baris,kolom), AT(kolom,baris)
4. For i=1 to baris
5. For j=1 to kolom
6. AT(j,i) = A(i,j)
7. Next j
8. Next i
baris = 5 kolom = 8 Dim A(baris,kolom), AT(kolom,baris) For i=1 to baris For j=1 to kolom AT(j,i) = A(i,j) Next j Next i
Perkalian Matrik
Perkalian matrik A dengan matrik B dapat dilakukan jika jumlah kolom matrik A sama dengan jumlah baris matik B, dan menghasilkan matrik baru yaitu matrik C.
Untuk Pemrograman diperlukan tiga tingkatan looping sebagai berikut :
view plaincopy to clipboardprint?
1. L = 5
2. M = 5
3. N = 5
4. Dim A(L,M) B(M,N), C(L,N)
5. For i = 1 to L
6. For j = 1 to N
7. Sum = 0.0
8. For k=1 to M
9. Sum = Sum + A(i,k) * B(k,j)
10. Next k
11. C(i,j) = Sum
12. Next j
13. Next i
Aljabar matrik mempunyai peranan yang sangat penting di bidang teknik dan sain untuk penyelesaian masalah, khususnya di bidang terapan yang mana memerlukan operasi dan sifat matrik. Operasi matrik tersebut antara lain adalah operasi dasar yaitu operasi penjumlahan, pengurangan, perkalian, transpose dan invers matrik.
Penjumlahan atau pengurangan Matrik
Penjumlahan dua buah matrik A dan B dapat berlangsung jika kedua matrik tersebut berordo sama. Ordo sebuah matrik ditentukan oleh banyaknya baris dan kolomnya. Jadi dua buah matrik dapat dijumlahkan (atau dikurangkan) jika keduanya mempunyai jumlah baris dan jumlah kolom yang sama.
Kode Program untuk penjumlahan dan pengurangan matrik :
view plaincopy to clipboardprint?
1. b = 5 'baris
2. k = 8 'kolom
3. Dim A(b,k), B(b,k), C(b,k)
4. For i = 1 to b
5. For j = 1 to k
6. 'jika pengurangan ganti tanda plus jadi minus
7. C(i,j) = A(i,j) + B(i,j)
8. Next j
9. Next i
b = 5 'baris k = 8 'kolom Dim A(b,k), B(b,k), C(b,k) For i = 1 to b For j = 1 to k 'jika pengurangan ganti tanda plus jadi minus C(i,j) = A(i,j) + B(i,j) Next j Next i
Transpose Matrik
Transpose matrik A atau matrik AT dihasilkan dari matrik A dengan memindahkan baris-baris dan kolom-kolom dari matrik A, yaitu baris pertama dari matrik A menjadi kolom pertama dari matrik AT, baris kolom matrik A menjadi kolom kedua matrik AT dan seterusnya.
Kode program untuk transpose matrik adalah :
view plaincopy to clipboardprint?
1. baris = 5
2. kolom = 8
3. Dim A(baris,kolom), AT(kolom,baris)
4. For i=1 to baris
5. For j=1 to kolom
6. AT(j,i) = A(i,j)
7. Next j
8. Next i
baris = 5 kolom = 8 Dim A(baris,kolom), AT(kolom,baris) For i=1 to baris For j=1 to kolom AT(j,i) = A(i,j) Next j Next i
Perkalian Matrik
Perkalian matrik A dengan matrik B dapat dilakukan jika jumlah kolom matrik A sama dengan jumlah baris matik B, dan menghasilkan matrik baru yaitu matrik C.
Untuk Pemrograman diperlukan tiga tingkatan looping sebagai berikut :
view plaincopy to clipboardprint?
1. L = 5
2. M = 5
3. N = 5
4. Dim A(L,M) B(M,N), C(L,N)
5. For i = 1 to L
6. For j = 1 to N
7. Sum = 0.0
8. For k=1 to M
9. Sum = Sum + A(i,k) * B(k,j)
10. Next k
11. C(i,j) = Sum
12. Next j
13. Next i
Fungsi STRING pada VB
Fungsi-fungsi VB di bawah ini digunakan untuk mengolah data string.
Left : mengambil n karakter di sebelah kiri suatu string
karakter = Left(“abcdef”,2) ‘karakter = “ab”
Right : mengambil n karakter di sebelah kanan suatu string
karakter = Right(“abcdef”,2) ‘karakter = “ef”
Trim : menghilangkan spasi kosong di awal dan akhir suatu string
karakter = Trim(“ abc def ”) ‘karakter = “abc def”
Ltrim : menghilangkan spasi kosong di awal suatu string
MyStr = Ltrim(AnyString)
Rtrim : menghilangkan spasi kosong di akhir suatu string
MyStr = Rtrim(AnyString)
Ucase : mengubah suatu string menjadi huruf besar semua
MyStr = UCase(AnyString)
Lcase : mengubah suatu string menjadi huruf kecil semua
MyStr = LCase(AnyString)
Mid : mengambil n karakter dari suatu posisi yang ditetapkan
MyStr = Mid(“abcdefghij”, 3, 4) ‘hasil “cdef”
Len : menghitung jumlah karakter yang membentuk suatu string
MyStr = Len(“abcdef”) ‘hasil=6
LSet : menempatkan string di dalam string yang lain, di sebelah kiri
MyStr = “0123456789”
Lset MyStr = “<-Left” ‘hasil “<-Left “ RSet : menempatkan string di dalam string yang lain, di sebelah kanan MyStr = “0123456789” Rset MyStr = “>-Right” ‘hasil “ >-Right“
Format : mengatur string sehingga terformat sesuai yang ditentukan
A$ = Format (5455.4, “##,##0.00”) ‘A$ = “5,459.40”
A$ = Format (334.9, “####.##”) ‘A$ = “334.9”
A$ = Format (5, “0.00%”) ‘A$ = “500.00%”
A$ = Format (“HELLO”, “<”) ‘A$ = “hello” A$ = Format (“This is”, “>”) ‘A$ = “THIS IS”
String: membuat string yang berisi sejumlah karakter yang digandakan
A$ = String (5, “*”) ‘A$ = “*****”
Chr: menghasilkan karakter yang terwakili oleh suatu angka tertentu
A$ = Chr (65) ‘A$ = A
A$ = Chr (97) ‘A$ = a
A$ = Chr (62) ‘A$ = >
Asc: menghasilkan angka ASCII dari suatu karakter tunggal
MyNumber = Asc(‘A’) ‘’hasilnya 65
MyNumber = Asc(‘a’) ‘’hasilnya 97
MyNumber = Asc(‘Apple’) ‘’hasilnya 65
Space: menghasilkan ruang kosong sebanyak n karakter
MyStr = Space(10) ‘buat string 10 spasi
MyStr = “Hello” & Space(10) & “World” ‘menyisipkan 10 spasi diantara kata Hello World
InStr: menentukan apakah string tertentu berada pada string lain
Dim CariString, CariChar, MyPos
CariString = ‘XXpXXpXXPXXP” ‘String yang dianalis
CariChar = “P” ‘String yang dicari “P”
‘mencari mulai dari kolom ke-4, hasilnya 6
MyPos = InStr(4, CariString, CariChar, 1)
‘mencari mulai dari kolom ke-1, hasilnya 9
MyPos = InStr(1, CariString, CariChar, 0)
MyPos = InStr(CariString, CariChar) ‘hasilnya 9
MyPos = InStr(1, SearchString, “W”) ‘hasilnya 0
InStrRev: cari posisi string dalam string yang lain, mulai dari akhir
i = InStrRev(StringCheck, StringMatch[, start[, compare]])
StrComp: membandingkan dua variabel string
StrComp(string1, string2 [, compare] )
Jika
Hasilnya
string1 < string 2 -1 string1= string 2 0 string1> string 2
1
string1atau string 2 = Null
Null
Dim MyStr1, MyStr2, MyComp
MyStr1 = “ABCD” : MyStr2 = “abcd” ‘nilai awal
A = StrComp(MyStr1, MyStr2, 1) ‘A = 0
A = StrComp(MyStr1, MyStr2, 0) ‘A = -1
A = StrComp(MyStr2, MyStr1) ‘A = 1
StrConv: mengubah huruf besar atau kecil suatu karakter string
A$ = StrConv(“Semua Besar”, 1) ‘A$ = “SEMUA BESAR”
A$ = StrConv(“Semua Kecil”, 2) ‘A$ = “semua kecil”
A$ = StrConv(“pertama BESAR”, 3) ‘A$ = “Pertama Besar”
StrReverse: mengubah urutan karakter suatu string
A$ = StrReverse(“12345678”) ‘A$ = “87654321”
A$ = StrReverse(“abcdefg”) ‘A$ = “gfedcba”
Replace: menggantikan string dari kelompok string
Replace(expression, find, replace[, start[, count[, compare]]])
FormatCurrency: string memakai format currency yang ditetapkan
A$ = FormatCurrency(12000, 1) ‘A$ = “$12,000.0”
A$ = FormatCurrency(12000, 2) ‘A$ = “$12,000.00”
Catatan, untuk mengubah mata uang, gunakan Regional Settings Currency dari sistem operasi Windows
FormatDateTime: menghasilkan ekspresi tanggal dan waktu
A$ = FormatDateTime(Now) ‘hasilnya “10/8/02 11:15:46 AM”
A$ = FormatDateTime(Now, vbLongDate) ‘hasilnya “Tuesday, March 02, 2008”
A$ = FormatDateTime(“3/2/99”, vbShortDate) ‘hasilnya “3/2/99”
A$ = FormatDateTime(“3/2/99”, vbLongDate) ‘hasilnya “12:00:00 AM”
FormatNumber: membuat format bilangan sesuai option yang diberikan
FormatNumber(var1, 2)
FormatPerCent: membuat format bilangan dalam prosentase
A$ = FormatPerCent(0.1255, 2) ‘A$ = 12.55%
A$ = FormatPerCent(0.12555) ‘A$ = 12.56%
A$ = FormatPerCent(12.55, 2) ‘A$ = 1,255.00%
A$ = FormatPerCent(12.55) ‘A$ = 1,255.00%
Left : mengambil n karakter di sebelah kiri suatu string
karakter = Left(“abcdef”,2) ‘karakter = “ab”
Right : mengambil n karakter di sebelah kanan suatu string
karakter = Right(“abcdef”,2) ‘karakter = “ef”
Trim : menghilangkan spasi kosong di awal dan akhir suatu string
karakter = Trim(“ abc def ”) ‘karakter = “abc def”
Ltrim : menghilangkan spasi kosong di awal suatu string
MyStr = Ltrim(AnyString)
Rtrim : menghilangkan spasi kosong di akhir suatu string
MyStr = Rtrim(AnyString)
Ucase : mengubah suatu string menjadi huruf besar semua
MyStr = UCase(AnyString)
Lcase : mengubah suatu string menjadi huruf kecil semua
MyStr = LCase(AnyString)
Mid : mengambil n karakter dari suatu posisi yang ditetapkan
MyStr = Mid(“abcdefghij”, 3, 4) ‘hasil “cdef”
Len : menghitung jumlah karakter yang membentuk suatu string
MyStr = Len(“abcdef”) ‘hasil=6
LSet : menempatkan string di dalam string yang lain, di sebelah kiri
MyStr = “0123456789”
Lset MyStr = “<-Left” ‘hasil “<-Left “ RSet : menempatkan string di dalam string yang lain, di sebelah kanan MyStr = “0123456789” Rset MyStr = “>-Right” ‘hasil “ >-Right“
Format : mengatur string sehingga terformat sesuai yang ditentukan
A$ = Format (5455.4, “##,##0.00”) ‘A$ = “5,459.40”
A$ = Format (334.9, “####.##”) ‘A$ = “334.9”
A$ = Format (5, “0.00%”) ‘A$ = “500.00%”
A$ = Format (“HELLO”, “<”) ‘A$ = “hello” A$ = Format (“This is”, “>”) ‘A$ = “THIS IS”
String: membuat string yang berisi sejumlah karakter yang digandakan
A$ = String (5, “*”) ‘A$ = “*****”
Chr: menghasilkan karakter yang terwakili oleh suatu angka tertentu
A$ = Chr (65) ‘A$ = A
A$ = Chr (97) ‘A$ = a
A$ = Chr (62) ‘A$ = >
Asc: menghasilkan angka ASCII dari suatu karakter tunggal
MyNumber = Asc(‘A’) ‘’hasilnya 65
MyNumber = Asc(‘a’) ‘’hasilnya 97
MyNumber = Asc(‘Apple’) ‘’hasilnya 65
Space: menghasilkan ruang kosong sebanyak n karakter
MyStr = Space(10) ‘buat string 10 spasi
MyStr = “Hello” & Space(10) & “World” ‘menyisipkan 10 spasi diantara kata Hello World
InStr: menentukan apakah string tertentu berada pada string lain
Dim CariString, CariChar, MyPos
CariString = ‘XXpXXpXXPXXP” ‘String yang dianalis
CariChar = “P” ‘String yang dicari “P”
‘mencari mulai dari kolom ke-4, hasilnya 6
MyPos = InStr(4, CariString, CariChar, 1)
‘mencari mulai dari kolom ke-1, hasilnya 9
MyPos = InStr(1, CariString, CariChar, 0)
MyPos = InStr(CariString, CariChar) ‘hasilnya 9
MyPos = InStr(1, SearchString, “W”) ‘hasilnya 0
InStrRev: cari posisi string dalam string yang lain, mulai dari akhir
i = InStrRev(StringCheck, StringMatch[, start[, compare]])
StrComp: membandingkan dua variabel string
StrComp(string1, string2 [, compare] )
Jika
Hasilnya
string1 < string 2 -1 string1= string 2 0 string1> string 2
1
string1atau string 2 = Null
Null
Dim MyStr1, MyStr2, MyComp
MyStr1 = “ABCD” : MyStr2 = “abcd” ‘nilai awal
A = StrComp(MyStr1, MyStr2, 1) ‘A = 0
A = StrComp(MyStr1, MyStr2, 0) ‘A = -1
A = StrComp(MyStr2, MyStr1) ‘A = 1
StrConv: mengubah huruf besar atau kecil suatu karakter string
A$ = StrConv(“Semua Besar”, 1) ‘A$ = “SEMUA BESAR”
A$ = StrConv(“Semua Kecil”, 2) ‘A$ = “semua kecil”
A$ = StrConv(“pertama BESAR”, 3) ‘A$ = “Pertama Besar”
StrReverse: mengubah urutan karakter suatu string
A$ = StrReverse(“12345678”) ‘A$ = “87654321”
A$ = StrReverse(“abcdefg”) ‘A$ = “gfedcba”
Replace: menggantikan string dari kelompok string
Replace(expression, find, replace[, start[, count[, compare]]])
FormatCurrency: string memakai format currency yang ditetapkan
A$ = FormatCurrency(12000, 1) ‘A$ = “$12,000.0”
A$ = FormatCurrency(12000, 2) ‘A$ = “$12,000.00”
Catatan, untuk mengubah mata uang, gunakan Regional Settings Currency dari sistem operasi Windows
FormatDateTime: menghasilkan ekspresi tanggal dan waktu
A$ = FormatDateTime(Now) ‘hasilnya “10/8/02 11:15:46 AM”
A$ = FormatDateTime(Now, vbLongDate) ‘hasilnya “Tuesday, March 02, 2008”
A$ = FormatDateTime(“3/2/99”, vbShortDate) ‘hasilnya “3/2/99”
A$ = FormatDateTime(“3/2/99”, vbLongDate) ‘hasilnya “12:00:00 AM”
FormatNumber: membuat format bilangan sesuai option yang diberikan
FormatNumber(var1, 2)
FormatPerCent: membuat format bilangan dalam prosentase
A$ = FormatPerCent(0.1255, 2) ‘A$ = 12.55%
A$ = FormatPerCent(0.12555) ‘A$ = 12.56%
A$ = FormatPerCent(12.55, 2) ‘A$ = 1,255.00%
A$ = FormatPerCent(12.55) ‘A$ = 1,255.00%
Fungsi Date PHP
Digunakan untuk mengambil tanggal dan jam sekarang. Hasil dari fungsi ini adalah sebuah string yang berisi tanggal/jam sesuai dengan format yang diinginkan.
Sintaks: date(string format)
Format yang dikenal dalam fungsi date ini adalah sebagai berikut:
Karakter Keterangan
a
am / pm
A
AM / PM
B
Swatch Internet time
d
day of the month, 2 digits with leading zeros; i.e. “01″ to “31″
D
day of the week, textual, 3 letters; i.e. “Fri”, “Sun”
F
month, textual, long; i.e. “January”,”November”
g
hour, 12-hour format without leading zeros; i.e. “1″ to “12″
G
hour, 24-hour format without leading zeros; i.e. “0″ to “23″
h
hour, 12-hour format; i.e. “01″ to “12″
H
hour, 24-hour format; i.e. “00″ to “23″
i
minutes; i.e. “00″ to “59″
I (capital i)
“1″ if Daylight Savings Time, “0″ otherwise.
j
day of the month without leading zeros; i.e. “1″ to “31″
l (lowercase L)
day of the week, textual, long; i.e. “Friday”
L
boolean for whether it is a leap year; i.e. “0″ or “1″
m
month; i.e. “01″ to “12″
M
month, textual, 3 letters; i.e. “Jan”, “Mar”
n
month without leading zeros; i.e. “1″ to “12″
s
seconds; i.e. “00″ to “59″
S
English ordinal suffix, textual, 2 characters; i.e. “th”, “nd”
t
number of days in the given month; i.e. “28″ to “31″
T
Timezone setting of this machine; i.e. “MDT”
U
seconds since the epoch
w
day of the week, numeric, i.e. “0″ (Sunday) to “6″ (Saturday)
Y
year, 4 digits; i.e. “1999″
y
year, 2 digits; i.e. “99″
z
day of the year; i.e. “0″ to “365″
Z
timezone offset in seconds (i.e. “-43200″ to “43200″)
Sintaks: date(string format)
Format yang dikenal dalam fungsi date ini adalah sebagai berikut:
Karakter Keterangan
a
am / pm
A
AM / PM
B
Swatch Internet time
d
day of the month, 2 digits with leading zeros; i.e. “01″ to “31″
D
day of the week, textual, 3 letters; i.e. “Fri”, “Sun”
F
month, textual, long; i.e. “January”,”November”
g
hour, 12-hour format without leading zeros; i.e. “1″ to “12″
G
hour, 24-hour format without leading zeros; i.e. “0″ to “23″
h
hour, 12-hour format; i.e. “01″ to “12″
H
hour, 24-hour format; i.e. “00″ to “23″
i
minutes; i.e. “00″ to “59″
I (capital i)
“1″ if Daylight Savings Time, “0″ otherwise.
j
day of the month without leading zeros; i.e. “1″ to “31″
l (lowercase L)
day of the week, textual, long; i.e. “Friday”
L
boolean for whether it is a leap year; i.e. “0″ or “1″
m
month; i.e. “01″ to “12″
M
month, textual, 3 letters; i.e. “Jan”, “Mar”
n
month without leading zeros; i.e. “1″ to “12″
s
seconds; i.e. “00″ to “59″
S
English ordinal suffix, textual, 2 characters; i.e. “th”, “nd”
t
number of days in the given month; i.e. “28″ to “31″
T
Timezone setting of this machine; i.e. “MDT”
U
seconds since the epoch
w
day of the week, numeric, i.e. “0″ (Sunday) to “6″ (Saturday)
Y
year, 4 digits; i.e. “1999″
y
year, 2 digits; i.e. “99″
z
day of the year; i.e. “0″ to “365″
Z
timezone offset in seconds (i.e. “-43200″ to “43200″)
Langganan:
Postingan (Atom)