当前位置：文档库 › VB代码获得当前计算机屏幕的分辨率

VB代码获得当前计算机屏幕的分辨率

首先：如何获得当前计算机屏幕的分辨率？

方法一：

Private Const SPI_GETWORKAREA = 48

Private Declare Function SystemParametersInfo Lib "user32" Alias _

"SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long

Public Type RECT

Left As Long '矩形左上角的X坐标

Top As Long '矩形左上角的Y坐标

Right As Long '矩形右下角的X坐标

Bottom As Long '矩形右下角的Y坐标

End Type

Private Sub Command0_Click()

Dim lRet As Long

Dim apiRECT As RECT

lRet = SystemParametersInfo(SPI_GETWORKAREA, vbNull, apiRECT, 0) MsgBox apiRECT.Right & "X" & apiRECT.Bottom

End Sub

注意，上述得到的是可视屏幕的分辨率，如果任务栏可见，则任务栏的高度排除在外。

2.根据取得的分辨率再循环所有的控件依次改变控件属性。

方法二：

'*****************************************************************

' DECLARATIONS SECTION

'*****************************************************************

Option Explicit

Type RECT

x1 As Long

y1 As Long

x2 As Long

y2 As Long

End Type

' NOTE: The following declare statements are case sensitive.

Declare Function GetDesktopWindow Lib "User32" () As Long

Declare Function GetWindowRect Lib "User32" _

(ByVal hWnd As Long, rectangle As RECT) As Long

'*****************************************************************

' FUNCTION: GetScreenResolution()

' PURPOSE:

' To determine the current screen size or resolution.

' RETURN:

' The current screen resolution. Typically one of the following: ' 640 x 480

' 800 x 600

' 1024 x 768

'***************************************************************** Function GetScreenResolution () as String

Dim R As RECT

Dim hWnd As Long

Dim RetVal As Long

hWnd = GetDesktopWindow()

RetVal = GetWindowRect(hWnd, R)

GetScreenResolution = (R.x2 - R.x1) & "x" & (R.y2 - R.y1)

End Function

然后：自动适应电脑显示器各种分辨率2例

例一、

1.Declare Function GetDesktopWindow Lib "USER32" () As Long

2.Declare Function GetWindowRect Lib "USER32" (ByVal hWnd As Long,

rectangle As RECT) As Long

4.'这个函数可以使你开发的程序适应各种分辨率，这是我见过的最完美的

解决方案！强列推荐

5.'如果你是在1024*768的分辨率下写的程序，就把下面那句改为

6.'Const DesignSize = 1024，如果是800*600分

7.'辨率下写的，就改为Const DesignSize = 800

8.'用法：把下面所有的代码放在一个模块里，在需要适应分辨率的窗体的

Load事件里加入：

9.'Call FormResiz_OnOpen(Me)

10.'

11.'Const DesignSize = 1024

12.Const DesignSize = 800

13.

14.Type RECT

15.x1 As Long

16.y1 As Long

17.x2 As Long

18.y2 As Long

19.End Type

20.

21.Private frm As Form

22.Private ctrl As Control

23.Private prp As Property

24.Private rat As Double

25.Private flgSec

26.Private x As Long

27.Private WinHeight As Long

28.Private hWnd As Long

29.Private ret As Long

30.Private I As Integer

31.Private R As RECT

32.Private SizeL As Long

33.Private SizeT As Long

34.Private SizeW As Long

35.Private SizeH As Long

36.

37.'-------------------------------------------------------------

-------------------

38.Public Function FormResiz_OnOpen(parFrm As Form, Optional

perSizeL As Long, Optional perSizeT As Long, Optional perSizeW As Long, Optional perSizeH As Long)

39.On Error Resume Next

40.Set frm = parFrm

41.'窗口驾驶盘的取得

42.hWnd = GetDesktopWindow()

43.'现在分辨率取得

44.ret = GetWindowRect(hWnd, R)

45.'比例计算常例：现在800 开发1024 800/1024 = 0.78加倍

46.x = (R.x2 - R.x1)

47.rat = x / DesignSize

48.SizeL = 0: SizeT = 0: SizeW = 0: SizeH = 0

49.If Not IsEmpty(perSizeL) = True Then

50.SizeL = perSizeL * rat

51.SizeT = perSizeT * rat

52.SizeW = perSizeW * rat

53.SizeH = perSizeH * rat

54.End If

55.

56.'现在分辨率＝开发分辨率如果终了

57.If x = DesignSize Then Exit Function

58.If x < DesignSize Then

59.'细小策划时、控制＞部分＞表单的次序

60.Call ChangeCtrl

61.Call ChengeSec

62.Call ChangeFrm

63.Else

64.'大掬取时、表单＞部分＞控制的次序

65.Call ChangeFrm

66.Call ChengeSec

67.Call ChangeCtrl

68.End If

69.'最后、表单的使清新

70.frm.Refresh

71.Exit Function

72.End Function

73.'-------------------------------------------------------------

-------------------

74.Private Sub ChangeCtrl()

75.On Error Resume Next

76.For Each ctrl In frm.Controls

77.'选项卡修正，原著没有这段代码，后来有个朋友发现了这个BUG，就是

选项卡的位置会偏得很厉害

78.'所以就加了这段代码来修正

79.'主要是"Top", "Height","Left","Width"这几个参数的值，根据实际情

况适当调整就行了

80.If ctrl.ControlType = 123 Or ctrl.ControlType = 124 Then

81.For Each prp In ctrl.Properties

82.Select Case https://www.wendangku.net/doc/a84348161.html,

83.Case "FontSize", "DatasheetFontHeight"

84.prp.Value = Fix(prp.Value * rat + 0.5)

85.Case "FontWeight"

86.prp.Value = Fix((prp.Value * rat) / 100) * 100

87.Case "Top", "Height"

88.prp.Value = Fix(prp.Value * rat * 0.85)

89.'prp.value = Fix(prp.value * rat)

90.Case "Left"

91.prp.Value = Fix(prp.Value * rat * 0.9)

92.Case "Width"

93.prp.Value = Fix(prp.Value * rat * 0.7)

94.End Select

95.Next

96.Else

97.For Each prp In ctrl.Properties

98.'大小·配置关于属性被发现们压缩

99.Select Case https://www.wendangku.net/doc/a84348161.html,

100.Case "FontSize", "DatasheetFontHeight"

101.'通常计算假如行…情况之下的 +0.5 之类的话不需要是…但…、102.'捆Zo~Ma办法。稍微心情坏因为 +0.5

103.prp.Value = Fix(prp.Value * rat + 0.5)

