আপনি এই ম্যাক্রোটিকে আপনার ভিএস কনফিগারেশনে যুক্ত করতে পারেন (সরঞ্জাম -> ম্যাক্রোস -> ম্যাক্রো এক্সপ্লোরার এর মাধ্যমে) এরপরে এটির জন্য হটকি বরাদ্দ করুন (সরঞ্জাম -> বিকল্পগুলি -> পরিবেশ -> কীবোর্ডের মাধ্যমে)।
আমি কেবল এটি লিখেছি (যুগে যুগে এটি চেষ্টা করার অর্থ ছিল!) তবে এটি এখন পর্যন্ত কাজ করে বলে মনে হচ্ছে, ভিএস ২০০৮ এবং ভিএস ২০১০ উভয় ক্ষেত্রেই।
এটি ম্যাক্রো হওয়ায় আপনি যে কোনও নিয়ম চান তা অন্তর্ভুক্ত করতে এটিকে সম্পাদনা করতে পারেন (যেমন, অন্যান্য ফোল্ডারগুলিতে সন্ধান করা, বা যদি আপনার একাধিক সিপিপি ফাইল বা অনুরূপ কোনও একক শিরোনাম ভাগ করে থাকে তবে বিশেষ নামকরণের নিয়ম)।
এখানে ম্যাক্রো রয়েছে (আমি নিশ্চিত যে এটি আরও ভাল লেখা যেতে পারে; আমি ভিএস বিষয়বস্তুর সাথে অপরিচিত এবং কেবল উপলব্ধি করেছিলাম যে ম্যাক্রোগুলি ব্যবহার করছিল। জিনিসটি লেখার মধ্য দিয়ে অর্ধেক পথ সম্পর্কে নয় :)):
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
ম্যাক্রো সম্পাদক এবং হটকি / বিকল্প সংলাপগুলির মতো দেখতে কী হওয়া উচিত, তাদের সাথে পরিচিত নয় তাদের সহায়তা করার জন্য এখানে একটি (খুব প্রশস্ত :)) স্ক্রিনশট প্রদর্শিত হচ্ছে:
