一个窗体单击事件过程如下:Private Sub Form_Click() X = Val(Text1.Text):Y = Val(Text2.Text) If X = 0 Or Y = 0 Then Print"不在任何象限内": Exit Sub If X > 0 And Y > 0 Then Print"IN A" If X > 0 And Y If X 0 Then Print"IN B&quo
一个窗体单击事件过程如下:Private Sub Form_Click() X = Val(Text1.Text):Y = Val(Text2.Text) If X = 0 Or Y = 0 Then Print"不在任何象限内": Exit Sub If X > 0 And Y > 0 Then Print"IN A" If X > 0 And Y If X 0 T