Bold face formatting for vectors instead of overarrows like latex \mathbf{}?

This is mainly an add-on to David solution. I'm new in SE, so I can't comment yet. So I put it in an answer.

One could maintain a list of the symbols, which should be displayed as vectors, eg:

vList = {}
defAsVector[x__Symbol] := (vList = Union[Join[vList, {x}]];)
defAsVector[] := vList
undefAsVector[x__Symbol] := (vList = Complement[vList, {x}];)
undefAsVector[] := (vList = {}; $PrePrint =.;)
$PrePrint = # /. {x_ /; MemberQ[vList, x] :> Style[x, Bold]} &;

I am not sure I understand your needs, but consider this:

Format[OverVector[v_]] := Style[HoldForm[v], FontFamily -> "Arial Black"]

{q, r, OverVector[s], t, u, v}

Mathematica graphics


I only have my iPhone now, but something like this should work well.

MakeBoxes[x,StandardFom]:=StyleBox["x",FontWeight->Bold];  
MakeExpression[StyleBox["x",FontWeight->Bold]]:=MakeExpression["x"].  

Better yet you could 'declare' that certain symbols represent vectors.

declaredVectorQ[x_Symbol]:^=declaredVector[x]^=True;
MakeBoxes[x_Symbol?declaredVectorQ,StandardForm]:=
                                    StyleBox[ToString[x],FontWeight->Bold];  
MakeExpression[StyleBox[str_String,FontWeight->Bold]:=ToExpression[str];