当前工程名:工程1，修改后：工程2
工具/原料
VB6
方法/步骤
1、添加一个窗体，添加2个LABEL控件，一个按钮
2、写代码如下Optio艘绒庳焰nExplicitPrivateSubCommand1_Click()App.Title=&qu泠贾高框ot;工程2"Label2.Caption="修改后的工程名："&App.TitleEndSubPrivateSubForm_Load()DimttAsStringtt=App.TitleLabel1.Caption="当前工程名:"&ttEndSub
3、效果：
