关于Set cn = New ADODB.Connection的声明

使用连接数据库，每个窗体中的操作经常要打开关闭连接，类似于CN,RS，
我是否可以将Set cn = New ADODB.Connection直接在模块中如下声明
Public Set cn = New ADODB.Connection
Public Set rs = New ADODB.Recordset
然后直接在窗体中直接使用？
还有声明
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
是否可以使用Public在模块中声明，在窗体中使用。这样做有什么缺点？
另外，是否可以如下语句关闭和清空
If cn.State = adStateOpen Then cn.Close: Set cn = Nothing
If rs.State = adStateOpen Then rs.Close: Set rs = Nothing