这是我自动增量的代码,但是当我将其保存在数据库中时,自动增量的数量再次开始为1。我需要一些稳定的东西,在每个部门中有不同的增量,并且当年份改变时它再次从1开始。 示例输出应为:
10-ppmn-16-0001
10-fcrsm-16-0001
Static cnt As Integer
cnt = cnt + 1
prnotxt.Text = ""10""-"" & deptcmb.Text & "-" & Now.Date.ToString("yy") & "-" & Format(cnt, "0000") & ""
答案 0 :(得分:0)
无论您想要保存什么,以及您的应用程序是否附加到任何数据库,VB.NET中都有一个工具可以将值保存到永久存储中。
Project
,然后点击Properties
。这将打开Project Properties
。转到Settings
标签,添加具有相应名称,类型,范围和默认值的设置。例如,假设我们的设置是Name = DeptCount,Type = Integer,Scope = User,Value = 0
现在,您可以轻松保存并在应用程序重新启动时获取保存的值。示例代码如下:
'-- to save the value in settings.
My.Settings.DeptCount = 100
My.Settings.Save()
'-- to get back the saved value
Dim count As Integer = My.Settings.DeptCount