是系统软件
系统软件包括: *** 作系统、语言处理系统、服务程序。VB就属于语言处理系统,它可以将高级语言源程序编译成机器语言目标程序,与之类似的FoxPro就属于数据库管理系统,用它们编成的软件才属于应用软件(如工资管理、人事管理……)这是很多人存在的认识误区。 *** 作系统是系统软件的核心,所以很多人认为 *** 作系统与系统软件是一回事,其实系统软件包括的范畴要大
'基本满足你的要求。
'窗体上放一个按钮和一个Label'说明:因为PROFESSIONAL或者HOME EDITION均属XP系统,所以不必再细加判断
Option ExplicitPrivate Declare Function GetVersionEx Lib "kernel32" Alias "GetVersionExA" (lpVersionInformation As OSVERSIONINFO) As LongPrivate Type OSVERSIONINFO
dwOSVersionInfoSize As Long
dwMajorVersion As Long
dwMinorVersion As Long
dwBuildNumber As Long
dwPlatformId As Long
szCSDVersion As String 128 ' Maintenance string for PSS usage
osName As String ' 我自己加的, *** 作系统的名称
End Type' 获得 Windows *** 作系统的版本
' OSVERSIONINFO 结构中的 osName 返回 *** 作系统的名称
Private Function GetWindowsVersion() As OSVERSIONINFO
Dim ver As OSVERSIONINFO
verdwOSVersionInfoSize = 148
GetVersionEx ver
With ver
Select Case dwPlatformId
Case 1
Select Case dwMinorVersion
Case 0
osName = "Windows 95"
Case 10
osName = "Windows 98"
Case 90
osName = "Windows Mellinnium"
End Select
Case 2
Select Case dwMajorVersion
Case 3
osName = "Windows NT 351"
Case 4
osName = "Windows NT 40"
Case 5
Select Case dwMinorVersion
Case 0
osName = "Windows 2000"
Case 1
osName = "Windows XP"
Case 2
osName = "Windows Server 2003"
End Select
Case 6
osName = "Windows Vista" '新增加部分
End Select
Case Else
osName = "Failed"
End Select
If osName <> "Failed" Then osName = "Microsoft " & osName & " " & Left(szCSDVersion, InStr(szCSDVersion, Chr(0)) - 1) & "(build " & dwBuildNumber & ")"
End With
GetWindowsVersion = ver
End FunctionPrivate Sub Command1_Click()
Dim ver As OSVERSIONINFO
ver = GetWindowsVersion()
With ver
'在label1上显示
Label1 = osName
End With
End Sub
以下是实现在 VB 程序中加入三个文件系统控件并让它们同步的步骤:
1 打开 Visual Basic 程序,并创建一个新项目。
2 在窗体上添加三个文件系统控件,例如 `DriveListBox`、`DirListBox` 和 `FileListBox`。可以通过拖放的方式将这些控件添加到窗体上。
3 设置每个控件的主要属性,如下所示:
- `DriveListBox` 控件:设置 `Drive` 属性为 `""`(空字符串);
- `DirListBox` 控件:设置 `Path` 属性为 `DriveListBoxPath`,以确保该控件始终显示当前驱动器的根目录;
- `FileListBox` 控件:设置 `Path` 属性为 `DirListBoxPath`,以确保该控件始终显示当前目录下的文件列表。
4 编写代码来实现控件之间的同步。具体来说,需要为 `DriveListBox` 控件和 `DirListBox` 控件编写 `Change` 事件处理程序,为 `DirListBox` 控件和 `FileListBox` 控件编写 `Click` 事件处理程序。代码示例如下:
```vb
Private Sub DriveListBox_Change()
DirListBoxPath = DriveListBoxDrive
End Sub
Private Sub DirListBox_Change()
FileListBoxPath = DirListBoxPath
End Sub
Private Sub DirListBox_Click()
FileListBoxRefresh
End Sub
```
在这些事件处理程序中,我们使用控件的属性和方法来进行控件之间的同步。当用户选择不同的驱动器时,`DriveListBox_Change()` 事件处理程序会设置 `DirListBox` 控件的 `Path` 属性为当前驱动器的根目录;当用户选择不同的目录时,`DirListBox_Change()` 事件处理程序会设置 `FileListBox` 控件的 `Path` 属性为当前目录,以更新文件列表;当用户单击 `DirListBox` 控件时,`DirListBox_Click()` 事件处理程序会调用 `FileListBoxRefresh` 方法来刷新文件列表,以确保它显示最新的文件列表。
5 运行程序并测试控件之间的同步是否正常工作。您应该能够从 `DriveListBox` 控件中选择不同的驱动器,并从 `DirListBox` 控件中选择不同的目录,然后在 `FileListBox` 控件中看到当前目录下的文件列表。
需要注意的是,本示例代码仅提供了基本的控件同步功能,您可以根据自己的需求进行修改和扩展。同时,还应该考虑异常情况的处理,例如用户选择了不存在的驱动器或目录等情况。
VB 程序设计是Visual Basic编程语言,编写计算机程序需要使用计算机编程语言。计算机编程语言是人和计算机“对话”的桥梁,计算机编程语言也有很多。
目前较为广泛使用的语言有“C++”、“Pascal”、“Basic”等。在众多的计算机编程语言中,以BASIC语言最为易学易用。
BASIC是英文Beginner’s All purpose Symbolic Instruction Code的缩写,意思为初学者通用符号指令代码,一直都是程序设计入门的首选语言。
1991年,Visual Basic(简称VB)面世,他是第三代BASIC语言,它不但秉承了BASIC语言的易学易用的优点,而且增加了图形界面设计工具。
它简化了复杂的窗口程序编写过程,让编程者将更多的精力致力于问题的求解过程。
VB程序设计能设计出大部分的Windows平台的软件,不过有些软件虽然能做,但并不适合VB程序设计。
例如用VB做游戏的话,原理上是可行的,也确实有人用VB开发过游戏,但不得不说太麻烦了。还有一些底层控制的程序也不好做。
VB目前主要用途还是用于快速制作不太复杂的、小型的桌面软件。所以要想开发大型的软件,例如Photoshop或是3DMax之类的程序,VB显然是不能胜任的。
扩展资料:
1、VB的基本特点
(1)可视化的设计平台。Visual Basic提供的可视化设计平台,把Windows界面设计的复杂性“封装”起来,开发人员不必为界面的设计而编写大量程序代码。
只需按照设计的要求,用系统提示的工具在屏幕中画出各种对象即可。Visual Basic自动产生界面设计代码,程序员只需要实现程序功能的那部分代码,从而大大地提高了程序设计的效率。
(2)事件驱动的编程机制。VB没有传统意义上的主程序,程序执行的基本方法是由“事件”来驱动子程序的运行。在图形用户界面的应用程序中,是由用户的动作即事件掌握着程序运行的流向。
每个事件都能驱动一段程序的运行。程序员只需编写响应用户动作的代码,各个动作之间不一定有联系,使得程序既易于编写又易于维护。
2、VB的优点
(1)强大的数值和字符串处理功能。
(2)丰富的图形指令。
(3)提供静态和动态数组,有利于简化内存管理。
(4)过程可递归调用。
(5)支持随机文件和顺序文件访问。
(6)提供了一个可供应用程序调用的包含多种类型的图标库。
(7)具有完善的运行出错处理。
参考资料来源:百度百科-Visual Basic以上就是关于vb是系统软件还是应用软件全部的内容,包括:vb是系统软件还是应用软件、VB程序检测 *** 作系统的版本、vb程序设计实验内容1.程序中加入三个文件系统控件,让他们同步等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)