表事件中如何根据逻辑列“性别”添加IF语句 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 表事件中如何根据逻辑列“性别”添加IF语句

共有2433人关注过本帖树形打印复制链接主题：表事件中如何根据逻辑列“性别”添加IF语句

hyowl

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：52 积分：537 威望：0 精华：0 注册：2016/3/24 11:13:00

表事件中如何根据逻辑列“性别”添加IF语句 发帖心情

Post By：2016/4/15 23:12:00 [只看该作者]

老师好，信息表中性别_中文为逻辑列，现要求在增加行时，如果“性别_中文"为”男“，则”性别_英文“自动填上”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编辑过]

hyowl

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：52 积分：537 威望：0 精华：0 注册：2016/3/24 11:13:00

Post By：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

[此贴子已经被作者于2016/4/16 7:33:43编辑过]

Hyphen

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：5015 积分：25363 威望：0 精华：0 注册：2015/8/18 9:21:00

Post By：2016/4/16 10:18:00 [只看该作者]

Dim p As String = GetPy("刘诗诗")

Output.Show(p(0).Tostring().ToUpper & p.SubString(1))

hyowl

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：52 积分：537 威望：0 精华：0 注册：2016/3/24 11:13:00

Post By：2016/4/16 15:57:00 [只看该作者]

非常感谢！

下一主题 >> << 上一主题

主题：表事件中如何根据逻辑列“性别”添加IF语句