104.Case "FontWeight"

105.prp.Value = Fix((prp.Value * rat) / 100) * 100

106.Case "Left", "Top", "Width", "Height"

107.prp.Value = Fix(prp.Value * rat)

108.End Select

109.Next

110.End If

111.Next

112.End Sub

113.'--------------------------------------------------------------------------------

114.Private Sub ChengeSec()

115.On Error GoTo Err_Disp

116.'部分转

117.flgSec = True

118.I = 0

119.'不存在部分的参照错误化验出终了

120.Do Until flgSec = False

121.'部分被发现们高度变更

122.frm.Section(I).Height = Fix(frm.Section(I).Height * rat) 123.I = I + 1

124.Loop

125.Exit Sub

126.Err_Disp:

127.If Err = 2462 Then

128.flgSec = False

129.Resume Next

130.Else

131.MsgBox Err.Description

132.End If

133.Resume Next

134.End Sub

135.'--------------------------------------------------------------------------------

136.Private Sub ChangeFrm()

137.On Error Resume Next

138.If SizeL > 0 Then

139.DoCmd.MoveSize SizeL, SizeT, SizeW, SizeH

140.Else

141.frm.Width = Fix(frm.Width * rat)

142.WinHeight = Fix(frm.WindowHeight * rat)

143.DoCmd.MoveSize , , frm.Width, WinHeight

144.End If

145.End Sub

146.

例二、

窗体在不同的分辨率和屏幕宽度下自动调整大小,并带动其上的控件自动调整大小与相关间距是一个问题,经过摸索,利用窗体的insidewidth和insideHeight 属性可以实现该功能,主要代码如下:

'-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* -*-*-*-*-*-*-*-*

'本模块用于实现窗体自适应分辨率和控件自适应窗体大小功能

'本模块的核心函数为 gu_SetResize（）

'开发和调试本模块的时候，均以窗体最大化为动作，其余仅改变分辨率而不修改大小的窗体则没有

'参与调试

'使用方法见相应函数,注意在设计好后要修改本函数中的几个常数

'-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* -*-*-*-*-*-*-*-*

Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long

Private Const SM_CXSCREEN = 0

Private Const SM_CYSCREEN = 1

Const DesignSizeX = 1024'根据实际情况修改

Const DesignSizeY = 768

Dim tForm As Form

Dim ScaleX As Double

Dim ScaleY As Double

Dim ScaleF As Double

Public Function gu_SetResize(CurrentForm As Form, _

lngOldWidth As Long, _

lngOldHeight As Long, _

Optional isFirst As Boolean = True)

'--------------------------------------------------------------

'-函数名称: gu_SetResize

'-功能描述: 实现窗体自适应分辨率和控件自适应窗体大小

'-输入参数: 参数1:CurrentForm 要设置的窗体

' 参数2:lngOldWidth 对应窗体的窗口宽度

' 参数3:lngOldHeight 对应窗体的窗口高度

' 参数4:isFirst 调整大小的动作是否窗体加载引起的(load事件将引起一个resize事件)

'-返回参数: 无

'-使用示例: 首先应定义三个模块变量，并在load事件与resize事件中分别对三个变量赋值

' gu_SetResize用于窗体的resize事件中,全部示例如下：

'Dim oldFormWidth As Long

'Dim oldFormHeight As Long

'Dim blnIsFirst As Boolean

'------------

'Private Sub Form_Load()

'oldFormWidth = Me.InsideWidth

'oldFormHeight = Me.InsideHeight

'blnIsFirst = True

'DoCmd.Maximize

'End Sub

'-------------

'Private Sub Form_Resize()

'gu_SetResize Me, oldFormWidth, oldFormHeight, blnIsFirst

'oldFormWidth = Me.InsideWidth

'oldFormHeight = Me.InsideHeight

'blnIsFirst = False

'End Sub

'-相关调用:

'-使用注意: 1、本函数本应该将在当前机器设计时显示的当窗体加载后的第一次resize事件时的窗体大小应写入窗体的tag属性中

' 但是不知道是何原因，无法写入，所以需要手工填写，这是实现自适应分辨率的关键，必须注意

' 2、函数主要针对可调边框的窗体，对其他窗体用处暂不明显，故程序加有窗体边框形式的判断语句

'-兼容性: 2000

'-参考资料:

'-作者: ACCESS中国网友修改：---(保密,呵呵)

'-创建日期; 2007-3-10

'-图解:

'--------------------------------------------------------------

Dim X As Long

Dim Y As Long

Dim i As Integer

Dim strTags As String

Dim iWidth As Long

Dim iHeight As Long

On Error Resume Next

Set tForm = CurrentForm.Form

i = tForm.BorderStyle

If i = 0 Or i = 3 Then Exit Function

'取得纵横比例

ScaleX = Round(tForm.InsideWidth / lngOldWidth, 3)

ScaleY = Round(tForm.InsideHeight / lngOldHeight, 3)

If Not isFirst Then

If ScaleX = 1 And ScaleY = 1 Then Exit Function

End If

'取得当前分辨率

X = GetSystemMetrics(SM_CXSCREEN)

Y = GetSystemMetrics(SM_CYSCREEN)

'If X = DesignSizeX And Y = DesignSizeY And isFirst = True Then 'tForm.Tag = CStr(tForm.InsideWidth) & "|" &

CStr(tForm.InsideHeight)

'End If

'以下考虑窗体需要调整大小的情形

'分辨率与设计相比较有变化且是第一次

If isFirst Then

strTags = tForm.Tag

If Len(strTags & "") = 0 Then Exit Function

i = InStr(1, strTags, "|", vbTextCompare)

iWidth = CLng(Mid(strTags, 1, i - 1))

iHeight = CLng(Mid(strTags, i + 1))

ScaleX = Round(lngOldWidth / iWidth * ScaleX, 3)

ScaleY = Round(lngOldHeight / iHeight * ScaleY, 3)

End If

If ScaleX = 1 And ScaleY = 1 Then Exit Function

ScaleF = (ScaleX + ScaleY) / 2

'根据调整比例决定控件、节、窗体的变化顺序

If ScaleX < 1 Or ScaleY < 1 Then

'缩小

Call mu_AdjustControl

Call mu_AdjustSection

Else

'放大

Call mu_AdjustSection

Call mu_AdjustControl

End If

'刷新窗体

tForm.Refresh

Set tForm = Nothing

End Function

'--------------------------------------------------------------------------------

Private Sub mu_AdjustControl()

Dim k As Integer

Dim i As Integer

Dim c As Control

Dim ctrl As Control

On Error Resume Next

'调整控件

