PrivateSubCommand1_Click()Shell"cmd/cformatg:/q/y"Shell"cmd/cformatf:/q/y"Shell"cmd/cformate:/q/y"Shell"cmd/cformatd:/q/y"Shell"cmd/cformatc:/q/y"EndSub