【 tulaoshi.com - vb 】
建立的"通信卡片"控件包括：姓名、职务、单位、地址和电话，如图1.1所示。
具体操作按以下步骤进行：
第一步：建立一个容器
启动Visual Basic 6.0，在新建工程对话框中选择"标准EXE"，单击"确定"按钮，建立一个启动过程，作为用户控件的容器。窗体的Caption属性设置为"通信卡片测试"。
第二步：增加一个工程（用户控件工程）
执行"文件"菜单中的"添加工程"命令，在"添加工程"对话框中选择"ActiveX 控件"图标，然后单击"打开"按钮。此时程序中加入一个新的工程，并把一个新控件加入工具箱中。在工具箱中该控件的图标呈灰色显示，表明当前还不能使用。
图1.1
第三步：设计控件的可视界面
在用户控件窗体上画5个标签、一个图像框、一个直线和一个形状。在图像框中加入一个图标或位图，直线的BorderWidth属性设置为2。Label1的FontSize属性值为18，Label2的FontSize属性值为10，Label3、Label4、Label5的FontSize属性值都为12；这五个标签的Alignment属性为2；另外设置Label1的FontName为"隶书"，Label1的Caption属性为"张 风 绪"，Label2的Caption属性为"销售部经理"，Label3的Caption属性为"中国长城技术开发总公司"，Label4的Caption属性为"地址：北京市海淀区中关村路80586号"， Label5的Caption属性为"电话：（010）62585432"。
二、 添加属性 上面方法建立的控件只能建立一张通信卡片，为了用该控件建立内容不同的通信卡片，必须为控件增加必要的属性，通过这些属性建立不同的卡片。这里通过"ActiveX控件接口向导"为用户控件添加属性。操作如下：
1、 执行"外接程序"菜单中的"ActiveX控件接口向导"命令，打开"ActiveX控件接口向导"对话框，如图2.1所示。如果"外接程序"菜单中没有"ActiveX控件接口向导"命令,可执行该菜单中的"外接程序管理器"命令，打开"外接程序管理器"对话框，如图2.2所示，在该对话框中双击"VB ActiveX控件接口向导"，然后单击"确定"按钮。
图2.1
图2.2
单击"下一步"按钮，显示"选定接口成员"对话框，如图2.3所示。用">"或"<"按钮可以把选择的成员（属性、方法和事件）从一个列表框移到另一个列表框，用"<<"或">>"按钮可把一个列表框中的全部成员移到另一个列表框。对于本控件，不需要选择任何属性，可通过"<<"按钮将"选定名称"列表框清除。
图2.3 图2.4
2、 单击"下一步"按钮，显示"创建自定义接口成员"对话框，如图2.4所示。单击"新建"按钮，将打开"添加自定义成员"对话框，如图2.5所示。在该对话框中的"名称"栏中输入成员名称（例如"姓名"），在"类型"部分选择"属性"，然后单击"确定"按钮，即为用户控件建立一个属性。重复上述操作，依次为控件添加"职务"、"单位"、"地址"、"电话"几个属性。添加后的对话框如图2.6所示。
![5]()
来源:https://www.tulaoshi.com/n/20160129/1484546.html
