vb自动升级源代码,强制自动升级PrivateSubForm_KeyPress(KeyAsciiAsInteger)UnloadMeEndSubPrivateSubForm_Load()frmSplash.Caption="演示程序版本号:"&App.Major&"."&App.MinorlblVersion.Caption="版本"&App.Major&"."&App.Minor&"."&App.Rev