TAILIEUCHUNG - Mastering Excel 2003 Programming with VBA phần 3

không hợp lệ 'thư khac - không thay đổi bất cứ điều gì Cuối Nếu End Sub' Trả về vị trí hoặc chỉ số của nhân vật đầu tiên của tên tập tin một tên đầy đủ "tên đầy đủ bao gồm một con đường và một tên tập tin ra để cung cấp cho bạn một cách hữu ích để cô lập các thành phần đường dẫn và tên file từ một tên tập tin đầy đủ, | common file operations simplified 103 sPath Left sFullName nPos - 1 Else Invalid sFullName - don t change anything End If End Sub Returns the position or index of the first character of the filename given a full name A full name consists of a path and a filename Ex. FileNamePosition C Testing 11 Function FileNamePosition sFullName As String As Integer Dim bFound As Boolean Dim nPosition As Integer bFound False nPosition Len sFullName Do While bFound False Make sure we were not dealt a zero-length string If nPosition 0 Then Exit Do We are looking for the first from the right. If Mid sFullName nPosition 1 Then bFound True Else Working right to left nPosition nPosition - 1 End If Loop If bFound False Then FileNamePosition 0 Else FileNamePosition nPosition End If End Function In addition to providing you with a useful way to isolate path- and filename components from a full filename Listing includes one brand new concept which may not be apparent at first glance output parameters. Take a look at the declaration of the BreakdownName subroutine. Sub BreakdownName sFullName As String _ ByRef sName As String _ ByRef sPath As String 104 chapter 5 exploring the application object See the ByRef keyword in this declaration This keyword indicates that when if the BreakdownName function modifies these parameters the procedure that called BreakdownName will see the changes made to the variables. Listing uses a simple procedure to test the BreakdownName procedure. You simply use the Get-SaveAsFilename method to obtain a full filename and pass the filename to the BreakdownName procedure along with two empty variables sName and sPath. BreakdownName uses the FileNamePosition function to locate the beginning of the filename component. Once you know that it is simple to break the name down into the path- and filename components using the VBA Left and Right functions. Both Left and Right take a string variable and return the specified number of characters from either .

• Kỹ thuật lập trình
• thủ thuật hệ điều hành
• tìm hiểu hệ điều hành
• thủ thuật windows
• lập trình windows
• lập trình ứng dụng
• lập trình máy tính
• thủ thuật lập trình
• mẹo hay cho lập trình
• bí quyết lập trình
• thủ thuật máy tính
• phần mềm máy tính
• quản trị hệ thống
• hệ điều hành linux
• hệ điều hành mac
• mẹo cài hệ điều hành
• hệ điều hành unix
• hệ điều hành windows
• kỹ năng máy tính
• Hệ Điều Hành
• các hệ điều hành Windows
• giáo trình hệ điều hành
• các vấn đề hệ điều hành
• tài liệu hệ điều hành
• Tổng quan về hệ điều hành
• windows 7
• Refresh hệ điều hành Android
• Hệ điều hành Android cũ
• Hệ điều hành Android
• Cài đặt hệ điều hành Android
• Thủ thuật hệ điều hành Android
• Khôi phục hệ điều hành Android
• đồ họa máy tính
• mỹ thuật đa truyền thông
• học hệ điều hành
• cách sử dụng hệ điều hành
• hệ điều hành windows 7
• mẹo hay hệ điều hành