VB程序如何读取自己的版本号和时间信息

'版本号可以用app方式查看

Private Sub Form_Load()

Label1Caption = AppRevision

End Sub

'时间可以参考一下

如果只是查看大小、修改时间的话，可以直接使用VB内建函数：

返回文件修改时间：FileDateTime(文件路径)

返回文件字节大小：FileLen(文件路径)

示例：

Private Sub Form_Load()

Dim sOut As String

Const sFile As String = "C:\WINDOWS\notepadexe"

sOut = "文件路径: " & sFile & vbCrLf & _

"修改日期: " & FileDateTime(sFile) & vbCrLf & _

"文件大小: " & FileLen(sFile) & "字节"

MsgBox sOut

End Sub

如果要更多属性，则需要用到FSO。只有运行时确定用户的机器上有且没有禁用“Microsoft Scripting Runtime”。

工程=>引用，钩选“Microsoft Scripting Runtime”，确定。

示例：

Private Sub Form_Load()

Dim sOut As String

Const sFile As String = "C:\WINDOWS\notepadexe"

sOut = "文件路径: " & sFile & vbCrLf & _

"创建日期: " & GetFileAttr(sFile, 0) & vbCrLf & _

"修改日期: " & GetFileAttr(sFile, 1) & vbCrLf & _

"访问日期: " & GetFileAttr(sFile, 2) & vbCrLf & _

"文件大小: " & GetFileAttr(sFile, 3) & "字节" & vbCrLf & _

"文件类型: " & GetFileAttr(sFile, 4)

MsgBox sOut

End Sub

Private Function GetFileAttr(sPath As String, iAttr As Integer)

Dim oFSO As New FileSystemObject

Dim oFile As File

Dim sOut As String

Set oFile = oFSOGetFile(sPath)

Select Case iAttr

Case 0 '创建日期

sOut = oFileDateCreated

Case 1 '修改日期

sOut = oFileDateLastModified

Case 2 '访问日期

sOut = oFileDateLastAccessed

Case 3 '文件大小

sOut = oFileSize

Case 4 '文件类型

sOut = oFileType

End Select

GetFileAttr = sOut

End Function

eclipse是绿色软件 可直接删除文件夹，如果你下载时是全部安到g盘，那么c盘的应该是其他软件的，不过看你那图是在c有残留，看到sun公司的都是java，环境变量就随便你了，以后可能再用就不用改

svnversionsh内容如下：#! /bin/shVERFILE=/include/SVN_Serialhsvn_last_rev_str=`svnversion -c`svn_last_rev=${svn_last_rev_str##:}echo "#define SVN_SERIAL $svn_last_rev" $VERFILE第二步：在versionh内将获得在SVN_Serialh内的SVN版本号加以处理，方便程序使用versionh内容如下：#ifndef _VERSION_H_#define _VERSION_H_#include "SVN_Serialh"#define VERSION_HEAD "Ver"#define VERSION_PATCH SVN_SERIAL#define VERSION_COMP_DATE __DATE__#define VERSION_COMP_TIME __TIME__#define _VERSION_STRINGIZE(str) #str#define _VERSION_STRING(num) _VERSION_STRINGIZE(num)#define VERSION_STRING VERSION_HEAD \_VERSION_STRING(VERSION_PATCH)" "#define VERSION_COMP_DATA_TIME VERSION_COMP_DATE"-"\VERSION_COMP_TIME#endifPS：命令：svn info也可以得到SVN相关的信息，不过它不能获得当前版本修改后的情况，即：xxM。

以上就是关于VB程序如何读取自己的版本号和时间信息全部的内容，包括:VB程序如何读取自己的版本号和时间信息、java 获取已安装的程序版本号，在控制面板中可以看到的版本号，怎么获取呢、如何在程序中得到SVN的版本号等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！