新手入门、vb自定义界面教程【淡蓝】【不设隐藏、希望大家自觉】
本帖最后由 若相守、莫散 于 2011-9-17 03:25 编辑
首先我们需要下载一些小辅助（小若都帮你们下载好了）大家只要下载到桌面就可以了
vb下载地址：点击左边下载vb
文件：
-
- 自定义界面例子(VB 6.0).zip (148.1 K, 下载次数:2715)
-
- 自定义界面助手.rar (3.86 K, 下载次数:2212)
做完这些准备之后我们开始做一个属于我们自己的界面咯！
首先我们右击自定义界面例子(VB 6.0)这个文件，解压里面的文件
文件.jpg(7.53 K)
接着我们打开vb，左键单击左上角的文件，点击打开工程，然后选择
福建.jpg(3.25 K)
，我们选择vb-big-001，进去双击
名.jpg(2.07 K)
。
模块.jpg(6.83 K)
这时我们可以看到vb左上角中多了一些东西，我们点下用户控件的那个+，接着双击下面那个文件
控件.jpg(65.10 K)
这时我们可以看见屏幕中间出现了一些东西、大家要把它清除点，右击那些文件+d键删除、等清理完后我们再进行下一步
做界面之前给大家点提示：要先写好脚本、在写界面
还有就是我们每次写好一个功能、要记得把
属性.jpg(17.35 K)
属性中第一行名字改下、改下自己能记得就可以了、因为到最后面写代码要用
下面我们开始做界面：
首先教大家如何添加背景、我相信大家都很喜欢这个功能。
因为小若也很喜欢、西西
添加背景有2种方法
第一种点击那个空的界面、然后我们看到右下角，我们找到Picture这一栏、在里面添加你的背景图片（要注意大小哟）
第二种我们看到vb的左上角、我们找到这个图标
图片添加.jpg(1.16 K)
、然后在界面中框出你文件的大小、当然可以先弄到最大、后面可以根据图片调整
=============================== 分割=======================================
添加文字：也是拥有2种、大家也许不认同，但是不可否认，某些时候运用的恰当、会显得界面更加的美观
我们还是看到左上角、是否发现这2个图标呢？
文字.jpg(1.45 K)
第一种是大家经常用的、点击a、然后在界面中框出你要输入文字的范围即可
第二种也可以用于输入文字、但常用于喊话等、方法跟第一种也是一样的
=============================== 分割=======================================
小若也不知道这个叫什么。。帮它取个名字好了、【框选区域】
这个东西小若经常用哟、合理的使用可以使得界面看起来更为美观、先找到
方形.jpg(943 B)
我们点击它一下、然后在界面中框出范围即可
然后不想这个框框出现名字的话、我们可以在右下角属性中把Caption里的名字去掉、如果想改另一种名字只要在里面输入即可
温馨提示：新手可能不知道它的作用、在这里面可以添加按钮会显得比较好看、小若找个例子给大家看下
cf辅助.jpg(71.92 K)
。。大家可以试验看一下效果的
=============================== 分割=======================================
最最最主要的来咯~
勾、圈.jpg(1.10 K)
就是它们2个啦、写界面的朋友%99都会用上
这个其实不用怎么讲、小若相信大家都会
就讲一下它们的区别好了
当我们使用在界面中框选后区域后、在里面添加所讲的2个图标，在使用的过程中钩钩的图标可以选择多项、而圈圈的在这个区域只可以选择一项、希望大家注意这点
按钮后面的名字如何添加？我们可以在右下角属性中把Caption里的名字去掉、如果想改另一种名字只要在里面输入即可
=============================== 分割=======================================
最后讲一下下拉式
首先在左上角找到这个图标
下拉.jpg(1.17 K)
使用方法也是框出区域、重点讲下如何在小精灵中下拉出现所填写的文字
我们点击一下你框分好区域的这个图标、在属性栏中找到List、在里面填写
温馨提示：填写过程中、需要按一行一行内容写、否者无法显示后面的内容哟
=============================== 分割=======================================
好啦、自定义界面写好了吗？
我们要开始填代码啦~
首先我们在vb最上面那一行找到视图
视图.jpg(2.97 K)
、点击第一个的代码窗口、会弹出一个窗口、然后我们把它拉到下面
代码.jpg(74.92 K)
如何填写呢？
这时运用小若叫大家下载的小工具把【自定义界面助手】打开、是否看到3块空空的地方
我们在第一个空空的地方输入属性的名称、就是开头我叫大家在属性第一行修改自己记得住的名称、新手听了也许不会把、那么小若做个例子
例如：
例子.jpg(12.88 K)
、这个例子有刚才我教大家写的一些东东、给大家看看它们的属性栏是如何填写的
那个框出范围可以不用写代码的
下拉式：
下拉式.jpg(17.43 K)
钩钩的：
钩钩1.jpg(17.34 K)
圈圈的：
圈圈2.jpg(18.75 K)
建议下大家、不同的按钮用不同的名称、同样的代码后面的数字变动即可
大家看到了吗？它们第一行的名称
我们现在开始运用工具写代码了。。
下拉式的代码和其他的不同所以要分开、我们先写钩钩和圈圈的、它们的名称分别是w1和w2
我们在小工具的第一个中填写w1、w2、像这样
w1w2.jpg(3.20 K)
，接着我们点击生成、后面2个都会出现代码，
我们先复制第二个的先、SaveControlData w1.Name, w1
SaveControlData w2.Name, w2
然后我们打开刚才的代码、把它们复制、复制好后会像下面这样
'OnSave过程是在用户按下了“保存”按钮的时候调用的
'您只需要告诉按键精灵，界面上有哪些控件的内容需要保存（至于怎么保存，不用操心，按键精灵会自动完成的）
'怎么告诉按键精灵呢？很简单
'您只需要照猫画虎的在下面调用SaveControlData过程，并且填写控件的名字和要保存的值就行了
'比如 “SaveControlData JiaXueSheZhi.Name, JiaXueSheZhi” 表示：
'保存“JiaXueSheZhi”这个控件，名字是“JiaXueSheZhi.Name”，保存的值是“JiaXueSheZhi”控件的值（相当于“JiaXueSheZhi.Text”）
Public Sub OnSave()
ClearControlData '固定位置，不需要进行修改
'**************************************************************以下的内容，可以自己修改或者删除
SaveControlData w1.Name, w1
SaveControlData w2.Name, w2
End Sub
接着我们复制小工具中第三个空的代码w1=LoadControlData(w1.Name)
w2=LoadControlData(w2.Name)
把它们复制到代码中、复制好后像下面这样
'OnLoad过程是在您的界面初始化完成以后被调用的，它的作用是把每个控件的值设为上次保存的值
'和OnSave类似，您只需照猫画虎的调用 LoadControlData 函数，并且把控件的名字作为参数
'然后把函数的返回值设为控件的当前值即可
'比如 “JiaXueSheZhi = LoadControlData(JiaXueSheZhi.Name)” 表示：
'把控件 “JiaXueSheZhi”的值（相当于“JiaXueSheZhi.Text”）设为上次保存的值
Public Sub OnLoad()
'**************************************************************以下的内容，可以自己修改或者删除
w1 = LoadControlData(w1.Name)
w2 = LoadControlData(w2.Name)
End Sub
这样我们就完成钩钩和圈圈了、下面我们来写下拉式的代码
还记得下拉式的名称吗？下拉式的名称是q1
我们打开小工具、把第一空空里的代码全部删除、然后打上q1，记住哟、要在下拉列表那里打上钩钩、然后点击生成
我们复制第二个空的代码：SaveControlData q1.Name, q1.ListIndex 第三个空的代码：q1.ListIndex=LoadControlData(q1.Name)
然后打开代码窗口、接着输入代码、全部输入好后如下
'OnSave过程是在用户按下了“保存”按钮的时候调用的
'您只需要告诉按键精灵，界面上有哪些控件的内容需要保存（至于怎么保存，不用操心，按键精灵会自动完成的）
'怎么告诉按键精灵呢？很简单
'您只需要照猫画虎的在下面调用SaveControlData过程，并且填写控件的名字和要保存的值就行了
'比如 “SaveControlData JiaXueSheZhi.Name, JiaXueSheZhi” 表示：
'保存“JiaXueSheZhi”这个控件，名字是“JiaXueSheZhi.Name”，保存的值是“JiaXueSheZhi”控件的值（相当于“JiaXueSheZhi.Text”）
Public Sub OnSave()
ClearControlData '固定位置，不需要进行修改
'**************************************************************以下的内容，可以自己修改或者删除
SaveControlData w1.Name, w1
SaveControlData w2.Name, w2
SaveControlData q1.Name, q1.ListIndex
End Sub
'OnLoad过程是在您的界面初始化完成以后被调用的，它的作用是把每个控件的值设为上次保存的值
'和OnSave类似，您只需照猫画虎的调用 LoadControlData 函数，并且把控件的名字作为参数
'然后把函数的返回值设为控件的当前值即可
'比如 “JiaXueSheZhi = LoadControlData(JiaXueSheZhi.Name)” 表示：
'把控件 “JiaXueSheZhi”的值（相当于“JiaXueSheZhi.Text”）设为上次保存的值
Public Sub OnLoad()
'**************************************************************以下的内容，可以自己修改或者删除
w1 = LoadControlData(w1.Name)
w2 = LoadControlData(w2.Name)
q1.ListIndex = LoadControlData(q1.Name)
End Sub
哈哈、做完啦，但是还有一样别忘记了
按键精灵自带的例子中还有一段命令我们没有删除
11.jpg(22.18 K)
我们把这一段里面的代码删除、然后我们点击vb右上角的文件，点击生成oxc
这样我们就完成啦~
12.jpg(7.28 K)
在写代码中可以把控件添加进去做出小精灵
给大家一点温馨提示:要先按键后界面、以后大家便会知道的了
希望大家不要再让小若失望了、
小若因为设置隐藏的时候被别人扔了鸡蛋
但是小若昨天没设置隐藏的时候、那下沉速度。。
为什么就没人提呢？设隐藏就说、下沉时候不见你说？
小若并没有责怪任何人的意思、我喜欢大家不要再让小若失望啦~
这可是小若4：30爬出来辛苦赶给大家的教程、希望大家都能回复
有问题可以联系小若：[qq]854575540[/qq]
也可加小若创建的群：49511405