Question

紧急求助一个VB问题!在线等!谢谢

刚做完一份VB做的记事本程序,在自己电脑上生成exe文件,运行良好,可传到了别人的机子上(没VB6.0的)却运行不了,文件大小,图标跟在我机子上都是一样的,这是为什么啊?谁能告诉我下 谢谢了
没明白~生成exe文件后不是就是应用程序了么,跟有没有VB应该无关了啊,我刚又试试以前做的程序给别人,就能运行

Answer 1

VB需要一个VB运行库msvbvm60.dll，
这个文件在你的C:\windows\system32文件夹下面，
如果其他机器没有，会提示，缺少msvbvm60.dll

如果你使用了其他部件，需要其他的你引用到的ocx控件都复制到新机器上，可以放在你程序同一目录下就可以运行

具体看你什么提示，和你用到的控件

楼主把提示发上来啊

Answer 2

晕，，其他机没vb当然运行不了啦，，你要vb带的那个打包工具，Package & Deployment 向导

Answer 3

没明白~生成exe文件后不是就是应用程序了么,跟有没有VB应该无关了啊,我刚又试试以前做的程序给别人,就能运行
回楼上的,我用的RichTextBox和Common Dialog两个部件
现在每次打开都提示"加载错误,详细内容参见'E:\记事本.log"
里边是"
行 14: 控件 CommonDialog1 的类 MSComDlg.CommonDialog 不是一个已加载的控件类。
行 21: 控件 RichTextBox1 的类 RichTextLib.RichTextBox 不是一个已加载的控件类。"
谁知道怎么回事怎么解决啊~谢谢你们了~
别人机子上运行写的是
"Component'RICHTX32.OCX or one of its dependencies not correctly registered:a file is missing or invalid"

Answer 4

第一个参见楼上的。其实可以简化为
IFint=iif(a
mod
2=0,True,False)
第二有个简单方法，就是使用反转函数。
if
str=StrReverse(Str)
then
msgbox
"yes"
else
no
endif
更简单点
yesorno=iif(str=StrReverse(Str),"True","false")