Bạn có thể thêm macro này vào cấu hình VS của mình (thông qua Công cụ -> Macro -> Macro Explorer) sau đó gán phím nóng cho nó (thông qua Công cụ -> Tùy chọn -> Môi trường -> Bàn phím).
Tôi chỉ mới viết nó (có nghĩa là để thử điều này cho các lứa tuổi!) Nhưng nó dường như hoạt động cho đến nay, trong cả VS2008 và VS2010.
Vì đó là một macro nên bạn có thể chỉnh sửa nó để bao gồm bất kỳ quy tắc nào bạn muốn (ví dụ: tìm kiếm trong các thư mục khác hoặc quy tắc đặt tên đặc biệt nếu bạn có một tiêu đề duy nhất được chia sẻ bởi nhiều tệp cpp hoặc tương tự).
Đây là macro (tôi chắc chắn rằng nó có thể được viết tốt hơn; tôi không quen với các đối tượng VS và chỉ nhận ra macro đang sử dụng .Net khoảng một nửa thông qua việc viết nó :)):
Sub FileSwitch()
Try
Dim CurrentPath As String = DTE.ActiveDocument.FullName
Dim OtherPath As String
If (IO.Path.HasExtension(CurrentPath)) Then
Dim CurrentExtension As String = IO.Path.GetExtension(CurrentPath)
Select Case CurrentExtension
Case ".h", ".hpp", ".hxx"
OtherPath = IO.Path.ChangeExtension(CurrentPath, ".cpp")
If (Not IO.File.Exists(OtherPath)) Then
OtherPath = IO.Path.ChangeExtension(CurrentPath, ".c")
If (Not IO.File.Exists(OtherPath)) Then
OtherPath = IO.Path.ChangeExtension(CurrentPath, ".cxx")
End If
End If
Case ".cpp", ".c", ".cxx"
OtherPath = IO.Path.ChangeExtension(CurrentPath, ".h")
If (Not IO.File.Exists(OtherPath)) Then
OtherPath = IO.Path.ChangeExtension(CurrentPath, ".hpp")
If (Not IO.File.Exists(OtherPath)) Then
OtherPath = IO.Path.ChangeExtension(CurrentPath, ".hxx")
End If
End If
Case Else
End Select
If (OtherPath <> Nothing) Then
DTE.ItemOperations.OpenFile(OtherPath)
End If
End If
Catch ex As System.Exception
MsgBox(ex.Message)
End Try
End Sub
Đây là ảnh chụp màn hình (rất rộng :)) cho thấy trình chỉnh sửa macro và hộp thoại phím nóng / tùy chọn sẽ trông như thế nào, để giúp những người không quen thuộc với chúng:
