vb點虐 做的程序的版本格式是什么？

版本設置有一種常見畢巖兆的方法叫：Semantic Versioning（語義版本）

創(chuàng)新互聯(lián)公司專注于企業(yè)營銷型網(wǎng)站、網(wǎng)站重做改版、隆德網(wǎng)站定制設計、自適應品牌網(wǎng)站建設、HTML5、成都商城網(wǎng)站開發(fā)、集團公司官網(wǎng)建設、成都外貿(mào)網(wǎng)站建設、高端網(wǎng)站制作、響應式網(wǎng)頁設計等建站業(yè)務，價格優(yōu)惠性價比高，為隆德等各大城市提供網(wǎng)站開發(fā)制作服務。

這是一種手租成熟的棗粗版本更新方法，因此有很多相關(guān)的周邊設施可用

推薦你看看這篇文章：語義版本號（Semantic Versioning）

文中提及了GitVersion，可以在每次git提交代碼后自動生成version；

pipline用起來簡直不要太爽

vb點虐 如何修改Framework版本

工程屬性里面，有個枯洞引用，看看那個引用到底在程序里用了沒有，

如果沒有使用(有個叉或者是空的)，可以刪它，就沒事了。

如果使用了，那就表示=這個軟件不纖橡能從高改到低，或，改低了之后毀敗旁，

也要把使用的引用改成低版本的。如下圖：

vb做的軟件如何獲得自己的版本號？

如果你用的是vb6，而且指的是你在編譯程序的時候?qū)懙陌姹颈牃炋?，比?.0.1可以用app的屬性得到

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

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

在點虐 中會比較麻煩點，參考下面

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

本文來自CSDN博客，轉(zhuǎn)載請標明出處：

vb點虐 顯示版本

這個你把1.0.2.3這個字符串處理下就可以了。

這個屬于字符串的處理