Automatic "pretty listing" (reformatting) of code in VB6

[TTn]

1. In vb.net there is a really nice time saving feature that automatically formats your code with the proper indentation.
Type: If True then {Enter} produces
If True Then
{ |Caret here}
End If

2. There is also a feature to automatically insert the end constructs for you, ie do...loop, if...Then etc.
Type: Do {Enter} produces
Do
{Caret here}
Loop

3. Another convenient feature recently added to VB65's source code is automatic instantiation of dimensioned variables (common data types only).
Type: Dim i as long {Enter} produces
Dim i As Long: i=0

Type: Dim x,y,z as double {Enter} produces
Dim x, y, z As Double: x=0: y=0: z=0

Type Dim o as object {Enter} produces
Dim o As Object: Set o = Nothing

EDIT: Video link Auto-Indenting in VB6
EDIT: Github addin source

Has anyone else achieved these features in production? For example, an Add-in.
Thanks