快上网专注成都网站设计 成都网站制作 成都网站建设
成都网站建设公司服务热线:028-86922220

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net设置版本号,vb的三种版本

vb.net 如何修改Framework版本

工程属性里面,有个引用,看看那个引用到底在程序里用了没有,

十载的江州网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。成都营销网站建设的优势是能够根据用户设备显示端的尺寸不同,自动调整江州建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。创新互联从事“江州网站设计”,“江州网站推广”以来,每个客户项目都认真落实执行。

如果没有使用(有个叉或者是空的),可以删它,就没事了。

如果使用了,那就表示=这个软件不能从高改到低,或,改低了之后,

也要把使用的引用改成低版本的。如下图:

vb.net 显示版本

这个你把1.0.2.3这个字符串处理下就可以了。

这个属于字符串的处理

vb做的软件如何获得自己的版本号?

如果你用的是vb6,而且指的是你在编译程序的时候写的版本号,比如1.0.1可以用app的属性得到

MsgBox App.Major "." App.Minor "." App.Revision

其中major是主版本,minor是次版本,revision是修正

在.net中会比较麻烦点,参考下面

Type FileInfo

wLength As Integer

wValueLength As Integer

szKey As String * 16

dwSignature As Long

dwStrucVersion As Long

dwFileVersionMS As Long

dwFileVersionLS As Long

End Type

' NOTE: The following Declare statements are case sensitive.

Declare Function GetFileVersionInfo Lib "Version" _

Alias "GetFileVersionInfoA" (ByVal FileName$, _

ByVal dwHandle, ByVal cbBuff, ByVal lpvData$)

Declare Function GetFileVersionInfoSize Lib "Version" Alias _

"GetFileVersionInfoSizeA" (ByVal FileName$, dwHandle)

Declare Sub hmemcpy Lib "Kernel32" Alias "RtlMoveMemory" _

(hpvDest As Any, hpvSource As Any, ByVal cbBytes)

Function LOWORD(x As Long) As Integer

LOWORD = x And HFFFF

' Low 16 bits contain Minor revision number.

End Function

Function HIWORD(x As Long) As Integer

HIWORD = x \ HFFFF

' High 16 bits contain Major revision number.

End Function

'----------------------------------------

'以下为执行模块,在 VBE 界面按 F5 执行

'----------------------------------------

Function displayVersion()

Dim x As FileInfo

Dim FileVer As String

Dim FileName As String

Dim dwHandle, BufSize, lpvData$, R

'*** Get Version Information If Available ****

FileVer = ""

'FileName = 路径

FileName = Environ("windir") "\system32\msjet40.dll"

BufSize = GetFileVersionInfoSize(FileName, dwHandle)

If BufSize = 0 Then

MsgBox "Invalid File Name or no Version information available"

Exit Function

End If

lpvData$ = Space$(BufSize)

R = GetFileVersionInfo(FileName, dwHandle, BufSize, lpvData$)

hmemcpy x, ByVal lpvData$, Len(x)

'**** Parse File Version Number ****

FileVer = Trim$(Str$(HIWORD(x.dwFileVersionMS))) + "."

FileVer = FileVer + Trim$(Str$(LOWORD(x.dwFileVersionMS))) + "."

FileVer = FileVer + Trim$(Str$(HIWORD(x.dwFileVersionLS))) + "."

FileVer = FileVer + Trim$(Str$(LOWORD(x.dwFileVersionLS)))

MsgBox FileVer, 64, "Version of " FileName

End Function

本文来自CSDN博客,转载请标明出处:

vb.net做的程序的版本格式是什么?

版本设置有一种常见的方法叫:Semantic Versioning(语义版本)

这是一种成熟的版本更新方法,因此有很多相关的周边设施可用

推荐你看看这篇文章:语义版本号(Semantic Versioning)

文中提及了GitVersion,可以在每次git提交代码后自动生成version;

pipline用起来简直不要太爽


新闻标题:vb.net设置版本号,vb的三种版本
网址分享:http://6mz.cn/article/hsddsp.html

其他资讯