系统开发的整体思想构造+源代码Protected Sub Button9_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button9.Click Dim conn As New OleDbConnection("Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=websitedesigning;Data Source=.") Dim str, str1, xi