Why does the caption keep coming up 0?

Sub SetPos()
PC.xpos = 0
PC.xview = 120
PC.ypos = 0
PC.yview = 120
frmGame.Caption = PC.yview
End Sub