: ◆ From: 123.195.194.110 : 推 rushcat:写个sub包... 06/14 23:47 : 推 Peruheru:与其这样，写个字串阵列不是更容易吗? 06/15 00:21 把通用讯息摘出来的方法很正确，但是实行上还是有一些有趣处－所谓「有 趣」就是说不挡路的时候很有趣，其他时候则很可恨。 会注意到这个问题是因为我不久以前修改到一个网站的套件，当然不是VB的 但是当中的经验我想是共通的。 第一个套件是某个欧洲人写的， 不晓得他是德国还是哪里人，总之他套件里面的共用讯息变数就全都是看不 懂的名字。每个字母都看得懂，合在一起，除了"JA" "NEIN" 这种一个字的 单字之外，全都看不懂。 第二个套件更鲜，那是某个俄国人写的 可能为了避免以上那种语言的困扰吧，於是他所有的讯息变数都命名成这样 SHOWCASE_0109 = "Buy" SHOWCASE_0110 = "By credit card" SHOWCASE_0111 = "Automatically close ... ... 幸好他放出来的时候是英文版，否则根本改不动。而且这样比上面那种还要 糟糕，因为第一是除非有保留好原版语言档，否则有没有改错根本不知道； 第二是因为我也只看得懂英文版，所以信赖它，但是英文版翻过来的时候真 的有翻对吗？第三是如果修改的时候手误，打错一个数字，就无从校对起。 所以，如果要把讯息集中管理，那我会建议这样的方式 const MESG_FILE_INEXIST = "档案不存在" const MESG_FILE_CANTOPEN = "档案无法打开" ... 虽然还有英文这一重语言障碍，但这基本上是不能消灭的，起码自己也能看 懂。 或者这样 function mesg(mesgselector as string) select case mesgselector case "file_inexist" mesg = "档案不存在" case "file_cantopen" mesg = "档案无法打开" ... end select end function 再不然搞个directory来存，可以活用物件，大概是最好的方法。 但是如果这样 mesg(1) = "档案不存在" mesg(2) = "档案无法打开" ... 那就会发生跟那个俄国模组一样的问题。这不但很整人，自已日後也不容易 维护。 　 -- Google 关键字 : MPFC-TCP / 杀人笑话 / 包租婆也有过当罗莉的时候 Youtube关键字 : 脱衫脱裤 / 傻蛋奥运 / 宗教审讯 / 买张床 / 单车超人 / 讴歌金钱 *美发师登山队 http://tinyurl.com/dm6lh3 *Ypres 1914 http://tinyurl.com/b432jb [蒙帝派松正体中文计画] https://www.youtube.com/user/JamesBondXD --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 125.232.97.205