dt.DataSet.AcceptChanges()
成都一家集口碑和实力的网站建设服务商，拥有专业的企业建站团队和靠谱的建站技术，10年企业及个人网站建设经验 ,为成都上千余家客户提供网页设计制作,网站开发,企业网站制作建设等服务,包括成都营销型网站建设，成都品牌网站建设，同时也为不同行业的客户提供网站设计制作、网站设计的服务,包括成都电商型网站制作建设,装修行业网站制作建设，传统机械行业网站建设,传统农业行业网站制作建设。在成都做网站,选网站制作建设服务商就选创新互联建站。
你把这句话去掉就好用了
调用 AcceptChanges 时，任何仍处于编辑模式的 DataRow 对象将成功结束其编辑。DataRowState 也发生更改：所有 Added 和 Modified 行成为 Unchanged；Deleted 行被移除。
在您尝试使用 DbDataAdapter.Update 方法更新 DataSet 之后，通常会对 DataTable 调用 AcceptChanges 方法。
这是声明数组……
VB 里声明数组既可以：
Dim name() As Type
也可以：
Dim name As Type() '不建议这种写法
这个是个警告，如果不负责任点的话其实可以忽略不管的。
之所以提示这个警告是因为你没有对myRow进行初始化。你可以这么定义myRow，这样就不会出现警告了。
Dim dt As DataTable = New DataTable()
dt.Columns.Add("姓名")
dt.Columns.Add("性别")
dt.Columns.Add("年龄")
dt.Columns.Add("联系方式")
dt.Columns.Add("身份证号")
dt.Columns.Add("所选科室")
dt.Columns.Add("所选医生等级")
dt.Columns.Add("病人状态")
Dim myRow As DataRow = dt.NewRow()
上面只是个简单的例子，你可以从DataTable里创建新的DataRow对象。
至于第二个问题的话你没有提供给我异常详情或者截图，在下无能为力。
