Length of text in textbox

[Barbados]

Hi all,

I saw someone using the following code in a keypress event:

Dim C As Control
Set C = Screen.ActiveControl
 
' Fetch length of current contents + 1 for the character typed.
Dim CLen As Integer: CLen = Len(C.Text & "") + 1

Who knows why the & "" is being used?

Thanks.

 

[pr2-eugin]

Len is a String manipulation function.. Which does not like the Argument that is passed to be a Null Value.. If you try Len(Null) an Error would be raised, so to avoid the error we use an Empty String.. So it would return a value 0..

However the other concern, what if the active control is Checkbox/Option/Label? Will that not be a problem? as they do not have .Text property..