Dim Conn As ADODB.Connection
Dim Connres As ADODB.Recordset
Set Conn = New ADODB.Connection
Set Connres = New ADODB.Recordset
.
.
.
Connres.Fields("港口") = Combo1.Text,到后来我要帮定入数据库当中,但是不成功出错啊
,可能是字符串的长度不同意。有谁能把Combo1.Text的长度变为一个定长以使得其长度和前面的统一纳

解决方案 »

  1.   

    我的意思是Connres.Fields("港口")定义相应的表中的字段的长度是char型的15长度,而Combo1.text的长度可能和char型的15长度这个数据库中字段标准不统一,导致不能进入数据库而出错,我的目的是把Combo1.text改为定长的字符串(15)而使Connres.Fields("港口") = Combo1.Text前后长度一致
      

  2.   

    你把数据库相应字段改改长度好么?
    或者用on error 处理一下
      

  3.   

    用LEFT或者MID函数只截取combo的前15个字符不就行了吗?