收录日期:2018/12/11 22:05:11 时间:2016/05/18 03:13:53 标签:数据库(包含打印,安装,报表)
Option Explicit
Private g_DB As Database

Private Sub MDIForm_Load()
   Set g_DB = OpenDatabase("e:\城市企业评价\zbgl.mdb", False, False)
End Sub

Private Sub MDIForm_Unload(Cancel As Integer)
   g_DB.Close
   Set g_DB = Nothing
End Sub
Private Sub mnuEIfactorEdit_Click()
   Dim frmNew As New frmView
   frmNew.showdata objDB:=g_DB, _
      frmCaller:=Me, _
      sTableName:="zbgl", _
      sItemSingular:="指标管理", _
      sItemPlural:="指标管理", _
      sViewQuery:="qryList", _
      sIDField:="zbbm"

End Sub
这里的“objDB:=g_DB”是什么意思?
就是付值了,看这个例子:
4.1如何使用命名变元

option explicit

private sub formcolor(red,green,blue)
  backcolor = rgb(red * 256,green*256,blue*256)
end sub

private sub form_click()
  formcolor blue:=0,green:=0.5,red:=1
end sub
可以改变传递参数的顺序
那为什么不直接用“=”这个符号?“=”就代表赋值的呀?

[求助]关于dhcp relay的问题 BCB开发的Dll为何到delphi下使用,函数名前要加下划线? WIN2000server密码忘记了如何办 关于数据绑定的问题 如何按特定的规格差分字符串 c#访问oracle存储过程问题: eclipse入门级标准问题 数据库编程出现下面错误,何解?谢谢. 一个超级头痛的问题 键盘钩子的问题 请教数组访问速度的问题 ODBC操作数据库问题,急…… 请问怎样可以获取客户端是那一个国家的,然后自动跳转到指定页面呢?(急) Microsoft SQL数据库当前进程数量大是否对数据库性能有影响 页面重复打开时缓存互相覆盖的问题? 求最新pd详细帮助(不是E文的) 关于SWT/JFace开发问题 ?? gridview 在首列添加了radiobutton 后单选的问题如何解决 求一正则表达式: access中sql插入语句参数化的使用? 微软输入法不能输入中文了?怪... 循环中哪一种写法更好? I learned today-20060519 sos adotable not in edit or insert mode 关于Com组件的Id号,如何得到? 动态修改对话框Style的问题 为什么java -D 老是不正确,请指教 如何用ASP连接POSTGRESQL??? 求在sh文件中怎样得到系统时间的年月日 最近网络突然变慢了,不知道彼回事