vb高手看一下,我不知错在那,无法生成exe

来源:百度知道 编辑:UC知道 时间:2024/06/24 09:08:04
代码太长贴不进去,请连系我

我也遇到过这种情况的。
你之前有编译过吗?如果代码没错的话,那么只有一种可能,那就是你之前生成exe了,你把之前的exe删掉,再生成一个新的exe吧。如果提示无法删除,你就先结束之前的exe任务。你最好把代码分成几部分发来看看哈。
在我这边帮你重新编译了一下,是可以生成exe文件呀,没有发现问题的。

你传到一个空间或者论坛里,再给地址我们看.

要么是代码有错误,要不就是你用的是生成软件的那个文件损坏了,重装一下

我以前出过一种问题,是生不成exe的。原因也不知道。代码贴出来共享。
Dim c As Long

Private Sub Command1_Click()
CreatNum:
c = Int(100 * Rnd + 1)
Label1.Caption = " 快来猜猜吧。"

End Sub

Private Sub Command2_Click()
GussNum:
b = Val(InputBox("please input a int(1-100)", "GUSSNUM"))
Select Case b
Case Is = "":
MsgBox "please input a number"
Command2.SetFocus
Case Is > 100 Or b < 0:
MsgBox "please input a number in right size"
Command2.SetFocus
Exit Sub
Command2.SetFocus
Case c:
MsgBox "CONGRATIULATIONS!!!!"
Label1.Caption = "The Number is:" & c & " !"
Command1.SetFocus