Cara menggunakan ekspresi reguler di Microsoft Visual Basic 6.0

Terjemahan Artikel Terjemahan Artikel
ID Artikel: 818802 - Melihat produk di mana artikel ini berlaku.
Perbesar semua | Perkecil semua

Pada Halaman ini

RINGKASAN

Artikel ini selangkah demi selangkah menjelaskan cara membuat reguler ekspresi dan bagaimana menggunakan ekspresi reguler untuk menentukan apakah string cocok pola tertentu. Kalimat biasa memungkinkan sederhana parsing dan pencocokan string pola tertentu. Jika Anda menggunakan benda-benda yang tersedia dalam Microsoft VBScript Regular Expressions 5,5 perpustakaan, Anda dapat membandingkan string terhadap pola tertentu, menggantikan string pola dengan string lainnya, atau mengambil hanya bagian dari string diformat. Artikel ini menjelaskan cara membangun sebuah pola untuk mem-parsing string yang berisi beberapa contoh dari pola yang sama.



Persyaratan


Daftar berikut menguraikan perangkat keras yang disarankan, perangkat lunak, jaringan infrastruktur dan paket layanan yang Anda butuhkan:
  • Microsoft Visual Basic 6.0
Artikel ini mengasumsikan bahwa Anda sudah familiar dengan berikut topik:
  • Visual Basic 6.0
  • Sintaks ekspresi reguler


Menggunakan Regular Expressions untuk mencocokkan pola



Dalam Visual Basic 6.0, RegExp objek menggunakan ekspresi reguler untuk mencocokkan pola. Berikut properti yang disediakan oleh RegExp. Properti ini mengatur pola untuk membandingkan string yang berlalu untuk RegExp contoh:
  • Pola: String yang mendefinisikan ekspresi reguler.
  • IgnoreCase: Boolean properti yang menunjukkan apakah Anda harus menguji kalimat biasa terhadap semua kemungkinan kecocokan dalam string.
  • Global: Set nilai Boolean atau mengembalikan nilai Boolean yang menunjukkan Apakah pola yang harus cocok semua kejadian di seluruh pencarian string, atau Apakah pola yang harus cocok hanya kejadian pertama.
RegExp menyediakan metode berikut untuk menentukan apakah sebuah string cocok dengan pola tertentu ekspresi reguler:
  • Tes: Kembali nilai Boolean yang menunjukkan apakah biasa ekspresi berhasil dapat dicocokkan string.
  • Melaksanakan: Kembali MatchCollection objek yang berisi Pertandingan objek untuk setiap pertandingan yang sukses.
Untuk mencocokkan string untuk ekspresi reguler, ikuti langkah-langkah:
  1. Mengatur kalimat biasa dengan menggunakanPola metode RegExpobjek.
  2. Mendapatkan string untuk memeriksa dengan pola.
  3. Menetapkan IgnoreCase propertiRegExp objek untuk Benar.
  4. Lulus string yang Anda peroleh di langkah 2 sebagai argumen untuk The Melaksanakan metode RegExpobjek.
  5. Menetapkan nilai kembali Melaksanakanmetode untuk MatchCollection objek.

    TheMatchCollection objek berisi informasi tentang cocok string.

Catatan Anda juga dapat menggunakan Tes metode untuk menentukan apakah string sesuai spesifik kalimat biasa.

Contoh langkah demi langkah

  1. Mulai Microsoft Visual Basic 6.0.
  2. Pada Berkas menu, klikProyek baru.
  3. Klik Standar Exe dalam Baru Project kotak dialog, dan kemudian klik Oke.

    Oleh default, Form1 dibuat.
  4. Pada Project menu, klikReferensi.
  5. Klik dua kali Microsoft VBScript Regular Expressions 5,5, lalu klik Oke.
  6. Dalam toolbox, klik dua kali CommandButton.

    Secara default Command1 ditambahkan ke bentuk.
  7. Klik dua kali Command1 untuk membuka kode jendela.
  8. Paste kode berikut diCommand1_Click event handler:
    MsgBox(TestRegExp("is.", "IS1 is2 IS3 is4"))
    Catatan Dalam contoh ini, adalah. pola diperiksa terhadap string "IS1 is2 IS3 is4". Anda dapat menggunakan karakter khusus (periode.) untuk bertindak sebagai karakter wildcard, jadi yang satu tambahan karakter cocok dan ditampilkan dengan pola pencarian. Jika Anda menambahkan dua periode pola pencarian, Anda melihat dua karakter tambahan. Jika Anda tidak menggunakan setiap periode, Anda hanya melihat pola pencarian.
  9. Tambahkan fungsi berikut setelahCommand1_click event handler:
    Function TestRegExp(myPattern As String, myString As String)
       'Create objects.
       Dim objRegExp As RegExp
       Dim objMatch As Match
       Dim colMatches   As MatchCollection
       Dim RetStr As String
       
       ' Create a regular expression object.
       Set objRegExp = New RegExp
    
       'Set the pattern by using the Pattern property.
       objRegExp.Pattern = myPattern
    
       ' Set Case Insensitivity.
       objRegExp.IgnoreCase = True
    
       'Set global applicability.
       objRegExp.Global = True
    
       'Test whether the String can be compared.
       If (objRegExp.Test(myString) = True) Then
    
       'Get the matches.
        Set colMatches = objRegExp.Execute(myString)   ' Execute search.
    
        For Each objMatch In colMatches   ' Iterate Matches collection.
          RetStr = RetStr & "Match found at position "
          RetStr = RetStr & objMatch.FirstIndex & ". Match Value is '"
          RetStr = RetStr & objMatch.Value & "'." & vbCrLf
        Next
       Else
        RetStr = "String Matching Failed"
       End If
       TestRegExp = RetStr
    End Function
  10. Pada Menjalankan menu, klikMulai untuk menjalankan aplikasi.
  11. Klik Command1.

    Kotak pesan ditampilkan kembali bahwa semua kemunculan adalah dalam IS1 is2 IS3 is4 string.

REFERENSI

Untuk informasi lebih lanjut, kunjungi situs-situs Website MSDN berikut:
http://msdn2.Microsoft.com/en-us/library/6wzad2b2.aspx

Properti

ID Artikel: 818802 - Kajian Terakhir: 04 Oktober 2011 - Revisi: 2.0
Berlaku bagi:
  • Microsoft Visual Basic 6.0 Professional Edition
Kata kunci: 
kbprogramming kbstring kbhowtomaster kbmt KB818802 KbMtid
Penerjemahan Mesin
PENTING: Artikel ini diterjemahkan menggunakan perangkat lunak mesin penerjemah Microsoft dan bukan oleh seorang penerjemah. Microsoft menawarkan artikel yang diterjemahkan oleh seorang penerjemah maupun artikel yang diterjemahkan menggunakan mesin sehingga Anda akan memiliki akses ke seluruh artikel baru yang diterbitkan di Pangkalan Pengetahuan (Knowledge Base) dalam bahasa yang Anda gunakan. Namun, artikel yang diterjemahkan menggunakan mesin tidak selalu sempurna. Artikel tersebut mungkin memiliki kesalahan kosa kata, sintaksis, atau tata bahasa, hampir sama seperti orang asing yang berbicara dalam bahasa Anda. Microsoft tidak bertanggung jawab terhadap akurasi, kesalahan atau kerusakan yang disebabkan karena kesalahan penerjemahan konten atau penggunaannya oleh para pelanggan. Microsoft juga sering memperbarui perangkat lunak mesin penerjemah.
Klik disini untuk melihat versi Inggris dari artikel ini:818802

Berikan Masukan

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com