Foxtable(狐表)用户栏目专家坐堂 → 零起点学习一天,上交作业


  共有2600人关注过本帖树形打印复制链接

主题:零起点学习一天,上交作业

帅哥哟,离线,有人找我吗?
dlywz
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:21 积分:255 威望:0 精华:0 注册:2015/4/23 16:21:00
零起点学习一天,上交作业  发帖心情 Post By:2015/5/14 14:00:00 [只看该作者]

 

(一)建立学员信息表

1、双击打开软件,出现表A、表B、表C

2、单击选择表A,单击选择数据表(功能区),单击重命名,在对话框中“请输入新的表名处”输入“学员信息表”,单击确定

3、选择“学员信息表”,单击“其他”“查看表结构”,双击“第一列”,在更改列对话框中,输入新的列名为“学员编号”,“新的数据类型选择“字符”,字符长度选择“5”,之后依次修改为

列名

类型

长度


学员编号

字符

5


学员姓名

字符

5


学员姓名助记码

字符

5

学员信息表处于选定状态,选择表属性,事件,数据,DataColChanged,右侧图标,打开代码编辑器,复制粘贴以下代码,确定

If e.DataCol.Name = "学员姓名" Then

    If e.NewValue = Nothing Then

        e.DataRow("学员姓名助记码") = Nothing

    Else

        e.DataRow("学员姓名助记码") = GetPy(e.NewValue, True)

    End If

End If

性别

字符

1

选择性别列,列属性,字典,标准,数据字典选项卡下,数据列输入1,对应显示值“男”,2对应显示值女,点确定

学员联系方式

字符

11

第五列列名输入“学员联系方式_方式1”

第六列列名输入“学员联系方式_方式2”


(二)创建学员信息窗体

1、单击“增加表”,在打开的增加表窗口中,单击第一列,然后点击删除列,保留第十列,并改名为“学员信息主窗口”,点确定,表名输入“学员信息主窗口”,确定。回到“学员信息主窗口表”,多选2至9行,右键,删除。

2、单击管理项目,窗口管理,增加窗口,“学员信息主窗口”,选择并设计窗口,“属性”,所有者表和窗口标题为“学员信息主窗口”,窗口类型选择“主窗口”,图标选择icon格式图,北京颜色选bisque

3、添加Table(表)控件,属性栏名称输入“学员信息表”,绑定表选择“学员信息”,锚定选择Top,Lelt,停靠选择right

4、添加Button控件,属性,名称和标题为“学员信息”,字体改为“微软雅黑”“加粗”,双击此按钮,进入代码编辑器,Click代码输入区输入Tables("学员信息表").DataTable.Load()

确定,文件,预览

5、添加Button控件,属性,名称和标题为“新增学员”,字体字体改为“微软雅黑”“加粗”,双击此按钮,进入代码编辑器,Click代码输入区输入Tables("学员信息表").AddNew()

6、添加Button控件,属性,名称和标题为“删除学员”,字体字体改为“微软雅黑”“加粗”,双击此按钮,进入代码编辑器,Click代码输入区输入Tables("学员信息表").Current.Delete


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/5/14 14:01:00 [只看该作者]

图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
dlywz
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:21 积分:255 威望:0 精华:0 注册:2015/4/23 16:21:00
  发帖心情 Post By:2015/5/14 14:15:00 [只看该作者]

这个学习过程太累了,还是希望官方退出一个真正完整的开发实例

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/5/14 14:17:00 [只看该作者]


 回到顶部