afteropenproject事件处理一下,width,不要重复width的内容
cmd.CommandText = "select * f rom {列宽设置} where 显隐 = -1"Dim dt As DataTable = cmd.ExecuteReaderwidth = ""For Each dr As DataRow In dt.DataRows width = width & dr("列名称") & "|" & dr("宽度") & "|"Nextwidth = width.Trim("|")