以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  代码提示错误  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=146920)
--  作者：裴保民
--  发布时间：2020/3/6 0:05:00
--  代码提示错误
srzh.ComboList="xxx|" &  DataTables("资金账户").GetComboListString("账户名称").Replace("|xxx|","|" )
将“xxx”换成表达式怎么写呢？
换成  srzh.ComboList= = "\'  & dr("账户名称") &  "\'"|  &  DataTables("资金账户").GetComboListString("账户名称").Replace("| \'" & dr("账户名称") & "\'" |","|" )  

保存不了代码提示错误

图片点击可在新窗口打开查看此主题相关图片如下：截图24.jpg
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2020/3/6 11:08:00
--  
换成  srzh.ComboList= = dr("账户名称") &  "|"  &  DataTables("资金账户").GetComboListString("账户名称").Replace("|" & dr("账户名称") & "|","|" )  
--  作者：裴保民
--  发布时间：2020/3/6 11:13:00
--  
还是错误

图片点击可在新窗口打开查看此主题相关图片如下：截图25.jpg
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2020/3/6 13:30:00
--  
2个=号
--  作者：裴保民
--  发布时间：2020/3/6 14:07:00
--  
dr = DataTables("资金账户").Find("账户默认 = True" ) \'找出编号为03的产品
If dr IsNot Nothing Then  
 srzh.ComboList = dr("账户名称") &  "|"  &  DataTables("资金账户").GetComboListString("账户名称").Replace("|" & dr("账户名称") & "|","|" )  
    srzh.Text = dr("账户名称")
Else
srzh.ComboList=DataTables("资金账户").GetComboListString("账户名称")
 srzh.SelectedIndex = 0
 End If

如果数据库中有“账户默认”为True的数据时我想把该行的数据移到Combo控件的第一行，如果没有则直接选择第一行，运行后能选择但顺序没变呢？
--  作者：有点蓝
--  发布时间：2020/3/6 16:52:00
--  
srzh.ComboList=DataTables("资金账户").GetComboListString("账户名称","","账户默认 desc")
srzh.SelectedIndex = 0
--  作者：裴保民
--  发布时间：2020/3/6 17:18:00
--  
这一笔数据是默认值是选中了但为移动到第一行数据，和刚才的效果一样


图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20200306171513.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2020/3/6 18:11:24编辑过]
--  作者：有点蓝
--  发布时间：2020/3/6 20:18:00
--  
上传实例
--  作者：裴保民
--  发布时间：2020/3/6 20:37:00
--  
发现我在Enter事件中有代码影响的问题，目前已经解决