- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 表事件中如何根据逻辑列“性别”添加IF语句 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83758)
-- 发布时间：2016/4/15 23:12:00
-- 表事件中如何根据逻辑列“性别”添加IF语句
老师好，信息表中性别_中文为逻辑列，现要求在增加行时，如果“性别_中文"为”男“，则”性别_英文“自动填上”Male“，否则填上”Female“，该如何实现？
我在表事件DataRowAdding中增加以下代码为什么是错误的：
If e.DataRow("性别_中文")="男" Then
e.DataRow("性别_英文")="Male"
Else
e.DataRow("性别_英文")="Female"
End If
此主题相关图片如下：qq截图20160415230907.png
[此贴子已经被作者于2016/4/15 23:13:58编辑过]
-- 发布时间：2016/4/16 6:04:00
--
想到了，应该是true！另外，当输入姓名_中文后，如何把对应的拼音填入姓名_英文,并且首字母大写？如输入姓名_中文：刘诗诗，那么在姓名_中文栏自动填入Liushishi
如果用以下getpy()函数的话，首字母是小写的，如何把首字母改为大写？
If e.DataCol.Name = "名称" Then
If e.DataRow.IsNull("名称") Then
e.DataRow("字母") = Nothing
Else
e.DataRow("字母") = GetPy(e.DataRow("名称"))
End If
End If
If e.DataRow.IsNull("名称") Then
e.DataRow("字母") = Nothing
Else
e.DataRow("字母") = GetPy(e.DataRow("名称"))
End If
End If
[此贴子已经被作者于2016/4/16 7:33:43编辑过]
-- 发布时间：2016/4/16 10:18:00
--
Dim p As String = GetPy("刘诗诗")
Output.Show(p(0).Tostring().ToUpper & p.SubString(1))
-- 发布时间：2016/4/16 15:57:00
--
非常感谢！