Foxtable(狐表) → 用户栏目 → 专家坐堂 → 不能写入全局代码


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

主题：不能写入全局代码
帅哥哟，离线，有人找我吗？
liguichuan
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：362 积分：3196 威望：0 精华：1 注册：2011/4/20 1:40:00 		  发帖心情 Post By：2012/7/21 16:08:00 [显示全部帖子]

Public Function 数据源()
        '-----定义语句
        Dim cmd2 As New SQLCommand
        '-----设置数据源
        cmd2.C
        '设置语句
        cmd2.CommandText = "Select GetDate()" '获取服务器时间
         cmd2.ExecuteScalar '返回服务器时间
End Function

 

 

您好，我试一下，如果你不定义任何的函数或是过程，你直接写是无法编译的，但是你写在函数或过程里就可以了，不信你添加上面代码中的红色部分。

 回到顶部
帅哥哟，离线，有人找我吗？
liguichuan
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：362 积分：3196 威望：0 精华：1 注册：2011/4/20 1:40:00 		  发帖心情 Post By：2012/7/21 16:32:00 [显示全部帖子]

 不懂你为什么这样写

[此贴子已经被作者于2012-7-21 16:34:47编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
liguichuan
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：362 积分：3196 威望：0 精华：1 注册：2011/4/20 1:40:00 		  发帖心情 Post By：2012/7/21 16:37:00 [显示全部帖子]

以下是引用lihe60在2012-7-21 16:34:00的发言：

Public cmd As new sqlcommand
Public ld As Date
Public s As String
Public Function 数据源()
'-----定义语句
'Dim cmd2 As New SQLCommand
'-----设置数据源
cmd.C
'设置语句
cmd.CommandText = "Select GetDate()" '获取服务器时间
ld= cmd.ExecuteScalar '返回服务器时间
ld=#12/31/2012#
s="12"
End Function

 

 

在命令窗口执行messagebox.show(s)，说s没有定义。  

那你不在命令窗口执行咯，你在某个按钮的事件下面执行一下看看，命令窗口有可能无法调用全局的变量也说不定。它好像只是一个测试窗口。
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04297 秒, 5 次数据查询