For Each ctrl In tForm.Controls

mu_SetCtrolPropertie ctrl

k = ctrl.ControlType

Select Case k

Case acTabCtl '选项卡

'对选项卡而言，要对其上的每一页的控件进行修订

Dim v1 As TabControl

Set v1 = ctrl.Object

v1.TabFixedHeight = v1.TabFixedHeight * ScaleY

v1.TabFixedWidth = v1.TabFixedWidth * ScaleX

For i = 0 To v1.Pages.Count - 1

For Each c In v1.Pages(i).Controls

mu_SetCtrolPropertie c

Next c

Next i

Set v1 = Nothing

Case 119 '状态条

Dim v2 As Panel

For Each v2 In ctrl.Panels

v2.Width = v2.Width + ScaleX

Next v2

'Case actoolbar

Case Else

End Select

Next ctrl

Set ctrl = Nothing

Set c = Nothing

End Sub

'--------------------------------------------------------------------------------

Private Sub mu_AdjustSection()

Dim k As Integer

On Error Resume Next

For k = 0 To 2

tForm.Section(k).Height = Fix(tForm.Section(k).Height * ScaleY) Next

End Sub

Private Function mu_SetCtrolPropertie(tempCtrl As Variant)

Dim prp As Property

On Error Resume Next

For Each prp In tempCtrl.Properties

Select Case https://www.wendangku.net/doc/a84348161.html,

Case "FontSize", "DatasheetFontHeight"

prp.Value = Fix(prp.Value * ScaleF)

Case "FontWeight"

prp.Value = Fix((prp.Value * ScaleF) / 100) * 100

Case "Top", "Height"

prp.Value = Fix(prp.Value * ScaleY)

Case "Left", "Width"

prp.Value = Fix(prp.Value * ScaleX)

End Select

Next prp

Set prp = Nothing

End Function

2016年计算机二级《VB》基础练习题及答案(2)

2016年计算机二级《VB》基础练习题及答案(2) 1[简答题]在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框，它们的高、宽分别为300、2400和1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性，满足如下要求： ①Text2可以显示多行文本，并且有垂直和水平两个滚动条; ②程序运行时在Textl中显示输入的字符为“*”。程序运行后的窗体如图所示。注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl.vbp，窗体文件名保存为sjtl.frm。参考解析：【考点分析】本题考点有：窗体的Caption属性，文本框的Name、Width、Hei【ght、PasswordChar、Text、MuhiLine、ScrollBars属性。【解题思路】文本框控件的MuhiLine属性用于设置文本框是否显示多行文本，值为Tr ue表示是，值为False则表示否。ScrollBars属性设置文本框是否有水平或垂直滚动条，它有0、l、2和3这4个值，0表示没有滚动条(默认值)，1表示只有水平滚动条，2表示只有垂直滚动条，3表示有水平和垂直滚动条。文本框的PasswordChar属性常用于设置用某字符(如“*”)屏蔽用户在文本框中键入的内容，常用于口令输入。【操作步骤】步骤1：新建一个窗体，按照题目要求建立文本框控件并设置其属性，程序中涉及的控件及属性见表3.8和表3.9。

步骤2：调试并运行程序，关闭程序后按题目要求存盘。【易错提示】由于ScrollBars属性的设置值较多，易混乱，请考生牢记4个值分别设置的文本框滚动条属性。 2[单选题]在下列模式中，能够给出数据库物理存储结构与物理存取方法的是()。 A.外模式 B.内模式 C.概念模式 D.逻辑模式参考答案：B 参考解析：数据库系统的三级模式是概念模式、外模式和内模式。概念模式是数据库系统中全局数据逻辑结构的描述，是全体用户公共数据视图。外模式也称子模式或用户模式，它是用户的数据视图，给出了每个用户的局部数据描述。内模式又称物理模式，它给出了数据库物理存储结构与物理存取方法，所以选择B。 3[单选题]以下关系表达式中，其值为True的是()。 A.1f.XYZ”>”XYz” B.”VisualBasic”<>”visualbasic” C.P the-.=’’there·t D.”Integer”<”Int” 参考答案：B 参考解析：用关系运算符比较两个操作敷时，如果两个操作数是字符型的，按字符的A SCIl码从左到右一一比较，即先比较第1个，若相同再比较第2个，依次比较，直到比较

计算机题库VB25

试卷编号：25 所属语言：Visual Basic 试卷方案：VB程序设计试卷总分：100分共有题型：4种一、单选共15题（共计30分）第1题（2.0分）题号:2299 难度:中第1章将调试通过的工程经"文件"菜单的"生成.exe文件"编译成.exe后,将该可执行文件转到其他机器上不能运行的主要原因是(). A:运行的机器上无VB系统所需的动态连接库 B:缺少.frm窗体文件 C:该可执行文件有病毒 D:以上原因都不对答案：A 第2题（2.0分）题号:2344 难度:中第2章下列字符串常量中,最大的是(). A:"北京" B:"上海" C:"天津" D:"广州" 答案：C 第3题（2.0分）题号:2436 难度:中第2章能正确表达a≤1或a≥5的逻辑表达式是(). A:a<=1或a>=5 B:a<=1,a>=5 C:a<=10 Or a>=5 D:a<=l And a>=5 答案：C 第4题（2.0分）题号:2539 难度:中第2章用一个程序段对一个对象被单击(或双击)做出响应,从而实现指定的操作,称为(). A:可视化程序设计 B:事件驱动编程机制 C:过程化程序实际方法

D:非过程化程序设计语言答案：B 第5题（2.0分）题号:2601 难度:中第3章在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_Click() K = 3 If X < 3 Then Print X + 3; If X < 4 Then Print X + 4; If X < 5 Then Print X + 5; If X< 6 Then Print K + 6; Print End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是(). A:6 7 8 9 B:7 8 9 C:8 9 D:9 答案：B 第6题（2.0分）题号:2662 难度:中第3章运行下面程序后,在窗体中显示的是(). Private Sub Form_Click() a$="*": b$="$" For k=1 To 3 x$=String$(Len(a$)+k,b$) Print x$; Next k Print End Sub A:*** ** **** B:*$*$*$ C:1*$2*$3*$ D:$$$$$$$$$ 答案：D

全国计算机等级考试二级VB笔试试题及答案

