You can also just use ComplexExpand because it assumes all variables are real unless specified as complex:
ComplexExpand[Abs[k1*I + 1]]
Mariusz's post is better if there are further simplifications from the fact that k is Positive (which in your particular example does not matter).
Regards.