我有一个类,它有一个基于存储在设置中的给定整数循环的消息列表。这是一个无法正常工作的代码段。我没有正确增加设置吗?
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,允许在运行时写入它。
答案 0 :(得分:0)
您正在设置局部变量,但不是设置具有相同名称的设置。在调用My.Settings.Save之前,您必须设置该设置。实施例...
C:\Users\foo\Source\
λ jshint -c .glados-jshintrc gulpfile.js
ERROR: Can't parse config file: .glados-jshintrc
Error:SyntaxError: Unexpected token