在Activate 事件过程中，写入下面的程序： Private Sub Form _Activate() Dim S As String, a As String, b As String a= "*" : b =" ****

C **

D *******