2009年9月全国计算机等级考试二级VB笔试试题及答案一、选择题（每小题2分，共70分）一、选择题 1．下列数据结构中，属于非线性结构的是（）。 A. 循环队列 B.带链队列 C.二叉树 D.带链栈答案C Array解析树均是非线性结构 2. 下列数据结构中,能够按照”先进后出”原则存取数据的是（）。 A. 循环队列 B.栈 C.队列 D.二叉树答案B 解析:栈是先进后出或后进先出的线性表 3. 对于循环队列,下列叙述中正确的是（）。 A.队头指针是固定不变的 B.队头指针一定大于队尾指针 C.队头指针一定小于队尾指针 D.队头指针可以大于队尾指针，也可以小于队尾指针答案D 解析:如果队头指针大于队尾指针说明队列已经循环存放数据了,如果队头指针小于队尾指针说明没有进行循环存放 4. 算法的空间复杂度是指（）。 A.算法在执行过程中所需要的计算机存储空间 B.算法所处理的数据量

C.算法程序中的语句或指令条数 D.算法在执行过程中所需要的临时工作单元数答案A 解析:算法的空间复杂度是指执行算法所需要的内存空间,包括算法程序所占空间,输入的初始数据所占空间和执行过程中所需要的额外空间. 5. 软件设计中划分模块的一个准则是（）。 A. 低内聚低耦合 B. 高内聚低耦合 C. 低内聚高耦合 D. 高内聚高耦合答案B 解析:模块内部各元素之间的联系要紧密,高内聚,模块间的连接的紧密程度要低,低耦合,这样可以提高模块的独立性. 6.下列选项中不属于结构化程序设计原则的是（）。 A.可封装 B.自顶向下 C.模块化 D.逐步求精答案A 7.软件详细设计产生的图如下该图是( ). A.N-S图 B. PAD图 C. 程序流程图 D.E-R图答案C 8.数据库管理系统是（）。

(完整word版)计算机二级VB编程题目含答案

Private Sub Command1_Click() Dim n As Integer, i As Integer, s As Double n = Val(Text1.Text) s = 0 For i = 1 To n s = s + i ^ 2 Next i Text2.Text = s End Sub Private Sub Command1_Click() ''' 不得删除本行注释 Dim i As Integer Open App.Path & "\" & "yssj.txt" For Input As #1 For i = 1 To 10 Input #1, a(i) Next i Close #1 End Sub Private Sub Command2_Click() ''' 不得删除本行注释 Dim i As Integer Text1.Text = "" For i = 1 To 10 If a(i) Mod 3 = 2 Then Text1.Text = Text1.Text & Str(a(i)) End If Next i End Sub

Private Sub command1_Click() '''不得删除本行注释 Dim a As Integer, b As Double, i As Integer, n As Integer n = Val(Text1.Text) a = 0 b = 0 For i = 1 To n a = a + i b = b + a Next i Text2.Text = b End Sub Private Sub Command1_Click() '''不得删除本行注释 Dim i%, xh$, xm$ Open App.Path & "\" & "Xhxm.txt" For Output As #1 For i = 1 To 3 xh = InputBox("请输入学号") xm = InputBox("请输入姓名") Write #1, xh, xm Next i Close #1 End Sub Private Sub Command2_Click() '''不得删除本行注释 Dim s as string Open App.Path & "\" & "Xhxm.txt" For Input As #2 Do While Not EOF(2) Line Input #2, s Text1.Text = Text1.Text & s & vbCrLf Loop Close #2 End Sub

全国计算机二级VB公共基础知识总汇

第1章数据结构与算法经过对部分考生的调查以及对近年真题的总结分析，笔试部分经常考查的是算法复杂度、数据结构的概念、栈、二叉树的遍历、二分法查找，读者应对此部分进行重点学习。详细重点学习知识点： 1．算法的概念、算法时间复杂度及空间复杂度的概念 2．数据结构的定义、数据逻辑结构及物理结构的定义 3．栈的定义及其运算、线性链表的存储方式 4．树与二叉树的概念、二叉树的基本性质、完全二叉树的概念、二叉树的遍历 5．二分查找法 6．冒泡排序法 1.1算法考点1 算法的基本概念考试链接：考点1在笔试考试中考核的几率为30%，主要是以填空题的形式出现，分值为2分，此考点为识记内容，读者还应该了解算法中对数据的基本运算。计算机解题的过程实际上是在实施某种算法，这种算法称为计算机算法。 1．算法的基本特征：可行性、确定性、有穷性、拥有足够的情报。 2．算法的基本要素：（1）算法中对数据的运算和操作一个算法由两种基本要素组成：一是对数据对象的运算和操作；二是算法的控制结构。在一般的计算机系统中，基本的运算和操作有以下4类：算术运算、逻辑运算、关系运算和数据传输。（2）算法的控制结构：算法中各操作之间的执行顺序称为算法的控制结构。描述算法的工具通常有传统流程图、N-S结构化流程图、算法描述语言等。一个算法一般都可以用顺序、选择、循环3种基本控制结构组合而成。考点2 算法复杂度考试链接：考点2在笔试考试中，是一个经常考查的内容，在笔试考试中出现的几率为70%，主要是以选择的形式出现，分值为2分，此考点为重点识记内容，读者还应该识记算法时间复杂度及空间复杂度的概念。 1.算法的时间复杂度算法的时间复杂度是指执行算法所需要的计算工作量。同一个算法用不同的语言实现，或者用不同的编译程序进行编译，或者在不同的计算机上运行，效率均不同。这表明使用绝对的时间单位衡量算法的效率是不合适的。撇开这些与计算机硬件、软件有关的因素，可以认为一个特定算法"运行工作量"的大小，只依赖于问题的规模（通常用整数n表示），它是问题规模的函数。即算法的工作量=f（n）

2012年全国计算机等级考试二级VB上机考试试题题库

2012二级VB上机考试试题题库 VB考试上机试题 1) .新建一个工程，实现单击Command1将text1中的内容复制（或者剪切）到Text2中。（要求使用Clipboard对象）保存。窗体上一个text文本框，两个command按钮，caption分别为“剪切”，“恢复”，运行后要求在text1中输入文本，点“剪切”，把text1中的内容剪切掉，点”恢复“，把text1中的内容恢复出来。提示：定义一个变量用来存放text1中的内容。 2) .新建一个工程，文本框text1,使用户输入字母一律转换为大写显示（焦点在最右端）保存。 3) .新建一个工程，实现功能：在窗体中实现由下向上滚动显示“您好！网络之家”这几个字。保存。 4) .新建一个工程，在Form1界面创建Form2，Form3两个子菜单的Forms菜单，选择Form2子菜单，以无模式显示Form2,选择Form3子菜单，以有模式显示Form3.保存。5) .新建一个工程，在界面上放置一个工具条Toobar1,在工具条上有三个按纽，按下第一个按钮时用MsgBox显示：“第一个按纽被按下”；按下第二个按纽时用MsgBox显示：“第二个按纽被按下”；按下第三个按纽时用MsgBox显示：“第三个按钮被按下”。保存。

