I guess this will work Thanks
VB Code:
  1. retvalue = GetSetting("A", "0", "RunCount")

  2.     Activate$ = Val(retvalue) + 1

  3.     SaveSetting "A", "0", "RunCount",Activate$

  4.  
  5.  
  6.     If Activate$ < 20 Then

  7.         

  8.     End If

  9.  
  10.     

  11.     If Activate$ > 19 Then

  12.         

  13.         Call Command1_Click

  14.         

  15.       

  16.     End If