google搜索 站内搜索                 软件测试门户 | 软件测试培训 | 文章资料精选 | 软件测试论坛 | 测试解决方案 | 软件测试博客 | 测试招聘求职 
打印

[求助] 自建sbl库 重复定义的问题

自建sbl库 重复定义的问题


想加入一个文件,用于保存通用函数。
步骤:
1. 在\SQABas32下建立test_release.sbh
加入函数声明:
Declare Function GetRandomName Basiclib "release_test" (nLength As Integer) as String

2. 在\SQABas32下建立release_test.sbl
加入函数实现:
'$Include "test_release.sbh"
Function GetRandomName(nLength As Integer) as String
GetRandomName = "111"
End Function

3. 使用库
加入'$Include "test_release.sbh"
然后调用函数
Dim strName as String
strName = GetRandomName(111)

但是,编译错误:(
release_test.sbl(3) Error: Redefinition of procedure 'GetRandomName'
release_test.sbl(5) Error: Can't assign value to function: GetRandomName

哪里不对劲呢?

TOP

不需要include release_test.sbl?

TOP

不管是否加include release_test.sbl? 都报重复定义的错:(

TOP

算了,实现也写在头文件里得了。

TOP

你可以将所有定义全部放在一个头文件中,将实现分在不同的sbl中,并且在sbh中include各个sbl文件。

TOP

在你的release_test.sbl省略 '$Include "test_release.sbh"
学习在51,生活在51,工作在51,创业在51...

TOP

 
当前时区 GMT+8, 现在时间是 2008-12-5 16:56Copyright(C)上海博为峰软件技术有限公司 2001-2007 电话:021-64471599-8017
当您在访问网站、论坛及博客过程中遇到问题时可发送email:webmaster@51testing.com或发送论坛短信至管理员风在吹