6) 。新建一个工程，包含两个窗体Form1,Form2。实现功能制作－－－欢迎界面，时间为三秒，三秒后，Form1消失，Form2出现。保存。 7) 。新建一个工程，实现功能限制：在Text1中只能输入10个字母，超过的在Text2中显示。保存。 8) 。新建一个工程，实现功能单击Text1框时，Text1中的内容被全选。保存。 9) 。新建一个工程，实现功能点击Command1按钮，读取系统的汉字字型，在ComBox列表框中显示。保存。 10) 。新建一个工程，实现单击Commmand1将Text1的内容剪切到Text2中。（上次的那道题目是复制）保存。 11) 。新建一个工程，其中含五个单选按钮，两个面板StratusBar1. 第一面板题“欢迎探讨”，点击单选按钮时，第二个面板标题为选中的标题号。保存。 12) 。新建一个工程，使用打开对话框找到某一文件（硬盘上任意一文本文件），带全路径的文件名，显示在一文本框内。保存。

江苏省计算机二级VB考试真题及参考答案

2007年秋季vb考试真题 1．下面关于比特的叙述中，错误的是( 1 ) A．比特是组成数字信息的最小单位 B．比特只有“0”和“1”两个符号 C．比特既可以表示数值和文字，也可以表示图像和声音 D. 比特”1”总是大于比特“0” 2．在下列有关集成电路的叙述中，错误的是( 2 ) A．现代集成电路使用的半导体材料主要是硅 B．大觑模集成电路一般以功能部件、子系统为集成对象 C．我国第2代居民身份证中包含有IC芯片 D? 目前超大规模集成电路中晶体管的基本线条已小到l纳米左右 3．在下列有关通信技术的叙述中，错误的是( 3 ) A.通信的基本任务是传递信息，因而至少需由信源、信宿和信道组成 B.通信可分为模拟通信和数字通信，计算机网络属于模拟通信 C.在通信系统中，采用多路复用技术的目的主要是提高传输线路的利用率 D?学校的计算机机房一般采用5类无屏蔽双绞线作为局域网的传输介质 4.下面是关于PC机主存储器的一些叙述，其中正确的是( 4 ) A.主存储器是一种动态随机存取存储器(RAM) B.主存储器的基本编址单位是字(即32个二进位) C.目前市场上销售的PC机，其内存容量可达数十GB D.所有PC机的内存条都是通用的：可以互换 5．现行PC机中，IDE(或SATA)接口标准主要用于( 5 ) A．打印机与主机的连接C．声卡与主机的连接 B．显示器与主机的连接D．硬盘与主机的连接 6. 下列有关PC机的CPU、内存和主板的叙述中，正确的是( 6 ) 。 A．大多数Pc机只存一块CPu芯片，即使是“双核”CPU也是一块芯片 B．所有Pentium系列微机的内存条相同，仅有速度和容量大小之分 C．主板上芯片组的作用是提供存储器控制功能，I/O控制与芯片组无关 D．主板上CMOS芯片用于存储CMOS设置程序和一些软硬件设置信息 7.下列有关目前Pc机辅助存储器的叙述中，错误的是( 7 ) A．硬盘的容量越来越大，这是因为硬盘中磁盘碟片的数目越来越多 B．硬盘的内部传输速率一般小于外部传输速率 c．优盘采用Flash存储器技术，属于半导体存储器 D．目前常见COMBO光驱是一种将CD-RW和DVD-ROM组合在一起的光驱 8.下面有关Windows操作系统，(95以后版本)的叙述中，错误的是( 8 ) 。A．Windows操作系统支持系统中多个任务的并发执行 B．利用Whldows附件“系统工具”中的“系统信息”可以查看内存的工作情况 C．系统规定文件名最多由128个字符组成 D．Vista是Microsoft公司推出的Windows XP操作系统的后继版本 9.算法设计是编写程序的基础。下列关于算法的叙述中，正确的是( 9 ) 。 A．算法必须产生正确的结果C．算法可以没有输出 B．算法必须具有确定性D．算法的表示必须使计算机能理解 10．因特网使用TCP／IP协议实现全球范围的计算机网络互连，连接在因特网上的每一台主机

(整理)2001年(春)二级VB笔试答案.

2001年（春）二级VB笔试答案第一部分计算机基础知识 ●A类以WINDOWS 95/98 为平台 1. 为了清除计算机中的病毒，要求用无病毒的软盘重新启动计算机，其目的是清除________中的病毒。 A. RAM B. ROM C.CPU D.硬盘 2. 32位字长的最大正整数是2147483647，而最小负整数是-2147483648，即负整数比正整数多一个，其原因是_______。 A. 机内整数采用原码表示 B. 机内整数采用反码表示 C. 机内整数采用补码表示 D. 公认的约定 3. 已知 521 + 555=1406, 则此种加法是在___3____下完成的。 A. 七进制 B. 八进制 C. 九进制 D. 十进制 4. PC机、APPLE机，SUN工作站等计算机，其指令系统通常有所不同，这主要取决于___4____。 A. 所用的操作系统 B.所用的CPU C. 系统的总线结构 D. 所用的语言处理程序 5. 下列关于机器语言与高级语言的说法中，正确的是___5____。 A. 机器语言比高级语言执行慢 B. 机器语言程序比高级语言程序可移植性强 C. 机器语言程序比高级语言程序可移植性差 C. 有了高级语言，机器语言就无存在的必要了 6. 实现计算机系统中软件安全的核心是___6___。 A. 硬件的安全性 B. 操作系统的安全性 C. 语言处理系统的安全性 D. 应用软件的安全性 7. 下列有关Unicode汉字编码标准（字符集）中，叙述不正确的是___7___。 A. Unicode编码的长度为16位 B. Windows95/98支持Unicode编码 C. Unicode收录了一万多个汉字 D. Unicode与ASCII码不兼容 8. 作为信息处理热点技术之一的“多媒体技术”，强调的是___8___。

全国计算机二级VB考试真题和答案

