VC 6.0における各種マクロ注釈の応用を迅速に把握する(図面)


他人や自分で自分のプログラムを読むためには、コメントが必要です。美しいプログラムは、あなたがどれほど高度な技術を使っているかではなく、高度な技術をはっきりと説明することができます。
JavaのIDE環境――Eclispeには多くの中のコメントがあり、コメントを設定するのもとても便利です。今はC++に従事しています。
だから、Eclispeの注釈に慣れましたので、なんとかしてVC 6.0の中で試してみます。知らないものに対して、彼をどうやって熟知するかというと、今持っている知識を持って連想することです。たとえばJavaで文字列を切り取ったり、xmlを解析したりします。一つの言語にはあります。もう一つの言語には十中八九もあります。
そしてVB.NETでは、マクロによって定義されたコメントを追加しました。比較的に、Eclispeの設定が好きです。もっとバカなので、直接マクロ定義を追加します。例えば、Dateです。
では、VC 6.0では、一般的なファイルヘッダの注釈と関数方法の注釈をどうやって追加しますか?
前のブログでは、CTRL+\を使用して、ある行または複数行を注釈する方法が紹介されている。また、上記のブログでもプラグインの使用を紹介しましたが、その中には複数のコメントがあります。
私達はマクロ定義の方式を使って、ファイルのヘッダと関数の注釈を添加して、自分でシナリオを定義して、にこにこして、VB 6.0のシナリオがほえるので、あのようなSub End Subを見て、やはりとても親切です。
第一:VC 6.0プログラムを開いて、ツール――カスタマイズ――付加項目とマクロ定義――SAMPLEにチェックを付ける

第二:VC 6.0プログラムを開いて、ツールを選択する――マクロ

第三:クリックして確定します。様々なマクロのインターフェースが現れます。

第四:マクロ名には、自分で定義したいコメント名を書く。たとえば関数コメント――FuntionDesc。編集をクリックします。

Sub FunctionDesc()

End Sub
PS:設定された注釈に対して、JavaのCTRL+SHIFT+\のようなショートカットキーの設定ができます。
クリックのオプション:


5番目:Vbスクリプトを塗りつぶします。脚本の技術がお上手でしたら、自分で書いてください。手間を省きたいなら、直接にcopyやmodifyを作ってもいいです。関数説明スクリプトは以下の通りです。

Sub FunctionDesc()
Dim doc
set doc = ActiveDocument
' Be sure active document is a text document
if doc Is Nothing Then
Exit Sub
elseif doc.Type <> "Text" Then
Exit Sub
End If
doc.Selection = "/** "
doc.Selection.NewLine
doc.Selection = " * : "
doc.Selection.LineDown
doc.Selection.copy
doc.Selection.LineUp
doc.Selection.EndOfLine dsLastText
doc.Selection = doc.Selection + " "
doc.Selection.paste
doc.Selection = " * :"
doc.Selection.NewLine
doc.Selection = "* :"
doc.Selection.NewLine
doc.Selection = "* :"
doc.Selection.NewLine
doc.Selection = "* :"
doc.Selection.LineDown
doc.Selection.StartOfLine dsFirstText
' doc.Selection.CharRight dsExtend, 4
doc.Selection.WordRight dsExtend, 1
doc.Selection.copy
doc.Selection.LineUp
doc.Selection.EndOfLine dsLastText
doc.Selection = doc.Selection + " "
doc.Selection.paste
doc.Selection.NewLine
doc.Selection = "* : lhy "
doc.Selection.NewLine
doc.Selection = "* : " + CStr(Now())
doc.Selection.NewLine
doc.Selection = "*/ "
End Sub
ファイルヘッダの注釈は似ています。ファイルヘッダのコメントは以下の通りです。

Sub FileDesc()

Dim doc
set doc = ActiveDocument
' Be sure active document is a text document
if doc Is Nothing Then
Exit Sub
elseif doc.Type <> "Text" Then
Exit Sub
End If

doc.Selection.MoveTo 1, 1
doc.Selection.NewLine
doc.Selection.MoveTo 1, 1
doc.Selection = "/** "
doc.Selection.NewLine
doc.Selection = " * Contect copyright (c)"
doc.Selection.NewLine
doc.Selection = "* : " + ActiveDocument.Name
doc.Selection.NewLine
doc.Selection ="* :"
doc.Selection.NewLine
doc.Selection = "* : " + CStr(Now())
doc.Selection.NewLine
doc.Selection = "* : lhy"
doc.Selection.NewLine
doc.Selection = "*/ "
End Sub
の効果は以下の通りです。しかし、このような注釈はまだEclispeに達していません。Eclispeでは各パラメータは既に注釈に登録されていますので、直接に各パラメータを中国語で説明します。このようにパラメータを入力するのは、自分で手動で記入します。o(幡がにじむ)o
もう一つのもっと簡単なやり方は以下の通りです。
第一に、スクリプトを作成し、インストール経路の下でMacrosを置く。サフィックスはDSMです。私のDSMファイルのパスは以下の通りです。

第二:マクロファイルの選択

第三に、ファイルをロードした後、ツールはカスタマイズ中に自動的に該当する経路の下で該当するファイルを表示または閲覧することができます。

第四:操作が完了し、さらにショートカットキーを設定します。ショートカットキーを設定するのと同様に、ツール―マクロ――マクロを選択して設定します。

これまで、最もよく使われていた二つの注釈は全部追加されました。現在私が設定している仕様のコメントは2つしかありません。ショートカットはすべてjavaのショートカットキーを設定します。
見知らぬものに出会ったら、心配で冷静さを失わないでください。以前勉強した知識でこのいわゆる不慣れなものを分析してもいいです。不慣れな中にきっと親切なところがあります。その見慣れない部分を残して、親切な感じの中でゆっくり模索します。新米を知っていても、ベテランほど上手ではないし、効率もいいです。