compadre si te entiendo bien lo que tu necesitas es poner ql inicio del codigo

Form.mousepointer=11 'Hourglass

esto le indica a VB "Esperar: programa esta ocupado"

y al final de la ejecucion...