189 8069 5689
一般出现乱码都是在js裏面跳转到哪个类然後得到这个参数的时候中文乱码,有一个非常实用的法,在js你可以这样写:varurl=..;url=encodeURI(url);url=encodeURI(url);//最重要的部分,两次调用encodeURI,就是编码两次然後在跳转到url所在的类,获取这个参数的方法如下:Stringname=request.getParameter("name");name=URLDecoder.decode(name,"utf8");这样就能解决乱码问题了,这种方法还没遇到过不能解决的乱码,
网站建设哪家好，找成都创新互联！专注于网页设计、网站建设、微信开发、微信小程序定制开发、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了宽城免费建站欢迎大家使用！
VB窗口的功能主要是进行界面的设计，通过不同控件来完成界面的设计。打开属性窗口的方法有以下几种方法：
1、“视图”菜单下的“属性窗口”项；
2、直接在控件或窗体上右键单击弹出的菜单中选择“属性窗口”；
3、在工程资源管理器中右键点击窗体、模块、类模块等弹出的菜单中选择“属性窗口”。
VB中菜单的基本作用有两个：1、提供人机对话的界面，以便让使用者选择应用系统的各种功能；2、管理应用系统，控制各种功能模块的运行
在要建立菜单的窗体上单击鼠标右键，将弹出一个菜单，然后单击"菜单编辑器"命令。菜单编辑器窗口分为3部分，即数据区、编辑区和菜单显示区。
1. 数据区：用来输入或修改菜单项，设置属性。该区分为若干栏，标题、名称、索引、快捷键、帮助上下文、协调位置、复选、有效、可见和显示窗口列表。
2. 编辑区：编辑区有左、右箭头，上、下箭头，下一个，插入和删除7个按钮，用来对输入的菜单项进行简单的编辑。菜单在数据区输入，在菜单项显示区显示。
3.菜单项显示区：位于菜单设计窗口的下部，输入的菜单项在这里显示出来，并通过内缩符号（...）表明菜单项的层次。条形光标所在的菜单项是"当前菜单项"。
Dim wz As New StreamReader(wjm) 'wz文字 这一句改一下： Dim wz As New StreamReader(wjm,System.Text.Encoding.GetEncoding("gb2312")) 'wz文字
这是我出现 VB 时的资料，供参考：
==================form的属性=================
▲ActiveControl 活动控件（只读） 无论窗体是否是活动的
？如果在窗体上的所有控件都是不可见的或不可使用的，那么将产生一个运行时错误。
▲Appearance 绘图风格（只读） 0 平面， 1（缺省值） 3D
▲AutoRedraw 自动重绘tf
-------------------------------------------------
▲BackColor 背景颜色 当BackStyle 属性的设置值为 0（透明）时有效
▲ForeColor 前景颜色
▲BorderStyle 边框样式，对 Form 对象和 Textbox 控件在运行时是只读的。
0vbBSNone 无（没有边框或与边框相关的元素）。
1vbFixedSingle 固定单边框。可以包含控制菜单框，标题栏 ，"最大化"按钮，和"最小化"按钮。
？只有使用最大化和最小化按钮才能改变大小。
2vbSizable 可调整的边框。可以使用设置值1列出的任何可选边框元素重新改变尺寸。（缺省）
3vbFixedDouble 固定。可以包含控制菜单框和标题栏，不能包含最大化和最小化按钮，不能改变尺寸
4vbFixedToolWindow 固定。显示关闭按钮并用缩小的字体显示标题栏。任务条中不显示。
5vbSizableToolWindow 可变大小。显示关闭按钮并用缩小的字体显示标题栏。任务条中不显示。
？将 BorderStyle 设置为0就会删除边框。如果希望窗体有边框而没有标题栏、控制菜单框、最大
化按钮和最小化按钮，则应从窗体 Caption 属性中删除任何文本，同时将窗体的 ControlBox、
MaxButton 和 MinButton 属性设置为 False。
▲MaxButton 是否有"最大化"按钮 （BorderStyle 属性非0值有效）
▲MinButton 是否有"最小化"按钮。（BorderStyle 属性非0值有效）
▲ControlBox 控制菜单框是（T缺省值）否在窗体中显示。在运行时为只读。
▲ShowInTaskbar 决定一个 Form 对象是否出现在 Windows 95 任务栏中。运行时为只读状态。
▲WindowState 运行时窗体窗口的可视状态 0（缺省值）正常。 1最小化。 2最大化
-------------------------------------------------
▲FillColor 填充颜色 当 FillStyle 设置为 1（透明）时有效，但是 Form 对象除外。
▲FillStyle 填充模式
0实线。 1（缺省值）透明。 2水平直线。 3垂直直线。 4上斜对角线。
5下斜对角线。 6十字线。 7交叉对角线
▲DrawWidth 画线宽度 从 1 到 32,767。该值以像素为单位
▲DrawStyle 画线样式
0（缺省）实线， 1虚线， 2点线， 3点划线， 4双点划线， 5无线， 6内收实线
▲DrawMode 绘图方式
1黑色。2非或笔（与15相反）。 3与非笔。4非复制笔（与13相反）。5与笔非。 6反转
7异或笔 。8非与笔（与9相反）。 9与笔。10非异或笔（与7相反）。 11无操作(关闭画图)
12或非笔。 13复制笔（缺省值 , 由 ForeColor 属性指定的颜色）。
14或笔非 。15或笔。16白色。
-------------------------------------------------
▲Caption
▲ClipControls 是重绘整个对象T（缺省值），还是只绘刚刚露出的区域F。
-------------------------------------------------
▲Count 返回集合中对象的数目。
▲Control 对象 所有内部控件的类名
Dim C as Control
Set C = Command1
▲Controls(index) 集合 窗体上的每一个控件的集合，其中包括控件数组中的元素
？具有两种表示法：MyForm.Controls(6).Top 与 MyForm(6).Top相同
▲Item(index) 方法 位置或键返回集合中的一个成员
-------------------------------------------------
▲CurrentX [= x ]
▲CurrentY [= y ]
▲Enabled 是否能够对用户产生的事件作出反应。
▲FontTransparent[= boolean] 背景文本和图形是否显示在字符周围的空区。
-------------------------------------------------
▲Font 返回一个 Font 对象。
？Font对象除具有以下6个类似属性外，还具有Weight属性
Weight属性 字符的权重，正常和斜体设置值的 Weight 值是 400（缺省值），
粗体和斜粗体设置值的 Weight 值是 700
Dim X As New StdFont
X.Bold = True
X.Name = "Arial"
Set Text1.Font = X
▲FontName 字体名
▲FontSize 字体大小 1-2048
▲FontBold 粗体否
▲FontItalic 斜体否
▲FontStrikethru 删除线否
▲FontUnderline 下划线否
？在设置大小和样式属性前，要先改变 FontName 属性。在设置的 TrueType 字体小于 8 磅时，
要用 FontSize 属性设置字体大小，再设置 FontName 属性，
然后用 FontSize 属性再一次设置字体大小。
-------------------------------------------------
▲Icon 窗体处于最小化时显示的图标。
▲hWnd 返回窗体或控件的句柄。
▲hDC 返回一个句柄 ，该句柄是由 Windows 运行环境提供给一个对象的设备描述体 。
？AutoRedraw 属性能引起 hDC 属性改变。如果窗体或 窗体 PictureBox 容器的 AutoRedraw
属性设置为 True，hDC 将作为持久图形 的设备关联句柄（等价于 Image 属性）。当
AutoRedraw 属性为 False 时，hDC 属性是窗体窗口或 PictureBox 容器的真正的 hDC 值。
程序运行中， 不论 AutoRedraw 设置为何值，hDC 属性都可以改变。
▲Image 返回持久图形的句柄，该句柄由 Windows 运行环境提供。不受 AutoRedraw 属性设置值的影响
Picture2.Picture = Picture1.Image '拷贝显示在Picture2中的所有图像到 Picture2
Picture2.Picture = Picture1.Picture '拷贝Picture2的Picture 属性到 Picture2
-------------------------------------------------
▲Height、Width 外部高度和宽度，包括边框和标题栏。
▲Left、 Top 左上角坐标
▲HelpContextID 返回或设置一个相关联上下文的编号
▲KeyPreview 是否在控件的键盘事件之前激活窗体的键盘事件KeyDown、KeyUp 和 KeyPress
▲MDIChild 是否是 MDI 子窗体（可在另一个 MDI 窗体内部显示）
？所有 MDI 子窗体都有可调整大小的边框，控制菜单框，以及最小化和最大化按钮，而不管
BorderStyle、ControlBox、MinButton 和 MaxButton 属性的设置值如何。
-------------------------------------------------
▲MouseIcon 自定义的鼠标图标。（MousePointer 属性设为 99 时使用）
▲MousePointer 鼠标指针
▲Moveable 是否可移动。
▲NegotiateMenus 窗体是否把其上对象的菜单合并到窗体菜单栏上。运行时无效。
-------------------------------------------------
▲Palette = path 返回或设置一幅图象，该图象包含了用于控件的调色板。
▲PaletteMode 回或设置一个值，该值决定了哪个调色板将用于对象上的控件。
0 （缺省的）使用 Halftone 调色板。
1 使用来自于含有调色板的最高层控件的调色板。
2 使用 Palette 属性中指定的调色板。
3 对于支持环境 Palette 属性的容器使用容器调色板。只适用于 UserControls。
4 不使用任何调色板。只适用于 UserControls。
5 使用 ActiveX 设计器的调色板。（只适用于包含调色板的 ActiveX 设计器。）
▲ScaleMode 坐标的度量单位类型
vbUser 0 指出 ScaleHeight、ScaleWidth、ScaleLeft 和 ScaleTop 属性中的
一个或多个被设置为自定义的值。
VbTwips 1 缇（1英寸= 1440 缇；1厘米= 567 缇） （缺省值）
VbPoints 2 磅（1英寸= 72 磅）。
VbPixels 3 像素（监视器或打印机分辨率的最小单位）。
vbCharacters 4 字符（水平每个单位=120 缇；垂直每个单位=240 缇）
VbInches 5 英寸。
VbMillimeters 6 毫米。
VbCentimeters 7 厘米。
▲ScaleWidth 、ScaleHeight 水平 或垂直 度量单位（将对象平分为n个自定义单位）
▲ScaleLeft 、 ScaleTop 水平 或垂直 坐标
-------------------------------------------------
▲StartUpObject 返回或设置工程的启动部件。 0 启动对象是 Sub Main。 1没有启动对象。
▲StartUpPosition 对象首次出现时的位置
0没有指定初始设置值。 1 Form中央。 2 屏幕中央。 3 屏幕的左上角。
▲Tag
▲WhatsThisButton 是否出现"这是什么"按钮
▲WhatsThisHelp 是否使用由 Windows 95 Help 提供的"这是什么"弹出式窗口或主 Help 窗口
▲Visible 返回或设置一指示对象为可见或隐藏的值
==================form的方法=================
▲Circle[Step] (x, y),radius,[color, start, end, aspect ]
圆心坐标,半径, 轮廓颜色,起点, 终点,纵横比
？此方法在对象上(逆时针方向)画圆、椭圆或弧
color 省略则使用 ForeColor 属性值
start 为负，画一半径到 start，并将角度处理为正的；
end 为负，画一半径到 end， 并将角度处理为正的。
aspect缺省值为 1.0，它在如何屏幕上都产生一个标准圆
？ 线段的粗细取决于 DrawWidth 属性值
可以省略某个参数，但不能省略分隔参数的逗号
Circle 执行时，CurrentX 和 CurrentY 属性被参数设置为中心点。
这个方法不能用在 With 语句块中。
-------------------------------------------------
▲Cls 清除运行时 Form 或 PictureBox 所生成的图形和文本
调用 Cls 之后，object 的 CurrentX 和 CurrentY 属性复位为 0。
-------------------------------------------------
▲Hide 用以隐藏 MDIForm 或 Form 对象，但不能使其卸载。
▲Show [style][,ownerform] 用以显示 MDIForm 或 Form 对象，不支持命名参数。
style的设置：
0 无模式窗体 随后遇到的代码则要执行
1 模式窗体 其后的代码直到该窗体被隐藏或卸载时才能执行(暂停其他窗体的代码)
？ 调用Hide和Show方法时如果指定的窗体没有装载， 将自动装载该窗体。
▲Load object 把窗体或控件加载到内存中
▲Unload object 从内存中卸载窗体或控件
？只有在运行时添加到窗体上的控件数组元素才能用 Unload 语句卸载
在卸载窗体前，会发生 Query_Unload 事件过程，然后是 Form_Unload 事件过程。
在其中任一过程中设置 cancel 参数为 True 可防止窗体被卸载。
-------------------------------------------------
▲Line [Step] (x1, y1) [Step] (x2, y2), [color], [B] [F] 在对象上画直线和矩形
起点坐标 终点坐标 颜色 矩形 实心
？F省略时，则矩形用当前的 FillColor 和 FillStyle 填充
线的宽度取决于 DrawWidth 属性值。执行 Line 方法时， CurrentX 和 CurrentY
属性被参数设置为终点。这个方法不能用于With 语句块。
-------------------------------------------------
▲Move left[,top,width,height]
▲OLEDrag 引起部件初始化 OLE 拖放操作
？当调用 OLEDrag 方法时，部件的 OLEStartDrag 事件发生，允许向目标部件提供数据。
-------------------------------------------------
▲PaintPicture picture, x1, y1, width1, height1, x2, y2, width2, height2, opcode
图形源, 放置坐标, 放置大小, 裁剪坐标, 裁 剪 大 小, 位操作
？此方法绘制图形文件的部分内容，图形文件指.bmp, .wmf, .emf, .ico或 .dib，
通过使用负的目标 height1 或 width1， 可以水平或垂直翻转位图。
位操作符常数的完整列表，请参阅 VB Help 文件中的 RasterOp Constants 主题。
-------------------------------------------------
▲Point(x, y) 返回在 Form 或 PictureBox 上所指定磅的红-绿-蓝 (RGB) 颜色
-------------------------------------------------
▲PopupMenu menuname, flags, x, y, boldcommand 显示弹出式菜单
菜单名, 位置和行为,坐标, 黑体菜单项
x,y 如果该参数省略，则使用鼠标的坐标。
调用 PopupMenu 方法后面的代码直到用户取消该菜单，或者从菜单中选择了命令
（这时，该命令的 Click 事件的代码比 PopupMenu 语句后面的代码先执行）后才执行
flag 的位置设置 | flag 的行为设置
0（缺省值）弹出式菜单的左边定位于 x | 0（缺省值） 仅响应鼠标 左击
4 弹出式菜单的于 x 居中位 | 2 左击、右击均响应
8 弹出式菜单的右边定位于 x |
-------------------------------------------------
▲PrintForm 将 Form 对象的图象逐位发送给打印机。
？如果 AutoRedraw 属性为 True ，则在运行时PrintForm 将打印 Form
对象或 PictureBox 控件上的图形。
▲PSet [Step] (x, y), [color] 将对象上的点设置为指定颜色。
所画点的尺寸取决于 DrawWidth 属性值,不能用在 With 语句块中
-------------------------------------------------
▲Refresh 强制全部重绘一个窗体或控件
？在下列情况下使用 Refresh 方法：
1 在另一个窗体被加载时显示一个窗体的全部。
2 更新诸如 FileListBox 控件之类的文件系统列表框的内容。
3 更新 Data 控件的数据结构。
？不能用于 MDI 窗体，但能用于 MDI 子窗体。不能在 Menu 或 Timer 控件上使用 Refresh 方法。
-------------------------------------------------
▲Scale (x1, y1) - (x2, y2) 用以定义 Form，PictureBox 或 Printer 的坐标系统。
左上角坐标 - 右下角坐标
？ 如果使用不带参数的 Scale（两组坐标都省略），坐标系统将重置为缇 。
▲ScaleX (width, fromscale, toscale)
ScaleY (height,fromscale, toscale)
从系统 到系统
？将宽度或高度值从一种 ScaleMode 属性的度量单位转换到另一种。
用于 fromscale 和 toscale 设置有：
vbUser 0 用户定义
vbTwips 1 缇（每逻辑英寸 1440 缇；每逻辑厘米 567 缇）。
vbPoints 2 磅（每逻辑英寸 72 点）。
vbPixels 3 像素 （显示器或打印机分辨率的最小单位）。
vbCharacters 4 字符（水平 = 每单位 120 缇，垂直 = 每单位 240 缇）
vbInches 5 英寸
vbMillimeters 6 毫米
vbCentimeters 7 厘米
vbHimetric 8 HiMetric。如果省略 fromscale，则 HiMetric 为缺省值
vbContainerPosition 9 决定控件位置。
vbContainerSize 10 决定控件大小。
-------------------------------------------------
▲SetFocus 将焦点移至指定的控件或窗体。
？所以如果不是在 Load 事件过程完成之前首先使用 Show 方法显示窗体的话，是不能使用
SetFocus 方法将焦点移至正在自己的 Load 事件中加载的窗体的。 也 不能把焦点移到
Enabled 属性被设置为 False 的窗体或控件。
-------------------------------------------------
▲TextHeight(string) 返回 Form，PictureBox 或 Printer 的当前字体的文本字符串的高度。
？ 返回值包括文本上下的正常前导空间,如果 string 含有
嵌入的回车返回符，将返回各行的累加高度
▲TextWidth(string) 文本字符串的宽度
如果 string 含有嵌入的回车返回符，将返回最长行的宽度。
-------------------------------------------------
▲WhatsThisMode 使鼠标指针改变为"这是什么"指针
？把应用程序放置在如同在标题栏中单击"这是什么"按钮时所得的相同状态。
鼠标指针要改变为"这是什么"指针。当用户单击一个对象时，被击中的对象的
WhatsThisHelpID 属性用以调用上下文敏感的 Help。
-------------------------------------------------
▲ZOrder position 将指定的 MDIForm，Form 或控件放置在其图层的z-顺序的前端或后端
如果 position 为 0 或被省略，则 object 定位在Z-顺序 前面。
如果 position 为 1， 则 object 定位在Z-顺序 后面。
==================form的事件=================
▲Activate( ) 事件 活动窗口
▲Deactivate( ) 事件 不再是活动窗口时
？仅当焦点在一个应用程序内移动时才发生。一个对象可以通过诸如单击它，或使用代码中的
Show 或 SetFocus ，或将窗体的 Visible 属性设置为 True方法之类的用户操作而变成活动的。
Activate 事件在 GotFocus 事件之前发生，LostFocus 事件在 Deactivate 事件之前发生。
-------------------------------------------------
▲Click( ) 单击事件
▲DblClick ( ) 双击事件
▲MouseDown(button As Integer, shift As Integer, x As Single, y As Single)
▲MouseUp (button As Integer, shift As Integer, x As Single, y As Single)
▲MouseMove(button As Integer, shift As Integer, x As Single, y As Single)
button 值：左按钮(1 vbLeftButton)，右按钮(2 vbRightButton)，中间(4 vbMiddleButton)
shift 值：SHIFT (1 vbShiftMask )，CTRL键(2 vbCtrlMask )，ALT (4 vbCtrlMask)
？位屏蔽的用法：
a = (Button And vbLeftButton) 0
b = (Shift And vbCtrlMask) 0
If a And b Then
？接收 Mouse 事件的对象，事件按这样的次序发生MouseDown, MouseUp, Click, DblClick
和 MouseUp。如果在 Click 事件中有代码，则 DlbClick 事件将永远不会被触发
△ Click事件发生在：
1用鼠标的左键或右键单击一个控件。对 CheckBox, CommandButton, Listbox 或 OptionButton
控件来说，Click 事件仅当单击鼠标左键时发生。
2通过按下箭头键或者单击鼠标按钮，对 ComboBox 或 ListBox 控件中的项目进行选择。
3当 CommandButton,OptionButton 或 CheckBox 控件具有焦点时，按下 SPACEBAR 键。
4当窗体带有其 Default 属性设置为 True 的 CommandButton 控件时，按下 ENTER 键。
5当窗体带有一个 Cancel 按钮 - 其 Cancel 属性设置为 True 的 CommandButton 控件时，
按下 ESC 键。
6对控件按下一个访问键。例如，如果一个 CommandButton 控件的标题是 "Go"，则按下
ALT+G 键可触发该事件。
△ DblClick 事件在以下情形下发生：
1用鼠标左键双击控件。
2双击 Style 属性设置为 1(Simple) 的 ComboBox 控件中的项目，或者在 FileListBox ,
ListBox , DBCombo 或 DBList 控件中的项目。
-------------------------------------------------
▲DragDrop(source As Control, x As Single, y As Single) 拖放事件
▲DragOver(source As Control, x As Single, y As Single, state As Integer) 拖移事件
-------------------------------------------------
▲GotFocus 获得焦点事件
触发条件：1 TAB 切换, 2 单击对象, 3 代码中用 SetFocus 方法
▲LostFocus 失去焦点事件
▲Initialize 创建类事件
在 Load 事件之前发生。
触发条件：1 用 CreateObject 函数创建类的一个实例，如：
Set X = CreateObject("Project1.MyClass")
2 引用窗体或类实例的属性或事件，该属性或事件由用户代码自动创建。如：
MyForm.Caption = "Example"
-------------------------------------------------
▲KeyDown (keycode As Integer, shift As Integer) 按键 事件
▲KeyUp (keycode As Integer, shift As Integer) 放键 事件
▲KeyPress (keyascii As Integer) 击ANSI键 事件
触发条件： 当一个对象具有焦点时按下或松开一个键时发生
如果 KeyPreview 属性被设置为 True，则一个窗体先于该窗体上的控件接收到此事件。
可用 KeyPreview 属性来创建全局键盘处理例程。
keycode 键代码，包含键盘上除以下三种情况外的所有键
1 Tab键。
2 当CommandButton 控件的 Default 属性设置为 True 时的 ENTER 。
3 当CommandButton 控件的 Cancel 属性设置为 True 时的 ESC 。
keyascii 标准数字 ANSI 键代码。将 keyascii 改变为 0 时可取消击键，对象便接收不到字符。
-------------------------------------------------
▲Unload object （语句）卸载 Form 对象或控件数组元素
如果object为窗体，会发生 QueryUnload 事件，然后是 Unload 事件
▲QueryUnload(cancel As Integer, unloadmode As Integer)（事件）卸载
？该事件发生在Unload之前
cancel设置 0： 窗体和应用程序关闭。其他：不关闭。
unloadmode 返回触发 QueryUnload 事件的原因。见下：
0vbFormControlMenu 用户从窗体上的"控件"菜单中选择"关闭"指令。
1vbFormCode Unload 语句被代码调用。
2vbAppWindows 当前 Microsoft Windows 操作环境会话结束。
3vbAppTaskManager Microsoft Windows 任务管理器正在关闭应用程序。
4vbFormMDIForm MDI 子窗体正在关闭，因为 MDI 窗体正在关闭。
▲Load （事件）装载窗体
▲Unload(cancel As Integer)（事件）卸载窗体
cancel设置 0： 窗体被删除。其他：不被删除。
▲Terminate （事件）所有引用都被从内存删除
？ 除类之外所有的对象，在 Unload 事件之后发生。
调用 End 语句，Terminate 事件不会触发。
-------------------------------------------------
▲Paint 重绘对象时
触发条件：1对象大小、颜色改变，2覆盖该对象的窗体被移开之后，3使用 Refresh 方法时
如果 AutoRedraw 属性被设置为 True，重新绘图会自动进行，于是就不需要 Paint 事件。
▲ Form_Resize 调整大小事件
▲object_Resize(height As Single, width As Single)
Resize的触发条件：当一个对象第一次显示或当一个对象的窗口状态改变时该事件发生
？AutoRedraw 属性被设置为 False 而且窗体被调整大小，
会按 Resize 和 Paint 的顺序调用相关的事件
当用户可以设置或者得到属性的值的时候，这些属性就在改变。有此属性可以在设计的时候改变。用户可以在属性窗口设置这些属性的值，而不需要写任何代码，而有些代码在设计的时候是不能改变的，所以必须在运行的程序中写入一些设置属性的值的代码。
那些可以在运行的时候设置和读取的属性被称作"read-write"属性。而那些只能在运行的时候读取的代码称为"read-only"属性。
1.设置属性值
当需要改变一个对象的外观或者行为时，就可以改变对象的属性值。例如可以通过改变一个textbox控件的Text属性值，来改变Textbox里面的内容。
设置一个属性的值，可以用以下的语法：
object.property=expression
如下一些实例：
TextBox1.Top=200 '让Top属性值为200
TextBox1.Visible=True '显示TextBox
TextBox1.Text="hello" '在TextBox中显示"hello"
2.得到属性的值
当代码要对一个对象进行一些操作时，用户可能需要得到一个对象的状态，例如，在对一个TextBox控件进行下一步操作时，可能需要得知TextBox的text属性的值，等等。
通常情况下，用户可以通过下面这样的语法得到一个对象的属性值：
variable=object.property
用户可以把一个对象的属性值作为一个复杂表达式的一部分，而不需要先把属性值赋给一个变量再进行计算，下面这个例子就是改变一个radio按钮的属性的代码：
Private Sub cmdAdd_Click()
'[statements]
RadioButton1.Top=RadioButton1.top+20
'[statements]
End Sub
注意：如果用户需要多次使用一个属性值的话，那么先把属性值赋给一个变量，将会使效率更快一点。
Val函数是返回在一个字符串中包含的一个连续数值 如果遇到非数值 则停止检测.MyValue = Val("24 and 57") 检测2 再检测4 再检测 空格 空格是非数值 停止检测 所以它最终的值是24. 多重窗体可以理解为父窗体与子窗体之间的关系 就是一主窗体内包含了N多子窗体.