2

レジストリ キーの値にラベルを設定しようとしているので、フォームをロードしたときにラベルがレジストリ キーの値に設定されます。設定されておらず、キーが見つからないかエラーが発生したというデフォルトのテキストです。イミディエイト ウィンドウのエラーとして、A first chance exception of type 'System.InvalidCastException' occured in Microsoft.VisualBasic.dll が表示されます。

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim readValue As String
    readValue = My.Computer.Registry.GetValue _
    ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Bohemia Interactive Studio\ArmA 2 OA", "KEY", Nothing)
    Label3.Text = readValue
End Sub
4

2 に答える 2

0

最初にこれを試してください:

MsgBox("値は" & readValue)


その「キー」に何かがあるかどうかを確認するだけです。

次に:
これを追加します:

Dim bytes as Byte() = CType(readValue, Byte())
str = BitConverter.ToString(bytes)
label.Text = str
于 2013-02-09T19:54:50.407 に答える
0

これを試して:

readvalue = Encoding.Unicode.GetString(My.Computer.Registry.GetValue(".etc..",));
于 2013-02-11T19:15:57.943 に答える