■Windowsレジストリに、アプリケーションの初期ファイルを保存または作成する。
・VB6.0 or VB.NET or VB2005
SaveSetting関数
http://www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/vblr7/html/vastmSaveSetting.asp
SaveSetting("AppName", "Section", "Key", "Setting")

・VB.NET
http://www.microsoft.com/japan/msdn/vbasic/migration/tips/registry.aspx

・VB2005
Dim KeyName As String
KeyName = "HKEY_CURRENT_USER\Software\VB and VBA Program　Settings\AppName\Section"
My.Computer.Registry.SetValue(KeyName, "Key", "Setting")

■Windowsレジストリのアプリケーションの初期設定ファイルから、キー設定値を返す。
・VB6.0 or VB.NET or VB2005
GetSetting関数
GetSetting("AppName", "Section", "Key", "Default")

・VB2005
Dim KeyName As String
KeyName = "HKEY_CURRENT_USER\Software\VB and VBA Program　Settings\AppName\Section"
My.Computer.Registry.GetValue(KeyName, "Key", "Default")

■Windowsレジストリのアプリケーションの初期設定ファイルから、セクションまたはキー設定を削除する。
・VB6.0 or VB.NET or VB2005
DeleteSetting関数
DeleteSetting("AppName")

・VB2005
Dim SubKey As Microsoft.Win32.RegistryKey
Dim KeyName As String = "Software\VB and VBA Program Settings"
SubKey = My.Computer.Registry.CurrentUser.OpenSubKey(KeyName, True)
SubKey.DeleteSubKeyTree("AppName")
SubKey.Close()

---

■DoEventsメソッド：フォームの再描画するときに使用する。
・VB6.0
DoEvents

・VB.NET or VB2005
System.Windows.Forms.Application.DoEvents()

・VB2005
My.Application.DoEvents()

■参考サイト
【VB Myの用法 - My, My.Application, My.Computer】
http://homepage1.nifty.com/rucio/main/dotnet/shokyu/standard37.htm

---

Visual Studio 2005 クラス デザイナを使用した API 設計
http://www.microsoft.com/japan/msdn/vs05/vsts/vstsclassdesigner.asp

---

■VB6.0のCommonDialogをOpenFileDialogコントロールに変更するには？
・VB6.0

・VB.NET or VB2005

---

■別Formや別モジュール内での別Formのコントロールへのアクセス方法
Form2からForm1のテキストボックスへ値を代入するには、次のようになる。
・VB6.0　
Form1.Text1.text="変更OK！"

・VB.NET（別Formからアクセス）
[Form1内のForm2を呼出すコード]
Dim frm2 As New Form2
frm2.Owner = Me
frm2.ShowDialog()
frm2 = Nothing

[Form2内のコード]
Dim frm1 as Form1 = me.owner
frm1.TextBox1.text="変更OK！"
frm1 = Nothing

・VB.NET（別モジュールからアクセス）
[Form1内のForm2を呼出すコード]
Dim frm2 As New Form2
frm2.Owner = Me
frm2.ShowDialog()
frm2 = Nothing

[Form2内のコード]
Call SetText(Me.Owner)

[Module1内のコード]
Public Sub SetText(ByRef frm1 As Form1)
frm1.TextBox1.Text = "変更OK！"
frm1 = Nothing
End Sub

■参考サイト
【VB Tips And Sample】
http://www.geocities.jp/i_love_balard/myhome/index.html

---

■VB6.0とVB2005(VB.NET)の比較
・VB6.0

・VB2005

System.Windows.Forms.MessageBox.Show("Hello, world!")

---