Fungsi Mid

Mengembalikan Varian (String) yang berisi sejumlah karakter tertentu dari suatu string.

Sintaks

Mid ( string, mulai [, panjang ] )

Sintaks fungsi Mid memiliki argumen ini:

Argumen

Deskripsi

string

Diperlukan. ekspresi string dari karakter mana yang dikembalikan. Jika string berisi null, null dikembalikan.

mulai

Diperlukan. Sejak. Posisi karakter dalam string di mana bagian yang akan diambil dimulai. Jika mulai lebih besar dari jumlah karakter dalam string, Mid mengembalikan string kosong ("").

panjang

Optional. Varian (Panjang). Jumlah karakter yang dikembalikan. Jika diabaikan atau jika ada kurang dari karakter panjang dalam teks (termasuk karakter di mulai), semua karakter dari posisi awal hingga akhir string dikembalikan.


Keterangan

Untuk menentukan jumlah karakter dalam string, gunakan fungsi Len.

Catatan: Gunakan fungsi Midb dengan data byte yang terdapat dalam string, seperti dalam bahasa kumpulan karakter bita ganda. Sebagai ganti menentukan jumlah karakter, argumen menentukan bilangan byte. Untuk kode contoh yang menggunakan Midb, lihat contoh kedua dalam topik contoh.

Contoh kueri

Ekspresi

Hasil

Pilih ProductID, Mid (ProductID, 5) sebagai Ekspr1 dari ProductSales;

Mengembalikan "ProductID" dan bagian dari ProductID mulai dari posisi karakter 5 dan menampilkan hasil di kolom Ekspr1.

Pilih ProductID, Mid (ProductID, 5, 4) sebagai testMid dari ProductSales;

Mengembalikan "ProductID" dan bagian dari ProductID mulai dari posisi karakter 5, yang berisi 4 karakter dan menampilkan hasilnya dalam testMid kolom.

Contoh VBA

Catatan: Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.

Contoh pertama menggunakan fungsi Mid untuk mengembalikan sejumlah karakter tertentu dari string.

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" ' Create text string.
FirstWord = Mid(MyString, 1, 3) ' Returns "Mid".
LastWord = Mid(MyString, 14, 4) ' Returns "Demo".
MidWords = Mid(MyString, 5) ' Returns "Function Demo".

Contoh kedua menggunakan Midb dan fungsi yang ditentukan pengguna (midmbcs) untuk juga mengembalikan karakter dari string. Perbedaannya di sini adalah bahwa string input adalah ANSI dan panjangnya dalam byte.

Function MidMbcs(ByVal str as String, start, length)
MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), _
start, length), vbUnicode)
End Function
Dim MyString
MyString = "AbCdEfG"
' Where "A", "C", "E", and "G" are DBCS and "b", "d",
' and "f" are SBCS.
MyNewString = Mid(MyString, 3, 4)
' Returns ""CdEf"
MyNewString = MidB(MyString, 3, 4)
' Returns ""bC"
MyNewString = MidMbcs(MyString, 3, 4)
' Returns "bCd"

Catatan:  Halaman ini diterjemahkan menggunakan mesin dan mungkin terdapat kesalahan tata bahasa atau masalah keakuratan. Kami bertujuan menyediakan konten yang bermanfaat untuk Anda. Dapatkah Anda memberi tahu kami apakah informasi ini bermanfaat untuk Anda? Berikut adalah artikel dalam bahasa Inggris untuk referensi.

Lihat Juga

Fungsi string dan cara menggunakannya

Kembangkan keterampilan Office Anda
Jelajahi pelatihan
Dapatkan fitur baru terlebih dahulu
Gabung ke Office Insiders

Apakah informasi ini bermanfaat?

Terima kasih atas umpan balik Anda!

Terima kasih atas umpan balik Anda! Sepertinya menghubungkan Anda ke salah satu agen dukungan Office kami akan sangat membantu.

×