大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
可以,给你个思路,将2个exe文件写入资源文件中
成都创新互联专注于观山湖网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供观山湖营销型网站建设,观山湖网站制作、观山湖网页设计、观山湖网站官网定制、小程序制作服务,打造观山湖网络公司原创品牌,更为您提供观山湖网站排名全网营销落地服务。
VB写的程序,可以在form
load事件中..
先从资源文件中释放2个exe文件,比如写在apppath目录中,1.exe和2.exe
shell
"1.exe",1
shell
"2.exe",0
这样,第1个程序是显示出来运行了..第2个程序就在后台运行.不显示出来
,注意后面的参数。
以一个项目为基础,在其工程上点右键,选添加,现有项,然后选择另外两个项目里的文件,用这种方式把所有的都添加上就行了
在你要引入的文件或文件夹上点右键,选包括在项目中
下次直接追问,要不我看不到
Private Sub Command1_Click()
'将源文件中的内容导入目标文件中
Open "D:\1.txt" For Append As #1 '打开目标文件
Open "D:\2.txt" For Input As #2 '打开源文件
While Not EOF(2)
Line Input #2, temp
Print #1, temp
Wend
Close #1
Close #2
End Sub
你需要先弄一个文本框
把T1.TXT和T2.TXT的内容读进去
用一个按钮事件 读取文件T1.TXT和T2.TXT
Dim OpenFileDialog As New OpenFileDialog
Dim f As System.IO.FileStream
Dim r As System.IO.StreamReader
OpenFileDialog.Filter = "文本文件(*.txt)|*.txt|所有文件(*.*)|*.*"
If (OpenFileDialog.ShowDialog() = System.Windows.Forms.DialogResult.OK) Then
Dim FileName As String = OpenFileDialog.FileName
f = New System.IO.FileStream(FileName, IO.FileMode.Open, IO.FileAccess.Read)
r = New System.IO.StreamReader(f)
TextBox1.Text += r.ReadToEnd
r.Close()
End If
另一个按钮保存 TextBox1.Text
Dim w As System.IO.StreamWriter
Dim f As System.IO.FileStream
Dim FileName As String
If (SaveFileDialog.ShowDialog(Me) = System.Windows.Forms.DialogResult.OK) Then
SaveFileDialog.FileName=T3.TXT
FileName = SaveFileDialog.FileName
f = New System.IO.FileStream(FileName, IO.FileMode.Create, IO.FileAccess.Write)
w = New System.IO.StreamWriter(f)
w.Write(textbox.Text)
w.Close()
End If
以追加方式打开student I.dat
以只读方式打开另外两个文件,
然后用循环把读读到的,写入
student I.dat文件。