Tài liệu 0_VBA_HamLapSan pptx

HÀM LẬP SẴN CỦA VBA Người sọan: Msc.Lê Minh Trung Khoa Tóan - Tin ĐHSP Tp Hồ Chí Minh CÁC HÀM LẬP SẴN CỦA VB  Các hàm chuỗi  Các hàm liên quan tới số  Các hàm liên quan tới ngày/tháng Vài điều nói trước…  VB 6.0 có một “thư viện” các hàm được lập truớc (built-in function) rất hữu ích.  Để sử dụng các hàm lập trước của VB 6.0 cần:  Gọi hàm và cung cấp các giá trị cho các tham số  truyền đối số cho các tham số.  Sử dụng giá trị trả về của hàm (cho vp phép gán). • Tip: Hàm luôn trả về một giá trị Ví dụ…  Hàm Len có cú pháp:  Len(Chuỗi)  Tham số Chuỗi “tượng trưng” một chuỗi tổng quát  Trả về chiều dài (số kí tự) của Chuỗi.  Dim Dai As Integer, ThongBao As String ThongBao = “Thong bao hom nay khong co gi de thong báo” Dai = Len(ThongBao) Gọi hàm bằng cách truyền đối số cho các tham số Dài 41 Hàm Space…  Cú pháp:  Space(n)  Trả về một chuỗi gồm n khỏang trắng.  Space(n,Chuỗi)  Trả về một chuỗi gồm n kí tự là kí tự đầu của Chuỗi.  Msg = Space(4)  Msg = Space(4,”a”) Msg = Space(4,”acd”) Msg = “□□□□“ Msg = “aaaa“ • Tip: • Space(…) trả về Variant • Space$(…) trả về một chuỗi Gỡ bỏ khỏang trắng ra khỏi một chuỗi với LTrim,Rtrim,Trim…  Gỡ bỏ các khỏang trắng bên trái chuỗi  LTrim(Chuỗi)  Gỡ bỏ các khỏang trắng bên phải chuỗi  RTrim(Chuỗi)  Gỡ bỏ khỏang trắng hai đầu chuỗi.  Trim(Chuỗi)  Msg = “□□□Hello World□□□□”  LTrim(Msg)  RTrim(Msg)  Trim(Msg) “Hello World□□□□” “□□□Hello World” “Hello World” Tìm chiều dài của chuỗi…  Cú pháp:  Len(Chuỗi)  Có thể dùng với vòng lặp For – Next để duyệt qua tất cả các kí tự của Chuỗi.  Dim I As Integer,Chuoi As String For I=1 To Len(Chuoi) ………………………………… Next I Các hàm cắt chuỗi…  Cắt bên trái một số kí tự:  Left(Chuỗi,n) :trả về chuỗi gồm n kí tự đầu của chuỗi Chuỗi.  Cắt bên phải một số kí tự:  Right(Chuỗi,n) : trả về chuỗi n kí tự cuối của chuỗi Chuỗi.  Cắt tại vị trí ,n kí tự:  Mid(Chuỗi,VịTrí,n) : trả lại chuỗi con của Chũoi bắt đầu tại vị trí VịTrí gồm n kí tự. Ví dụ…  Dim Msg As String  Msg= “VB that tuyet voi!”  Left$(Msg,7)  Right$(Msg,4)  Mid$(Msg,4,10)  Mid$(Msg,4,100) 123456789012345678 “VB that” “voi!” “that tuyet” “that tuyet voi!” Mid được dùng như một điều lệnh…  Có thể dùng Mid(…) như một lệnh để thay đổi nội dung của một chuỗi.  Giả sử: Msg =“Pascal la so 1” Mid$(Msg,1,6)=“VBasic” Msg = “VBasic la so 1” Mid$(Msg,1,6)=“VBasic cua Microsoft” Msg = “VBasic la so 1” Mid$(Msg,1,6)=“VB” Msg = “VBscal la so 1” • Tip: Mid không bao giờ thay đổi chiều dài của chuỗi . that tuyet voi!”  Left$(Msg,7)  Right$(Msg,4)  Mid$(Msg,4, 10)  Mid$(Msg,4, 100 ) 12345678 901 2345678 “VB that” “voi!” “that tuyet” “that tuyet voi!” Mid. Msg =“Pascal la so 1” Mid$(Msg,1,6)=“VBasic” Msg = “VBasic la so 1” Mid$(Msg,1,6)=“VBasic cua Microsoft” Msg = “VBasic la so 1” Mid$(Msg,1,6)=“VB” Msg