VB.net my.settings不自動創建和存儲

Question

我有一個類，它有一個循環基於給定的整數設置存儲的消息列表。這是一個不起作用的代碼片段。我沒有正確遞增設置嗎？

Public Class Messages 

Public Sub Punchinmsg() 

    Dim msgint As Double = My.Settings.msgint 

    If msgint = 0 Then 
     MsgBox("You have been punched in... Good thing I don't have arms.") 
     msgint = msgint + 1 
     My.Settings.Save() 
    ElseIf msgint = 1 Then 
     MsgBox("Great time for work...") 
     msgint = msgint + 1 
     My.Settings.Save() 

我的設置是msgint是Double和USER，它允許它在運行時寫入。

Answer 1

您正在設置一個本地變量，但不是具有相同名稱的設置。在調用My.Settings.Save之前，您必須設置設置。示例...

msgint = msgint + 1 'This only updates the local variable. 
My.Settings.msgint = msgint 'Assigns a new value to the setting named msgint. 
My.Settings.Save()