下拉列表框或组合框当rowsourcetype为6，即在下拉框(组合框)中出现了某表中所有字段，现在需要当字段类型为数值型时，此字段为灰色不可选。不知如何写代码？请指教。多谢了

.Combo1.List(nIndex)='\'&&设置灰色

我的意思是当字段为数值型时，不能被选择。能否讲的详细点好吗？

Close All
Use aa
Public fld(Fcount())
For lnCnt=1 To Fcount()
  fld(lnCnt)=Field(lncnt)
EndFor

'fld'

For lnCnt=1 To fcount()
  lcFld=Fld(lnCnt)
  If Type(lcFld)='N'
    (lnCnt)='\'
  EndIf
EndFor

不错，多谢了。我试了一下，成功了。不愧为班主。
Public fld(Fcount())
For lnCnt=1 To Fcount()
  fld(lnCnt)=Field(lncnt)
******************************
For lnCnt=1 To fcount()
  lcFld=Fld(lnCnt)
问：1、上下两段语句是什么意思？
    2、Public fld(Fcount())，共公变量名可用函数名来命名吗？