阅读下列程序并写出程序运行结果。 puBliC suB ChAngE1(ByvAl x As intEgEr, ByvAl y As intEgEr) Dim t As intEgEr t = x x = y y = t EnD suB puBliC suB ChAngE2(x As intEgEr, y As intEgEr) Dim t As intEgEr t = x x = y y = t EnD suB privAtE suB Form_CliCk() Dim A As intEgEr, B As intEgEr A = 22: B = 33 ChAngE1 A, B Form1.print 'A1='; A, 'B1='; B A = 22: B = 33 ChAngE2 A, B Form1.print 'A2='; A, 'B2='; B EnD suB 写出程序运行时,单击窗体Form1上的输出结果。