01物料信息模块doc

 

01物料信息模块doc

名称:删除) 双击“删除”按钮——输入代码: If MessageBox.Show(是否删除?,) 出席“按钮”控件——树立“属性”(名称:导入;第1步 [1]新修“企业音信体例”项目 掀开Foxtable软件,如第1步中的图所示: 出席“文本框”控件——树立“属性”(名称:物料编号) 出席“标签”控件——树立“属性”(文本:物料编号:) 出席“文本框”控件——树立“属性”(名称:型号规格) 出席“标签”控件——树立“属性”(文本:型号规格:) 出席“按钮”控件——树立“属性”(题目:盘查;名称:盘查) 双击“盘查”按钮——输入代码: Dim cj As WinForm.ComboBox = e.Form.Controls(厂家) Dim wlmc As WinForm.ComboBox = e.Form.Controls(物料名称) Dim wlbh As WinForm.TextBox = e.Form.Controls(物料编号) Dim xhgg As WinForm.TextBox = e.Form.Controls(型号规格) Tables(物料音信外).Filter=供货厂家 = & cj.Text & and 物料名称 like * & wlmc.Text & * and 物料编号 like * & wlbh.Text & * and 型号规格 like * & xhgg.Text & * 代码输入告终后——确定 文献——预览——是——验证是否能遵循分歧的盘查条目实行盘查 第13步 [12412]下面办理从头掀开窗口时显示悉数记载的题目 遴选“物料音信外(窗口)”——遴选“事宜”——点进“AfterLoad”——出席新的代码(蓝色底纹标帜): Dim cj As WinForm.ComboBox = e.Form.Controls(厂家) cj.ComboList = DataTables(物料音信外).GetComboListString(供货厂家) Tables(物料音信外).Filter = 代码输入告终后——确定 文献——预览——是——验证是否显示悉数记载 第14步 [12785]下面竣工“全盘”显示,数据类型:单精度小数——确定 双击第五列——列名:单元——确定 双击第六列——列名:供货厂家——确定 双击第七列——列名:备注音信;为知道决这一题目,

名称:盘查条目) 出席“组合框”控件——树立“属性”(名称:厂家) 出席“标签”控件——树立“属性”(文本:厂家:) 第10步 [5568]现正在编写事宜代码 遴选“物料音信外(窗口)”——遴选“事宜”——点进“AfterLoad”——输入代码:trols(厂家) cj.ComboList = DataTables(物料音信外).GetComboListString(供货厂家) 代码输入告终后——确定 文献——预览——是——验证是否能显示分歧的厂家 第11步 [6352]接连告终“复合盘查”,如第1步中的图所示: 出席“按钮”控件——树立“属性”(题目:全盘;再实行验证。不预览、不比对实质而直接下载出现的后悔题目本站不予受理。物料信息整行卓越:True) 文献——预览——是——验证是否有用果 封闭“物料音信外”窗口——封闭“窗口打算器”窗口——封闭“窗口收拾”窗口 遴选“物料音信外”——数据外——外样式——配色计划——瓜代行(配景颜色:LightGray)——确定 MAIN——收拾项目——窗口收拾——遴选“物料音信外”——运用窗口——查看一下功效 第18步 [16381]下面显示所必要的字段 收拾项目——窗口收拾——物料音信外——打算窗口 外——树立“属性”(显示列:物料编号100物料名称100供货厂家80型号规格200单元40单价50) 文献——预览——是——查看一下功效 证明:要是感应“备注音信”列太占宽度,) 双击“导入”按钮——输入代码 提示:正在“助助”文献的“探求”中输入“Merger”——回车后双击“Merger”——找到“示例七”对应的代码: Dim mg As New Merger mg.SourcePath = c:\data\贩卖收拾.xls mg.Format = excel 指定体例 mg.SourceTableName = 订单 指定要归并的外 mg.DataTableName = 订单 指定接受数据的外ge() 开端归并 将上面的代码删改成: Dim mg As New Merger mg.SourcePath = c:\物料音信.xls mg.Format = excel 指定体例 mg.SourceTableName = 物料音信 指定要归并的外 mg.DataTableName = 物料音信外 指定接受数据的外 mg.Merge() 开端归并 将“物料音信”外复制一份存放到C盘 代码删改告终后——确定 文献——预览——是——导入——封闭窗口 第6步 [2653]向窗口增添“新增”控件,MessageBoxIcon.Question) =DialogResult.OK Then Tables(物料音信外).Current.Delete End If 代码输入告终后——确定 文献——预览——是——验证删除时是否有提示 第9步 [5130]下面竣工“复合盘查”,题目:导入;能够去掉。将某一物料名称删改一下,然后删除 第20步[17494]下面新修“物料音信”菜单 封闭“物料音信外”窗口——封闭“窗口打算器”窗口——封闭“窗口收拾”窗口 收拾项目——菜单打算——点进“效力区(群集)…” 推广——题目:我的职业台——点进“效力组(群集)…” 推广——题目:根本原料——点进“项目(群集)…” 推广——模范按钮——题目:物料音信——点进“大图标”,遴选“legend.png” 遴选“事宜”——点进“Click”——输入代码:Forms(物料音信外).open——确定——确定(效力组1 – 项目)——确定(效力区1 – 效力组)——确定(效力区)——确定(RibbenMenu打算器) 点击“物料音信”菜单按钮可查看功效 第21步 [18261]下面竣工“封闭”,数据类型:备注——确定 删除第八、九、十列 封闭“查看外布局”窗口 数据外——重定名——物料音信外——确定 删除“物料音信外”中悉数空行 第3步 [1146]新修“MAIN”外 数据外——推广外——确定——请输入外名:MAIN——确定 删除“MAIN”中的悉数空行 数据外——其它——查看外布局 删除前面九列——保存“第十列” 双击第十列——列名:MAIN——确定 封闭“查看外布局”窗口 将“MAIN”拖到“物料音信外”的左边 第4步 [1420]新修“物料音信外”窗口 收拾项目——窗口收拾——推广窗口 窗口名称:物料音信外——确定 选中“物料音信外”——打算窗口 将“窗口”拖大一点——树立“属性”(窗口题目:物料音信外;如第1步中的图所示: 按Ctrl+Shift+F12可返回体例菜单 收拾项目——窗口收拾——物料音信外——打算窗口 出席“按钮”控件——树立“属性”(题目:封闭;新修一个项目 本集要竣工的界面功效如下图所示: 第2步 [250]新修“物料音信外” 删除外B、外C 数据外——删除外 数据外——其它——查看外布局 双击第一列——列名:物料编号——确定 双击第二列——列名:物料名称——确定 双击第三列——列名:型号规格;记载窗口中的“备注音信”也随之去掉了。确认,名称:封闭) 双击“封闭”按钮——输入代码:Forms(物料音信外).close——确定 文献——预览——是——查看一下功效 第22步 [18484]下面办理封闭时直接留存的题目 双击“封闭”按钮——删改代码如下(蓝色底纹标帜): If DataTables(物料音信外).HasChanges Then DataTables(物料音信外).Save End If Forms(物料音信外).Close 代码输入告终后——确定 文献——预览——是——验证一下是否有用果 第1集 物料音信模块(共 6 页 第 5 页) 共 6 页 第 5 页请自发固守互联网合连的策略原则!

合同管理) 第12步 [9003]接连告终“复合盘查”,MessageBoxButtons.OKCancel,绑定外:物料音信外;如第1步中的图所示: 出席“组合框”控件——树立“属性”(名称:物料名称) 出席“标签”控件——树立“属性”(文本:物料名称:) 遴选“物料名称”组合框——遴选“事宜”——点进“Enter”——输入代码: Dim cj As WinForm.ComboBox = e.Form.Controls(厂家) Dim wlmc As WinForm.ComboBox = e.Form.Controls(物料名称) wlmc.ComboList = DataTables(物料音信外).GetComboListString(物料名称,能够实行如下操作: 第19步 [17032] 封闭“物料音信外”窗口——封闭“窗口打算器”窗口——封闭“窗口收拾”窗口 遴选“物料音信外”——右击任一列——撤消隐匿列——勾上“备注音信”选项——确定 右击“备注音信”列——列属性——记载窗口(正在记载窗口显示:True)——确定 MAIN——收拾项目——窗口收拾——遴选“物料音信外”——打算窗口 文献——预览——是——查看一下功效——能够测验通过“记载窗口”新增一条记载,苛禁揭橥色情、暴力、反动的议论。如第1步中的图所示: 出席“外”控件——树立“属性”(停靠:右——拖到左边一点;如将“JAT”厂家的“车把”改成“车把111”,调度好场所和巨细——树立“属性”(绑定外:物料音信外) 文献——预览——是——验证切换到分歧记载时,1.本站不担保该用户上传的文档完美性,如第1步中的图所示: 收拾项目——窗口收拾——物料音信外——打算窗口——封闭“窗口收拾” 出席“删除”控件——树立“属性”(题目:删除;名称:导出) 复制一份“物料音信”外(模板)到桌面上 封闭“窗口打算器”窗口——封闭“窗口收拾”窗口 打印输出——报外收拾(Excel)——推广——点进“模板文献”——找到桌面的“物料音信”外模板——标的文献:物料音信.xls——确定 收拾项目——窗口收拾——遴选“物料音信外”——打算窗口 双击“导出”按钮——输入代码: (提示:正在“助助”文献的“探求”中输入“基于模板”——回车后双击“基于模板”——找到对应的代码) Dim Book As New XLS.Book(ProjectPath & Attachments\物料音信.xls) Dim fl As String = ProjectPath & Reports\物料音信.xls Book.Build() 天生细节区 Book.Save(fl) 留存职业簿 Dim Proc As New Process 掀开职业簿 Proc.File = fl Proc.Start() 代码输入告终后——确定 文献——预览——是——验证是否能导出所遴选的物料音信 第16步 [15372]下面增添“记载窗口”控件,名称:新增) 双击“新增”按钮——输入代码: Tables(物料音信外).AddNew 代码输入告终后——确定 文献——预览——是 输入极少数据,验证“新增”按钮是否有用 第7步 [3052]接下来办理防卫“物料编号”反复输入的题目 封闭“物料音信外”窗口——封闭“窗口打算器”窗口——封闭“窗口收拾”窗口 遴选“物料音信外”——右击“物料编号”列——列属性(禁止反复:True)——确定 遴选“MAIN”——收拾项目——窗口收拾——物料音信外——运用窗口 验证反复输入的题目是否办理 按“ESC键”撤消——封闭“物料音信外”窗口 第8步 [3403]向窗口增添“删除”控件,然而,是否能正在记载窗口显示分歧的数据 封闭“物料音信外”窗口——封闭“窗口打算器”窗口——封闭“窗口收拾”窗口 遴选“物料音信外”——右击“备注音信”列——列属性——行高倍数:2——确定 收拾项目——窗口收拾——物料音信外——打算窗口 文献——预览——是——验证备注音信是否能显示两行数据 第17步 [15993]下面做一个隔行交织显示的功效 遴选“外”——树立“属性”(选定行配景颜色:LightSkyBlue;锚定:全盘选上。

如第1步中的图所示: 出席“记载窗口”控件,窗口类型:主窗口) 第5步 [1582]向窗口增添合连“控件”,名称:全盘) 双击“全盘”按钮——输入代码: Dim cj As WinForm.ComboBox = e.Form.Controls(厂家) Dim wlmc As WinForm.ComboBox = e.Form.Controls(物料名称) Dim wlbh As WinForm.TextBox = e.Form.Controls(物料编号) Dim xhgg As WinForm.TextBox = e.Form.Controls(型号规格) cj.Text = wlmc.Text = wlbh.Text = xhgg.Text = Tables(物料音信外).Filter = 代码输入告终后——确定 文献——预览——是——验证是否清空并显示全盘记载 第15步 [13403]下面竣工“导出”,供货厂家= & cj.Text & ) 代码输入告终后——确定 文献——预览——是——验证是否能显示分歧的物料名称(提示:为了能看到功效,用户名:验证码:匿名?公布评论如第1步中的图所示: 出席“按钮”控件——树立“属性”(题目:新增;如第1步中的图所示: 出席“按钮”控件——树立“属性”(题目:导出;如第1步中的图所示: 出席“分组框”控件并调度好巨细——树立“属性”(题目:盘查条目;字符长度:50——确定 双击第四列——列名:单价。※■◆※■◆※■◆咻呙咽咻呙咽咻呙咽咻呙咽啙啚啛啙啚啛啙啚啛呚呛呜呚呛呜啐啑啒啐啑啒啐啑啒嘃嘄嘅嘃嘄嘅嘃嘄嘅噒嘘噔噒嘘噔噒嘘噔噒嘘噔嘉嘊嘋嘉嘊嘋嘉嘊嘋