主题：[求助] 如何控制控件录入内容

1、使用什么命令可以控制某控件录入的内容 必须 在下拉的列表项目中存在的内容；如果没有则弹出提示？

1  http://www.foxtable.com/help/topics/2263.htm

 例子发上来。

此主题相关图片如下：360截图20170226143825383.jpg


此主题相关图片如下：360截图20170226143856483.jpg

dataformat事件写代码

 

e.Value = e.value.Replace(chr(10), vbcrlf)

 

如果还不行，上传实例说明。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.foxdb

同一处理一下数据

 

For Each r As Row in Tables("表a").rows

    r("第二列") = r("第二列").replace(vbcrlf, chr(10)).replace(chr(13), "").replace(chr(10), vbcrlf)

Next

 

Dim cmd As New SQLCommand
Dim dt As Date
cmd.C
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()

For Each r As Row In Tables("未装机回访表").Rows
        
    If r.IsNull("派单日期")  Then
        r("等待装机时长") = Nothing
    Else
        Dim tp As TimeSpan
        tp = r("派单日期") -  dt
        r("等待装机时长") = tp.TotalSeconds() '真正的时段型数据要转换为秒数,才能存入时段列
    End If
   
End Select

此主题相关图片如下：360截图20170228182318228.jpg