VB6からVisualstudio2013への移行エラー

Question

VB6からVS2013に移行した際```Me.Top = VB6.TwipsToPixelsY((VB6.PixelsToTwipsY(System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height) - VB6.PixelsToTwipsY(Me.Height)) / 2)
コード

のところに旧形式ですという警告メッセージが表示されました。

このメッセージを消すために
Me.Top = (System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2

に変更するとメッセージが消えたのですが、これは正しいのでしょうか？

エラーを表示させないように正しく修正するにはどうしたらいいのか教えてください。m(__)m

Answer 1

Microsoft.VisualBasic.Compatibility.VB6 名前空間の関数とオブジェクトは、Visual Basic 6.0 から Visual Basic 2008 へのアップグレード ツールで使用するために用意されています。ほとんどの場合、これらの関数とオブジェクトは、.NET Framework の他の名前空間にある機能と重複しています。これらが必要になるのは、Visual Basic 6.0 のコード モデルが .NET Framework の実装と大きく異なる場合だけです。

に尽きるかと思います

ご存知のとおり.NetFramework以前では、画面描画の単位系が「twip」でした
.NetFrameworkでは、画面描画の単位系が「twip」から「pixel」に変更されたので、移行プロジェクトのために「VB6.TwipsToPixelsY」のような変換メソッドが用意されています
あくまでも移行プロジェクトのため(永続的なサポートはされない)で、使用は非推奨ですよってことで「警告」が表示されています

「エラー」ではなく「警告」なのでとりあえずは実行することもできますが、今後のことを考えると.NetFramework流の書き方に書き換えていかれた方がよろしいかと

Comments

[dojikko]

あとUI回りは変換(アップグレード)のウィザードに任せずに作りなおした方がよいかもしれません

[ShouOkada]

わかりました、ありがとうございますm(__)m