从品牌网站建设到网络营销策划,从策略到执行的一站式服务
使用sysinfo控件,例如
成都创新互联公司是专业的巴彦淖尔网站建设公司,巴彦淖尔接单;提供做网站、网站设计,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行巴彦淖尔网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!
在部件里添李哗闭加Microsoft sysinfo control 6.0
然后在窗体上放置一个sysinfo控件
然后双哪裂击窗体,修改代码如下:
Private Sub Form_Load()
Dim MsgEnd As String
Select Case SysInfo1.OSPlatform
Case 0
MsgEnd = "不能确定的"
Case 1
MsgEnd = "Windows 95, ver. " _
CStr(SysInfo1.OSVersion) "(" _
CStr(SysInfo1.OSBuild) ")"
Case 2
MsgEnd = "Windows NT, ver. " _
CStr(SysInfo1.OSVersion) "(" _
CStr(SysInfo1.OSBuild) ")"
End Select
MsgBox "芦腊系统:" MsgEnd
End Sub
在开始菜单兆判选择"运行",
或者快捷键 “windows键+R”
在命令窗口输入regedit.exe,打开注册表
在注册表中定位到如下节点
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\NDP
安装侍培过的.NET Framework都列在NDP目录下
对于.NET Framework 4.5或之后的版本查看方法
如上打开注册表并定位到
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\NDP\v4\Full
如果没有Full节点,那么说明没有安装过4.5或者更新的族谈改版本
通过"Release"的值来判断所安装的.NET Framework版本,可参照下表
这个你把1.0.2.3这个字符串处理下就可以了。
这个属于字符串的处理
Private 猛桥或Sub Form_Load()
r=Dir(C:\WINDOWS\Fonts\微软雅黑.ttf) ‘在C盘WINDOWS文件夹fonts中查找微软雅黑
If r""then
...(...填入)确认文件存在
Else
...(...填入)确认文件不存在
消升 End 枝伍if
End Sub
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图