随便打开CaseStudy目录下的一个演示文件,新建一个窗口,代码测试通过:
Dim _CurrentImage As String = ProjectPath & "Images\FLGBELG.ICO"e.Form.BaseForm.Icon = New System.Drawing.icon(_CurrentImage)
我測試沒作用,貌似也沒FLGBELG.ICO,錯誤提示找不到FLGBELG.ICO!