主题：表的字段

1、数据库人员表中字段都是英文的

2、查询功能中有一个需求，字段：组合框，组合框里面列出了姓名，年龄，性别等

3、如选择了姓名，但是数据库中对应的是name,查询表中的列名也是name,

如何让它显示成中文

此主题相关图片如下：1.png

 

Dim cs As String = ""
With e.Form.Controls("cmb")
      cs= .Value
End With

Dim jb1 As New SQLJoinTableBuilder("查询表1","person")
jb1.C
'jb1.AddCols("name", "sex","retireTime")
For Each s As String In cs.split(",")
    jb1.AddExp(s, s)
Next
jb1.Filter = Filter

 

1、用户字段选择了姓名、性别

2、红色语句提取到的是{姓名、性别}

3、蓝色语句实际应该输入的参数是数据库的字段{name,sex}

 

如何让用户输入汉字，但是能契合到数据库里面的name?

 

不是，最主要的是用户输入的中文，代码中要用到英文，怎么使得中文和英文一一对应

懂了

Dim cs1() = {"姓名", "性别", "年龄","身份证号","出生年月","联系电话","籍贯","民族","学历","健康状况","参加工作时间","政治面貌","兴趣爱好","离退休职务","享受待遇","地址",
             "状态","离退休时间","专业技术职务","专业特长","所在党支部","入党时间","个人成分","单位","党龄","离退休所在部门"}
Dim cs2() = {"name", "sex", "age","cardID","birth","birth","tel","jiguan","rational","edu","health","workdate","politicalStatus","hobbies","retiredPost","title","address",
             "leaOrRetire","retireTime","proTecPost","proSpecialty","partyBranch","partyTime","presonalClass","organName","partyStanding","retiredDep"}

 

这俩句有错提示应该是表达式

您好，如何让生成的查询表都居中？

此主题相关图片如下：1.png

通过这种方式生成的查询表居中？该如何设计

不好意思，是我没有表达清楚。

 

1、这是调整后居中的

此主题相关图片如下：2.png

 

2、这是生成的表

此主题相关图片如下：3.png

 

我其实就希望在代码里面既可以设置生成的表中的列都居中

此主题相关图片如下：1.png

Dim jb2 As New SQLJoinTableBuilder("查询表1","history")
jb2.C
For Each s As String In cs.split(",")
     Dim i = array.Indexof(cs1, s)
        jb2.AddExp(s,cs2(i))
Next
jb2.Filter = Filter

jb1.Union(jb2)
jb1.Build

For Each r As DataCol In jb1.DataRows

         r.TextAlign = TextAlignEnum.Center
Next

想实现jb1的所有列居中功能

 

此主题相关图片如下：1.png