VB6.0图标

1、你程序的启动界面是那个，可以在【工程】-【工程x-属性】中查看，就启动界面为活动窗口，在其属性窗口中有‘icon’的属性，点击该属性，在右边出现一个‘...’的按钮，点击按钮，选择你需要的图标，这样在发布后的exe文件就是你需要的图标了。
2、打开本地文件需要打开对话框，这个对话框在默认的工具栏是没有的，需要你在【工程】-【部件】中添加，在点击【工程】-【部件】后的对话框中，选择Microsoft Common Dialog Control 6.0(sp6)，勾选它，然后确定，这样在你的工具栏会出现CommonDialog控件，将控件拖到界面。
CommonDialog控件有比较多的用途，可以是打开文件对话框、另存为对话框、颜色对话框、字体对话框、打印机对话框、帮助对话框，它是使用控件的方法实现的，其语法为：
CommonDialog1.ShowOpen，这是打开文件对话框，其他方法是另存为对话框:ShowSave、颜色对话框:ShowColor、字体对话框:ShowFont、打印机对话框:ShowPrinter、帮助对话框:ShowHelp
CommonDialog控件有几个重要属性，在设计是经常遇到，下面给你讲讲：
基本语法：
CommonDialog1.属性=值
1、FileName：得到用户选定的文件名，字符串类型
2、FileTitle：不博客路径的文件名，只读，字符串类型
3、Filter：文件过滤器，过滤文件类型，格式为："文本文件(*.txt)|*.txt|gif文件(*.gif)|*.gif|jpg文件(*.jpg)|*.jpg"，字符串数据
4、FilterIndex：指定默认列表框的设置，例如："gif文件(*.gif)"，字符串数据
5、InitDir：指定打开文件的指定目录，是一个路径，字符串数据

示例：
Private Sub Command1_Click()
CommonDialog1.Filter="文本文件(*.txt)|*.txt|gif文件(*.gif)|*.gif|jpg文件(*.jpg)|*.jpg"
CommonDialog1.InitDir="C:\Windows\"
CommonDialog1.CancelError=True
CommonDialog1.ShowOpen
End Sub

方法一:
主窗体(如Form1)里属性icon里选一个标准ICO文件(VB6只支持尽寸为32*32的ICO文件)
也就是说必须在主窗体里修改才可以,如果没有窗体就不能修改.

方法二:
有几个API:CreateFile,ReadFile,SetFilePointer,BeginUpdateResource,UpdateResource,EndUpdateResource,CloseHandle.自已查一下,这儿不够说的.
此方法是直接打开一个exe可执行文件,然后更新这个EXE的图标(也就是方法一中做不了的,可以用这个方法做,或者是修改没有源代码的EXE)

1)新建的标准exe有一个Form1,右侧设置它的属性中的Icon制定一个图标,然后设置菜单--工程--,设置[工程1属性],[生成]里选择图标为form1的图标即可.

2)右键点控件栏空白处,选择[部件],控件列表中勾选microsoft common dialog control 6.0(sp6),确定.
从控件栏拖动一个新的common dialog control到程序界面.
新建一个按钮(或者你需要用的那个),双击进入代码编辑状态.增加以下代码
CommonDialog1.CancelError = True
CommonDialog1.FileName = "请输入希望打开的文件名称"
CommonDialog1.ShowOpen
Text1 = CommonDialog1.FileName

这个text1就是你要获得的路径字串了.