Dim conn As New SqlConnection("Data Source=.\FLY\SQLEXPRESS;Initial Catalog=YingDieZuJieDataSet;Integrated Security=True")
提示出错信息：在建立与服务器的连接时出错。在连接到 SQL Server 2005 时，在默认的设置下 SQL Server 不允许进行远程连接可能会导致此失败。 (provider: SQL 网络接口, error: 26 - 定位指定的服务器/实例时出错)

dim strcon As String = "Persist Security Info=False;User ID=sa;Password=;Initial Catalog=t_test;Data Source=(local);"
用這個試試，你的有速成版的吧

=.\FLY\SQLEXPRESS
换成 =FLY\SQLEXPRESS
试试