class StartUp{ <STAThread> _ Sub Main(byval args() As String) if args.Length = 0 Then Console.WriteLine("アイコンにファイルをドロップして起動して下さい。") Console.WriteLine("パスをクリップボードにコピーします。") Console.WriteLine("エンターキーを押してください。...") Console.ReadLine() ElseIf Clipboard.SetData("Text", args(0)) Console.Beep() End If End Sub End class 'C#からテキストエディタで換えてコンパイルして無いからへんなとこあるかも…