VB运行时,菜单中点击“Open”控件显示“子程序或函数未定义”
答案:3 悬赏:70 手机版
解决时间 2021-02-15 19:25
- 提问者网友:愿为果
- 2021-02-14 22:50
VB运行时,菜单中点击“Open”控件显示“子程序或函数未定义”
最佳答案
- 五星知识达人网友:白昼之月
- 2021-02-14 23:02
Private Sub Open_Click() ‘每次点击"open"时都会蹦出来一小框“子程序或函数未定义”
Data1.DatabaseName = F: 实验九 "\student.mdb"
Data1.RecordSource = "基本情况"
Data1.Refresh
End Sub你的这段代码中的这句话Data1.DatabaseName = F: 实验九 "\student.mdb"
有错误,传的是字符串应该Data1.DatabaseName =" F: \实验九\student.mdb"这样才把数据库的名字赋给它.另外Private Sub Open_Click() ‘每次点击"open"时都会蹦出来一小框“子程序或函数未定义”
msgbox "Hello"'Data1.DatabaseName = F: 实验九 "\student.mdb"
'Data1.RecordSource = "基本情况"
'Data1.Refresh
End Sub
你再把这3句注释一下,只加一个msgbox看看执行还出那个窗口么,如果不出就是里边的代码错误了,再把刚刚那句错了的语句改了试试看,有问题可以继续讨论
Data1.DatabaseName = F: 实验九 "\student.mdb"
Data1.RecordSource = "基本情况"
Data1.Refresh
End Sub你的这段代码中的这句话Data1.DatabaseName = F: 实验九 "\student.mdb"
有错误,传的是字符串应该Data1.DatabaseName =" F: \实验九\student.mdb"这样才把数据库的名字赋给它.另外Private Sub Open_Click() ‘每次点击"open"时都会蹦出来一小框“子程序或函数未定义”
msgbox "Hello"'Data1.DatabaseName = F: 实验九 "\student.mdb"
'Data1.RecordSource = "基本情况"
'Data1.Refresh
End Sub
你再把这3句注释一下,只加一个msgbox看看执行还出那个窗口么,如果不出就是里边的代码错误了,再把刚刚那句错了的语句改了试试看,有问题可以继续讨论
全部回答
- 1楼网友:毛毛
- 2021-02-15 00:59
根据子菜单的标识名写个过程
- 2楼网友:旧脸谱
- 2021-02-14 23:39
你好!
这就要看你要实现什么功能了 而且你的原程序没给别人看 怎么知道你的函数是怎样的函数呢
仅代表个人观点,不喜勿喷,谢谢。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