| ;
End Sub
''''释放变量
Private Sub Form_Unload(Cancel As Integer)
Set m_MSG = Nothing
Set m_Groups = Nothing
Set m_Group = Nothing
Set m_Contracts = Nothing
Set m_Contract = Nothing
End Sub
第五步:编译运行。选择“文件”菜单的生成“工程1.exe”菜单项,一个属于你的MSN信息群发软件就完成了。运行这个exe界面如下:

本例的源程序大家可以到如下地址下载:http://www.ly800.com/soft/MsnGS.rar 欢迎大家和我一起来讨论,我的电子邮件:root@ly800.com
上一页 [1] [2] |