为什么对象名无效

           这几天敲机房收费的基本数据设定和注册窗体时，遇到一个让我头晕的问题，如下图的提示：

          

           为什么提示错误后会定位在模块的这句话？

           

             在模块中，上面这句话的作用是对数据库在进行SQL语句时进行查询。那这句话又错在哪？按网上的方法，出现这个错误的原因是：配置ODBC时没有将默认的数据库设置为当前使用的数据库；另一方面，设置的服务器不是给定的服务器地址。但这个方法并不能解决我的错误。

          后来发现原来查询语句的问题，将查询数据库的语句的出场顺序调整正确就可以解决“对象名无效”的问题。

         而数据库空值的问题出在数据库的表中。窗体中需要六列，而数据的表中竟有9列，如下图

         

  

            提示空值就是因为数据库“允许空值”设置为不允许，如果不改变这里的设置又该怎么办？下面是要解决这个问题的代码：

           1.不更改数据库中的设置，那么就要想办法将head、date、time这三项都赋值给别的，使其运行时不是空值。

               那么先在模块中声明userhead       public userhead as  string

               然后再将登录的窗体中的代码改成下面的这些：

                          

  if trim(objRS.fields(1))=trim(txtPW.text) then 
     OK =true 
     g_strName=trim(txtPW.text)
     userhead=objRS.fields(4)    '因为head在数据库的表中是第五行
      objRS.close
     me.hide
     frmMain.show   

        
              最后将基本数据设定的窗体中“确定”按钮的代码修改如下：

    mrc.addnew
    mrc.fields(0)=Richtextbox1.text
    mrc.fields(1)=RichTextBox2.text
    ……
     mrc.fields(6)=userhead         ‘数据表中的第七八九行
     mrc.fields(7)=date
    mrc.fields(8)=day                   ’这样的赋值解决空值问题

        和学生信息管理系统相比，机房收费功能更加全面，当然遇到的问题也就更多，所以发现问题及时解决问题才是王道，大家一起努力吧！！