Dim ... As New 和Dim ... As ..

DIm conn As New MySqlConnection(Common.m_strConn)

直接创建了实例对象，直接用

Dim conn As MySqlCommection()

创建了对象但无法实例化需要

set conn=new MySqlConnection(Common m_strConn)