工程屬性里面,有個(gè)引用,看看那個(gè)引用到底在程序里用了沒(méi)有,
十載的江州網(wǎng)站建設(shè)經(jīng)驗(yàn),針對(duì)設(shè)計(jì)、前端、開(kāi)發(fā)、售后、文案、推廣等六對(duì)一服務(wù),響應(yīng)快,48小時(shí)及時(shí)工作處理。成都營(yíng)銷網(wǎng)站建設(shè)的優(yōu)勢(shì)是能夠根據(jù)用戶設(shè)備顯示端的尺寸不同,自動(dòng)調(diào)整江州建站的顯示方式,使網(wǎng)站能夠適用不同顯示終端,在瀏覽器中調(diào)整網(wǎng)站的寬度,無(wú)論在任何一種瀏覽器上瀏覽網(wǎng)站,都能展現(xiàn)優(yōu)雅布局與設(shè)計(jì),從而大程度地提升瀏覽體驗(yàn)。創(chuàng)新互聯(lián)從事“江州網(wǎng)站設(shè)計(jì)”,“江州網(wǎng)站推廣”以來(lái),每個(gè)客戶項(xiàng)目都認(rèn)真落實(shí)執(zhí)行。
如果沒(méi)有使用(有個(gè)叉或者是空的),可以刪它,就沒(méi)事了。
如果使用了,那就表示=這個(gè)軟件不能從高改到低,或,改低了之后,
也要把使用的引用改成低版本的。如下圖:
這個(gè)你把1.0.2.3這個(gè)字符串處理下就可以了。
這個(gè)屬于字符串的處理
如果你用的是vb6,而且指的是你在編譯程序的時(shí)候?qū)懙陌姹咎?hào),比如1.0.1可以用app的屬性得到
MsgBox App.Major "." App.Minor "." App.Revision
其中major是主版本,minor是次版本,revision是修正
在.net中會(huì)比較麻煩點(diǎn),參考下面
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
'----------------------------------------
'以下為執(zhí)行模塊,在 VBE 界面按 F5 執(zhí)行
'----------------------------------------
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
本文來(lái)自CSDN博客,轉(zhuǎn)載請(qǐng)標(biāo)明出處:
版本設(shè)置有一種常見(jiàn)的方法叫:Semantic Versioning(語(yǔ)義版本)
這是一種成熟的版本更新方法,因此有很多相關(guān)的周邊設(shè)施可用
推薦你看看這篇文章:語(yǔ)義版本號(hào)(Semantic Versioning)
文中提及了GitVersion,可以在每次git提交代碼后自動(dòng)生成version;
pipline用起來(lái)簡(jiǎn)直不要太爽
當(dāng)前名稱:vb.net設(shè)置版本號(hào),vb的三種版本
網(wǎng)頁(yè)URL:http://jinyejixie.com/article38/hsddsp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供App開(kāi)發(fā)、企業(yè)網(wǎng)站制作、網(wǎng)站營(yíng)銷、軟件開(kāi)發(fā)、企業(yè)建站、品牌網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)