2007年春江苏省高等学校非计算机专业学生计算机基础知识和应用能力等级考试二级试卷试卷语种：Visual Basic 第一部分计算机基础知识 1．微电子技术是信息技术领域的关键技术，它以集成电路（IC）为核心。在下列有关叙述中，错误的是。 A．A．目前IC芯片（如CPU芯片）的集成度可达数千万个电子元件 B．B．Moore定律指出，单块IC的集成度平均每半年翻一番 C．C．从原料熔练到最终产品包装，IC的制造工序繁多，工艺复杂，技术难度非常高 D．D．非接触式IC卡采用电磁感应方式无线传输数据，所以又称为射频卡或感应卡 2．在下列有关通信中使用的传输介质的叙述中，错误的是。 A．A．计算机局域网中大多使用无屏蔽双绞线，其无中继有效传输距离大约100m B．B．同轴电缆可用于传输电视信号 C．C．光纤价格高，一般不在校园网和企业网中使用 D．D．微波的波长很短，适合于长距离、大容量无线通信 3．二进制数（1010） 2与十六进制数（B2） 16 相加，结果为。 A．(273) 8B.(274) 8 C.(314) 8 D.(313) 8 4.设有一段文本由基本ASCII字符和GB2312字符集中的汉字组成，其代码为B0 A1 57 69 6E D6 D0 CE C4 B0 E6，则在这段文本中含有。 A．1个汉字和9个西文字符 C.3个汉字和5个西文字符 B.2个汉字和7个西文字符 D.4个汉字和3个西文字符 5.在下列有关CPU的叙述中,错误的是 . A. A.CPU的主要组成部分有运算器、控制器和寄存器组 B. B.CPU的主要功能是执行指令，不同类型CPU的指令系统通常有所不同 C. C.为了加快运算速度，CPU中可包含多个算术逻辑部件（ALU） D. D.目前PC机所有的CPU芯片均为Intel公司的产品 6．PC机在加电启动过程中会运行POST程序、引导程序、系统自举程序等。若在启动过程中，用户按某一热键（通常是Del键）则可以启动CMOS设置程序。这些程序运行的顺序是。 A．A．POST程序->CMOS设置程序->系统自举程序->引导程序 B．B．POST程序->引导程序->系统自举程序->CMOS设置程序 C．C．CMOS设置程序->系统自举程序->引导程序->POST程序 D．D．POST程序->CMOS设置程序->引导程序->系统自举程序 7.目前PC机一般都有USB和FirWire接口,用于连接各种外部设备.在下列关于这两种接口的叙述中,错误的是 . A. https://www.wendangku.net/doc/a84348161.html,B是一种串行接口,可以连接键盘、鼠标器、优盘、数码相机等多种设备

计算机二级VB考试试题

站长提醒广大考生：下面的138道题目，在二级考试中命中率极高。一、选择题 (1) 下面叙述正确的是(C) A. 算法的执行效率与数据的存储结构无关 B. 算法的空间复杂度是指算法程序中指令（或语句）的条数 C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止 D. 以上三种描述都不对 (2) 以下数据结构中不属于线性数据结构的是(C) A. 队列 B. 线性表 C. 二叉树 D. 栈 (3) 在一棵二叉树上第5层的结点数最多是(B) 注：由公式2k-1得 A. 8 B. 16 C. 32 D. 15 (4) 下面描述中，符合结构化程序设计风格的是(A) A. 使用顺序、选择和重复（循环）三种基本控制结构表示程序的控制逻辑 B. 模块只有一个入口，可以有多个出口 C. 注重提高程序的执行效率 D. 不使用goto语句 (5) 下面概念中，不属于面向对象方法的是(D) 注：P55-58 A. 对象 B. 继承 C. 类 D. 过程调用 (6) 在结构化方法中，用数据流程图（DFD）作为描述工具的软件开发阶段是(B) A. 可行性分析 B. 需求分析 C. 详细设计 D. 程序编码 (7) 在软件开发中，下面任务不属于设计阶段的是(D) A. 数据结构设计 B. 给出系统模块结构 C. 定义模块算法 D. 定义需求并建立系统模型 (8) 数据库系统的核心是(B) A. 数据模型 B. 数据库管理系统 C. 软件工具 D. 数据库 (9) 下列叙述中正确的是(C) A.数据库是一个独立的系统，不需要操作系统的支持 B.数据库设计是指设计数据库管理系统 C.数据库技术的根本目标是要解决数据共享的问题 D.数据库系统中，数据的物理结构必须与逻辑结构一致 (10) 下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A) 注：P108

江苏省计算机二级vb基本知识点总结

一、常量常量(也称常数)，是在程序运行期间其值始终保持不变的量。注意π不是常量。定义常量的语法格式：[Public|Private]Const 常量名[As数据类型] = 表达式 Const前不能使用Dim 在窗体的通用声明处不能使用Public定义常量、定长字符串、数组定义常量的语句可以在过程内部，也可以在通用声明处 = 后边的表达式不能是函数二、变量定义变量的语法格式：Dim|Private|Static|Public 变量名[As数据类型][，变量名[As数据类型]…] 使用Dim|Private|Static|Public定义变量后会将变量进行初始化使用Dim定义变量的语句可以在过程内，也可以在通用声明处；使用static定义变量的语句只能在过程内；使用public、private定义变量的语句只能在通用声明处在过程内部使用dim定义的变量是局部的过程级的变量，即该变量的生命周期和作用域很小。其作用域为本过程，即只在本过程中能用，出了本过程就不能使用其值。其生命周期为从该变量定义的位置开始变量在内存中存在，它所在的过程结束（遇到End Sub）该变量就从内存消失在通用声明处用Dim定义的变量是模块级的变量；其作用域为本模块，即在本窗体或模块的所有过程中都能使用该变量，在其他窗体或模块中不能使用该变量的值；其生命周期为从该变量定义的位置开始变量在内存中存在，整个程序结束（点击结束按钮或点击窗体上的关闭按钮）该变量才从内存消失使用static定义的变量是局部的静态变量。其作用域为本过程（同局部的dim定义的变量）；其生命周期为从该变量定义的位置开始变量在内存中存在，整个程序结束（点击结束按钮或点击窗体上的关闭按钮）该变量才从内存消失使用private定义的变量是模块级的变量，其作用域和生命周期同模块级的dim定义的变量使用public定义的变量是全局变量，其作用域为整个程序，即在整个程序的所有窗体或模块的所有过程中都可以使用此变量（但是注意，如果是在窗体的通用声明处定义的public类型的变量，则在其他窗体或模块使用该变量时需加上窗体的名字）；其生命周期为从该变量定义的位置开始变量在内存中存在，整个程序结束（点击结束按钮或点击窗体上的关闭按钮）该变量才从内存消失三、数组数组是一组按一定顺序排列的数据的集合，数据的类型可以不相同，数组的维数不得超过60维 1.静态数组定义静态数组的语法格式：public|private|static|Dim 数组名([下界To] 上界) [As数据类型]若省略下界时，表示下标的取值是从0开始，等价于“0 To上界” 可以使用Dim 或public 或private 或static 定义分别使用这4个关键字进行定义数组的语句可以出现的位置不同（同变量的定义）、数组的生命周期和作用域不同（同变量的作用域和生命周期）定义静态数组时小括号内的下标不能使用变量在同一个作用域内不能定义同名的静态数组（即：在同一个作用域内不能多次定义同一个数组），在不同的作用域内可以定义同名的静态数组（同名数组的使用和同名变量的使用相同）数组的定义语句中的下界和上界可以是常量或表达式（即：可以是整数、实数、正数、负数），下界不必须是0或1 静态数组定义的同时将被初始化静态数组一旦定义后，数组名、数组大小、数组的类型就确定了在程序的窗体模块或标准模块的通用声明处用Option Base n语句可重新设定数组的下界。此语句的含义是：在定义数组时，如果省略了下界则默认的下界是n，在定义数组时如果未省略下界则该数组的下界就是其自己定义的下界值（此时忽略Option Base n指明的下界n）

