Sub edtZX_OnKeyup()
 if len(ZXQuery.edtZX.value)=20 then
	ZXQuery.sbtZX.focus()
 end if
End Sub

Sub edtFZ_OnKeyup()
 if len(FZQuery.edtFZ.value)=20 then
	FZQuery.sbtFZ.focus()
 end if
End Sub

Sub edtQP_OnKeyup()
 if len(QPQuery.edtQP.value)=20 then
	QPQuery.sbtQP.focus()
 end if
End Sub