{
int i
double ave=0.0,a[N]
for(i=0i<Ni++,h++)
{
a[i]=h//改为:a[i]=h->s
}
for(i=0i<Ni++,h++)
{
ave+=a[i]/N
}
printf("%lf",ave)
return ave
}
对于没有加壳的程序,
用 ResHacker 或者 eXescope。
修改一个叫“版本信息”的资源。
对于加壳的程序,如果无法脱壳,可以用 FreeRes 先把资源分离出来,再修改。
可以写一个配置文件或者文本文件放在同目录下,里面存有这个EXE文件的路径(变量)参考源码:
在窗体上建一个text 和一个 command 复制下面的代码 运行 你就明白了..
Private Sub Command1_Click()
Dim f As String
f = App.Path &"\配置文件.txt"
Open f For Output As #1
Print #1, Text1.Text 'text内容为软件的路径
Close #1
Print "软件路径已经设置为 " &Text1.Text
End Sub
Private Sub Form_Load()
On Error GoTo eErr
Dim f As String, s As String
Command1.Caption = "设置路径"
f = App.Path &"\配置文件.txt"
Open f For Input As #1
Line Input #1, s
Text1.Text = s
Close #1
Exit Sub
eErr:
If Err.Number = 53 Then
Text1.Text = "软件路径还为设置,请先设置路径"
End If
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)