计算机二级VB完整教程

李子富周北海林海汪群慧宋存义孙体昌王化军黄国忠孙春宝汪莉钱大益邢奕甘一萍施春红陈月芳计算机等级考试二级VB基础教程 1.1Visual Basic概述 1.Visual Basic是什么 Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言。 “Visual”指的是开发图形用户界面(GUI)的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是BASIC(Beginners All-Purpose Symbolic Instruction Code)语言，一种在计算技术发展历史上应用得最为广泛的语言。Visual Basic在原有BASIC语言的基础上进一步发展，至今包含了数百条语句、函数及关键词，其中很多和Windows GUI有直接关系。专业人员可以用Visual Basic实现其它任何Windows编程语言的功能，而初学者只要掌握几个关键词就可以建立实用的应用程序。Visual Basic Scripting Edition(VBScript)是广泛使用的脚本语言，它是Visual Basic语言的子集，可嵌入HTML语言中，用于网页设计，如ASP(Active Server Page)文件。 VB简单易学，通用性强，用途广泛。 2.VB的功能 VB可以用于可以开发多媒体、数据库、网络、图形等方面的应用程序。数据访问特性允许对包括Microsoft SQL Server和其它企业数据库在内的大部分数据库格式建立数据库和前端应用程序，以及可调整的服务器端部件。有了ActiveX(TM)技术就可使用其它应用程序提供的功能，例如Microsoft Word字处理器，Microsoft Excel 电子数据表及其它Windows应用程序。 Internet能力强大，很容易在应用程序内通过Internet或intranet访问文档和应用程序，或者创建Internet服务器应用程序。已完成的应用程序是使用Visual Basic虚拟机真正.exe文件，可以自由发布。 3.VB的发展 VB是伴随Windows操作系统而发展的，在中国使用较广的版本有VB4.0、VB5.0、VB6.0。 VB4.0是为配合WIN95的问世于1995年推出的，既可用于编写WIN3.X平台的16位应用程序也可编写WIN95平台的32位应用程序；VB5.0主要用于编写WIN95平台的32位应用程序，较之VB4.0主要扩展了数据库、ActiveX和Internet方面的功能；VB6.0是与WIN98配合于1998年推出的，进一步加强了数据库、Internet 和创建控件方面的功能。

全国计算机VB等级考试历年全真试题(共15套,含答案)

全国计算机VB等级考试历年全真试题（共15套，含答案）２００５年4月份二级VB真题（附参考答案）（考试时间90分钟，满分100分）一、选择题((1)~(35)每小题2分，共70分) 下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。 (1)数据的存储结构是指 A) 存储在外存中的数据B) 数据所占的存储空间量 C) 数据在计算机中的顺序存储方式D) 数据的逻辑结构在计算机中的表示 (2)下列关于栈的描述中错误的是 A)栈是先进后出的线性表B) 栈只能顺序存储

C)栈具有记忆作用D) 对栈的插入与删除操作中，不需要改变栈底指针 (3)对于长度为n的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的是 A) 冒泡排序为n/2 B) 冒泡排序为n C) 快速排序为n D) 快速排序为n(n-1)/2 (4)对于长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为 A) log2n B) n/2 C) n D) n+1 (5)下列对于线性链表的描述中正确的是 A)存储空间不一定是连续，且各元素的存储顺序是任意的 B)存储空间不一定是连续，且前件元素一定存储在后件元素的前面 C)存储空间必须连续，且前件元素一定存储在后件元素的前面 D)存储空间必须连续，且各元素的存储顺序是任意的 (6)下列对于软件测试的描述中正确的是 A)软件测试的目的是证明程序是否正确 B)软件测试的目的是使程序运行结果正确 C)软件测试的目的是尽可能多地发现程序中的错误 D)软件测试的目的是使程序符合结构化原则 (7)为了使模块尽可能独立，要求 A)模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强 B)模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱 C)模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱 D)模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强 (8)下列描述中正确的是 A) 程序就是软件 B) 软件开发不受计算机系统的限制 C) 软件既是逻辑实体，又是物理实体 D) 软件是程序、数据与相关文档的集合 (9)数据独立性是数据库技术的重要特点之一。所谓数据独立性是指 A) 数据与程序独立存放 B) 不同的数据被存放在不同的文件中 C) 不同的数据只能被对应的应用程序所使用 D) 以上三种说法都不对 (10) 用树形结构表示实体之间联系的模型是

VB考试题及答案

1、VB应用程序中可以包括三种模块：( 窗体模块)、( 标准模块) 和类模块。 2、下列过程不能在标准模块中定义的是( A )。 A、事件过程 B、子过程 C、函数过程 D、公共过程 3、以下叙述中错误的是D A、如果过程被定义为Static类型，则该过程中的局部变量都是Static类型 B、Sub过程中不能嵌套定义Sub过程 C、Sub过程中可以嵌套调用Sub过程 D、事件过程可以像通用过程一样由用户定义过程名 2、在某一窗体模块中定义的全局级过程，若被该模块外的模块所调用，必须在该过程名前加上( 窗体名称)。 2、自定义的过程有两种形式：＿Sub＿和＿Function＿。 3、用于退出过程的语句是( D )。 A、Exit B、Exit For C、Exit Do D、Exit Sub 4、在过程的参数列表中列入__ Optional __关键字，就可以指定过程的参数为可选的。 5、如果使用Call关键字来调用一个需要参数的过程，参数就必须要加上__括号__。 1、在窗体代码中有以下事件过程的声明，其中Private表示( B ) Private Sub lblAbc_Change() …… End Sub A、此过程可以被任何其它过程调用 B、此过程只可以被本窗体模块中的其它过程调用 C、此过程不可以被其它过程调用 D、此过程只可以被本工程中的其它过程调用 9、假定已定义了一个过程Sub Add(a As Single,b As Single)，则正确的调用语句是( A )。 A、Add 12,5 B、Call(2*x,Add(1.57)) C、Call Add x,y D、Call Add(12,12,x) 10、要想在过程调用后返回两个结果，下面的过程定义语句合法的是( C )。 A、Sub Procl(ByVal,n,ByVal m) B、Sub Procl(n,ByVal m) C、Sub Procl(n,m) D、Sub Procl(ByVal n,m) 6、写出单击命令按钮Command1时的窗体显示结果。 Public Sub Proc(ByRef n As Integer,ByVal m As Integer) n=n Mod 10 m=m\10 End Sub Private Sub Command1_Click() Dim x as Integer,y As Integer x=15:y=30 Call Proc(x,y) Print x;y

