Doesn't the ALL_DIGITAL = TRUE command take care of that? I even tried replacing that with CMCON command, but still no worky. With the PORTA.0 pin tied high through the 10k, I still read practically 0v on the pin with the VMM. Here is the code preface:

Device = 16F628A
XTAL = 4

ALL_DIGITAL = TRUE
PORTB_PULLUPS = On
TRISB = 0

Symbol SW1 = PORTA.0
Symbol LED1 = PORTB.0
Symbol LED2 = PORTB.1

Dim CounterA As Byte

TRISA = $F0
PORTB = 0

Any ideas?