vb.net中的重复代码,如何写成模块(不是函数)重复调用?

时间:2022-06-28 14:02:45
我记得以前在c或者vb中,好像重复的代码可以写在宏中,然后在程序的其他模块中反复调用。

比如我在做aspx的时候,每个页面前面都有一个获取ip地址的模块,变量名也都一样,现在每个页面都要写一次,以后改动的话都要改一次,很麻烦,能不能在这个重复的代码写一次,以后各个地方调用?

或者各位大大有没有方法推荐,如何优化代码。谢谢!

11 个解决方案

#1


建 Module ,里面写获取ip地址的方法
http://msdn.microsoft.com/zh-cn/library/aaxss7da.aspx
  
*****************************************************************************
签名档: http://feiyun0112.cnblogs.com/

#2


引用 1 楼 feiyun0112 的回复:
建 Module ,里面写获取ip地址的方法
http://msdn.microsoft.com/zh-cn/library/aaxss7da.aspx
  
*****************************************************************************
签名档: http://feiyun0112.cnblogs.com/



谢谢斑竹,这个意思还是要调用函数吗?

我的需求是这样,比如在100个aspx页面中,都有这样几行代码


dim a as string    '100个aspx页面中这行都一样
dim b as string    '100个aspx页面中这行都一样
dim c as string    '100个aspx页面中这行都一样
c= a & b           '这一行开始,100个aspx页面都不一样


那么,我想把前三行一样的代码,放在某个地方比如xx,以后100个页面中哪里有出现这3行的,我就调用xx。
这里的xx肯定不是模块中的某个函数,好像是用 # 号来定义的,不知道以前是在c还是vb中有用过。








#3


重载 Page 所有页面的基类改成他

#4


好像好你的基类界面,然后继承过来.Inherits BaseForm.即可!

#5


引用 4 楼 fengqingtao2008 的回复:
好像好你的基类界面,然后继承过来.Inherits BaseForm.即可!


愿闻其详,其实就是告诉编译器,哪些代码可以替换为事先编辑好的代码段即可,然后编译前再替换

#6


顶啊顶,希望得到帮助

#7


你还在用面向过程的思维思考程序。
include这种几百年前就应该被摒弃的东西你居然还想找回来。

的确可以教你一些变通的技巧,但是希望你真正去学习下VB.NET。从头学起。

#8


引用 7 楼 caozhy 的回复:
你还在用面向过程的思维思考程序。
include这种几百年前就应该被摒弃的东西你居然还想找回来。

的确可以教你一些变通的技巧,但是希望你真正去学习下VB.NET。从头学起。


版主教育得极是,因为有十几年没写代码了,现在想先救救火,所以不得不面向过程先,还望帮助给一些变通的技巧,下不为例,谢谢!

#9


我说了办法有很多。但是如果你光看到它解决了问题而用,而不考虑后果。那么你很快会发现为了解决问题而引入了新的问题。那你更得就火了。

作为一个程序员,你应该明白,你所用的编程语言都没有搞清楚的情况下盲目修改和编码,你的所做和搞破坏其实也没有什么区别。

比如说,ls说的继承,这的确可以解决问题。起码是暂时的。但是VB只允许你继承一个基类。但是你include可以include好多。于是你下次想再“include”的时候,就发现不灵了。我还可以说出很多变通的方法,但是前提是你得先学会VB,否则这些问题都或多或少会给你带来新的问题。

#10


再钉,谢谢!

老毛桃唯一官方网站,现已开发出适应现阶段的U盘启动盘制作工具,让老毛桃传承经典,发扬光大。
http://www.laomaotao.net/?Z6015

#11


遇到类似代码重用的问题,楼主找到解决方法了吗?

#1


建 Module ,里面写获取ip地址的方法
http://msdn.microsoft.com/zh-cn/library/aaxss7da.aspx
  
*****************************************************************************
签名档: http://feiyun0112.cnblogs.com/

#2


引用 1 楼 feiyun0112 的回复:
建 Module ,里面写获取ip地址的方法
http://msdn.microsoft.com/zh-cn/library/aaxss7da.aspx
  
*****************************************************************************
签名档: http://feiyun0112.cnblogs.com/



谢谢斑竹,这个意思还是要调用函数吗?

我的需求是这样,比如在100个aspx页面中,都有这样几行代码


dim a as string    '100个aspx页面中这行都一样
dim b as string    '100个aspx页面中这行都一样
dim c as string    '100个aspx页面中这行都一样
c= a & b           '这一行开始,100个aspx页面都不一样


那么,我想把前三行一样的代码,放在某个地方比如xx,以后100个页面中哪里有出现这3行的,我就调用xx。
这里的xx肯定不是模块中的某个函数,好像是用 # 号来定义的,不知道以前是在c还是vb中有用过。








#3


重载 Page 所有页面的基类改成他

#4


好像好你的基类界面,然后继承过来.Inherits BaseForm.即可!

#5


引用 4 楼 fengqingtao2008 的回复:
好像好你的基类界面,然后继承过来.Inherits BaseForm.即可!


愿闻其详,其实就是告诉编译器,哪些代码可以替换为事先编辑好的代码段即可,然后编译前再替换

#6


顶啊顶,希望得到帮助

#7


你还在用面向过程的思维思考程序。
include这种几百年前就应该被摒弃的东西你居然还想找回来。

的确可以教你一些变通的技巧,但是希望你真正去学习下VB.NET。从头学起。

#8


引用 7 楼 caozhy 的回复:
你还在用面向过程的思维思考程序。
include这种几百年前就应该被摒弃的东西你居然还想找回来。

的确可以教你一些变通的技巧,但是希望你真正去学习下VB.NET。从头学起。


版主教育得极是,因为有十几年没写代码了,现在想先救救火,所以不得不面向过程先,还望帮助给一些变通的技巧,下不为例,谢谢!

#9


我说了办法有很多。但是如果你光看到它解决了问题而用,而不考虑后果。那么你很快会发现为了解决问题而引入了新的问题。那你更得就火了。

作为一个程序员,你应该明白,你所用的编程语言都没有搞清楚的情况下盲目修改和编码,你的所做和搞破坏其实也没有什么区别。

比如说,ls说的继承,这的确可以解决问题。起码是暂时的。但是VB只允许你继承一个基类。但是你include可以include好多。于是你下次想再“include”的时候,就发现不灵了。我还可以说出很多变通的方法,但是前提是你得先学会VB,否则这些问题都或多或少会给你带来新的问题。

#10


再钉,谢谢!

老毛桃唯一官方网站,现已开发出适应现阶段的U盘启动盘制作工具,让老毛桃传承经典,发扬光大。
http://www.laomaotao.net/?Z6015

#11


遇到类似代码重用的问题,楼主找到解决方法了吗?