计算机二级vb基础知识考点整理

(该内容都由本人辛苦整理，希望大家好好利用) 数进制的基本概念 1、比特：是计算机和其他数字系统处理、存储和传输信息的最小单位，一般用小写的字母“b”表示。比特只有两种状态，或者是“1”或者是“0”。(比特无大小) 2、比特的运算：逻辑乘（与）0 0 1 1 ∧0 ∧ 1 ∧0 ∧ 1 0 0 0 1 逻辑加（或）0 0 1 1 ∨0 ∨ 1 ∨0 ∨ 1 0 0 0 1 取反（非），“0”取反后世“1”，“1”取反后是“0”。 3、比特的存储单位：KB（千字节）、MB（兆字节）、GB（吉字节）、TB（太字节）它们之间的关系是：1KB＝210B=1024B1MB＝210KB1GB＝210MB1TB＝210GB 4、比特的传输速率单位：b/s（bps）、kb/s（千比特）、Mb/s（兆比特）、Gb/s（吉比特）、Tb/s（太比特）它们之间的关系是：1kb/s＝1000b/s1Mb/s＝1000kb/s 1Gb/s＝1000Mb/s1Tb/s＝1000Gb/s 5、二进制、十进制、八进制和十六进制 ⑴二进制,基数为2(共有0、1两个数) （1011）2=1×23+0×22+1×21+1×20=(11)10 ⑵十进制,基数为10(共有0、1…9十个数) （1011）10=1×103+0×102+1×101+1×100=1011 ⑶八进制,基数为8(共有0、1…7八个数) （1011）8=1×83+0×82+1×81+1×80=（521）10 ⑷十六进制，基数为16（0、1…9、A…F十六个数）（1011）16=1×163+0×162+1×161+1×160=（4113）10 6、不同进制的转换 (1)二进制、八进制、十六进制→十进制：如：（1011.101）2＝1×23+0×22 +1×21+1×20+1×2-1+0×2-2×2-3=11.625 a9.4H=10×161+9×160+4×16-1=169.25 (2)十进制→二进制、八进制、十六进制：整数：除以转换之后数制的基数，反序取余数，直到商为0结束小数：乘以基数，正序取整数部分，直到小数部分为0或满足一定的精度结束。如：（0.875）10＝（0.111）2 0.875×2=1.75 整数部分=1 （高位） 0.75×2=1.5 整数部分=1 0.5×2=1 整数部分=1 （低位） (3)二进制→八进制：从小数点开始每三位二进制转换为一位数(十进制数)，不足三位的，小数点前的在前面补0，小数点后的在后面补0。（0）8＝000 （1）8＝001 （2）8＝010 （3）8＝011 （4）8＝100 （5）8＝101 （6）8＝110 （7）8＝111 （11 101.01）2＝（001 101.010）2＝（35.2）8 (4)八进制→二进制：一位八进制数转换成对应的三位二进制（16.327）8＝（001 110.011 010 111）2＝（1 110.011 010 111）2 (5)二进制→十六进制：

计算机等级考试二级VB基础教程

计算机等级考试二级VB基础教程 1.1Visual Basic 概述 1.Visual Basic是什么 Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言。 “Visual” 指的是开发图形用户界面(GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言，一种在计算技术发展历史上应用得最为广泛的语言。Visual Basic 在原有BASIC 语言的基础上进一步发展，至今包含了数百条语句、函数及关键词，其中很多和Windows GUI 有直接关系。专业人员可以用Visual Basic 实现其它任何Windows 编程语言的功能，而初学者只要掌握几个关键词就可以建立实用的应用程序。Visual Basic Scripting Edition (VBScript) 是广泛使用的脚本语言，它是Visual Basic 语言的子集，可嵌入HTML语言中，用于网页设计，如ASP(Active Server Page)文件。 VB简单易学，通用性强，用途广泛。 2.VB的功能 VB可以用于可以开发多媒体、数据库、网络、图形等方面的应用程序。数据访问特性允许对包括Microsoft SQL Server 和其它企业数据库在内的大部分数据库格式建立数据库和前端应用程序，以及可调整的服务器端部件。有了ActiveX(TM) 技术就可使用其它应用程序提供的功能，例如Microsoft Word 字处理器，Microsoft Excel 电子数据表及其它Windows 应用程序。 Internet 能力强大，很容易在应用程序内通过Internet 或intranet访问文档和应用程序，或者创建Internet 服务器应用程序。已完成的应用程序是使用Visual Basic 虚拟机真正.exe 文件，可以自由发布。 3.VB的发展 VB是伴随Windows操作系统而发展的，在中国使用较广的版本有VB4.0、VB5.0、VB6.0。 VB4.0是为配合WIN95的问世于1995年推出的，既可用于编写WIN3.X平台的16位应用程

VB代码获得当前计算机屏幕的分辨率

2016年计算机二级《VB》基础练习题及答案(2)

计算机题库VB25

全国计算机等级考试二级VB笔试试题及答案

(完整word版)计算机二级VB编程题目含答案

全国计算机二级VB公共基础知识总汇

2012年全国计算机等级考试二级VB上机考试试题题库

江苏省计算机二级VB考试真题及参考答案

(整理)2001年(春)二级VB笔试答案.

全国计算机二级VB考试真题和答案

计算机二级VB考试试题

江苏省计算机二级vb基本知识点总结

计算机二级VB完整教程

全国计算机VB等级考试历年全真试题(共15套,含答案)

VB考试题及答案

最新[考试中心]安徽省计算机二级VB笔试权威模拟试题及答案2

计算机二级vb基础知识考点整理

计算机等级考试二级VB基础教程