在vb里怎样做一个about对话框?
在程序里用什么命令打开?打开新窗体呢?
在程序里用什么命令打开?打开新窗体呢?
解决方案 »
- VB单击网页Submit后判定网页完成状态
- SQL Servre2000备份问题,杀掉了其他和SQL Server通讯的进程,当备份完后,怎么恢复原先的连接啊?
- 520分求高手指教 打造超级access,模拟SQL功能!自动备份,事务日志,回滚
- 请问datareport可以像excel横向设计吗?
- 关于printer 的纸型设置问题
- 关于qq的功能,谢谢大家
- VB数据库问题,请教各位大虾?
- 请问如何在VB中启动水晶报表的设计器?高分!
- 在form中,想对不确定的控件进行检测??
- ADO Data控件?急??
- 在VB中如何实现有象windows资源管理器那样浏览文件?
- 如何将一个磁盘文件,让windows以默认方式打开它?
另一个就是用vb 的about 窗口,
打开方法:
窗口名.show 就可以了
Public Declare Function ShellAbout Lib "shell32.dll" Alias "ShellAboutA" (ByVal hwnd As Long, ByVal szApp As String, ByVal szOtherStuff As String, ByVal hIcon As Long) As Long
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
ShellAbout hwnd, "拨号上网管理器 v1.0#(c) 作者:mndsoft 2002-2005", " 因为公司没装宽带网,因为上网费用的问题,因为上网难管理...所有的理由都是促使我写这个小软件的原因.虽然他可能对于到处是宽带的今天已无用处,但对于公司肯定起到不可小觑的作用.这已足够,我算得到解脱.", Icon