请问如何将这两条代码融合到另外一个代码中 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

下载信息 [文件大小：下载次数： ]
点击浏览该文件:tw.txt

第一条

Dim p As WinForm.ProgressBar
p = e.Form.Controls("ProgressBar1")
p.Maximum = Tables("fa piao明细").Rows.Count '设置最大值
p.Minimum = 0 '设置最小值
p.Value = 0 '设置当前值

第二条

Dim c As Integer = 0
c=c+1
Messagebox.show("同步完成!共同步"&c&"条数据。","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

请问如何将第一条和第二条的代码融合到上面TXT文件的代码中，谢谢

主题：请问如何将这两条代码融合到另外一个代码中