VB使用ActiveX控件实例和步聚
目的掌握一个简单的VB程序的建立、编辑、调试、运行和保存的方法。
操作步骤 ⑴进入VB环境，新建工程。方法是：如果出现“新建工程”对话框，则选择“标准.EXE”并点击[打开]按纽；或者直接点击菜单[文件]-[新建工程]。都会出现一个名为“Form1”的新窗体。
⑵从标准控件工具栏中向窗体加入标签(Label1和Label2)、两个命令按纽(Command1和Command2)。
⑶由于标准控件工具仅提供20个内部控件，实际上vb程序中还可加入ActiveX控件和可插入对象等。为此本次实验请试用以下方法加入“滑块”控件，加入前必须使用菜单[工程]-[部件]，然后从弹出的列表框中勾选“Microsoft Windows Common Control 6.0 ”并点击[确定]按纽，然后就可以从控件工具栏中加入一个名为“Slider”的滑块控件了。
⑷设置窗体的背景图像、命令按纽的Picture属性和两个标签上的文字和字体后等属性： 控件名 属性和属性值 Form1 Caption=”初识VB世界”Picture=” BJtu.bmp” Label1 Caption=”新年快乐” Font 隶书 36 黑色 Left=400 BackStyle 透明 Label2 Caption=”新年快乐” Font 隶书 36 白色BackStyle 透明 Command1 将Caption清除 Picture=” HANDAR_Left.GIF” Style=1.Graphical Command2 将Caption清除 Picture=” HANDAR_Right.GIF” Style=1.Graphical Slider1 Max=7000 Min=500 LargeChange=50
⑸各控件属性设置完成后效果如下：
⑹编写响应几个事件的代码，目的是运行时牟控制标签文字的左右移动。共4个要响应的事件： ① 窗体的载入事件(Sub Form_Load):在窗体空白处双击鼠标左键,即可弹出该事件的过程代码的框架,即有: Private Sub Form_Load() End Sub 请在其中写入两条语句(功能是通过设置标签的Top和Left属性,使两个标签文字呈立体错位效果) Label2.Top = Label1.Top - 50 Label2.Left = Label1.Left - 50 ② 双击左手指所在的按纽Command1的鼠标单击事件(Sub Command1_Click()):在该按纽上双击鼠标,即可弹出该项事件的过程代码的框架,即有: Private Sub Command1_Click() End Sub 请在其中写入两条语句,功能是让两个标签的左边界同时减少50,使其左移. Label1.Move Label1.Left - 50 Label2.Move Label2.Left - 50 ③ 用同样在方法编写右手指所在的按纽Command2的鼠标单击事件,即在弹出的过程代码框架中写�
相关文档：
分类：VB学习 字号： 大大 中中 小小 mid(字符串，从第几个开始，长度) 在[字符串]中[从第几个开始]取出[长度个字符串]
例如 mid("小欣无敌",1,3) 则返回 "小欣无"
instr(从第几个开始,字符串1,字符串2) 从规定的位置开始查找，返回字符串2在字符串1中� ......
Option Explicit
Private Declare Function LoadCursor Lib "user32.dll" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long
Private Declare Function SetCursor Lib "user32.dll" (ByVal hCursor As Long) As Long
Private Const IDC_HAND As Long = 32649
Private myHand_handle ......
'添加个picture1和command1
Option Explicit
Dim lngCenter As Long
Dim lngMax As Long
Dim lngPad&
Dim PCurrent As POINT, PLast As POINT
Private Type POINT
x As Long
y As Long
End Type
Private Sub Form_Load()
lngCenter = (Picture1.Top + Picture1.Height) / 2
lngMax = Pictu ......
五、 CIM储存库和CIM类（1）
上一讲我们介绍了WMI的体系结构，还记得那张体系结构图吗？记得我们说到关注的重点应该是CIM储存库和WMI脚本对象库，为什么我们这样说呢？因为我们的程序直接是利用WMI脚本对象库进行编程，而这个WMI脚本对象获取或操作的内容都是来自CIM储存库（注意：我们这里说的CIM储存 ......
