重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
点虐 应该提供了此类函数。如C#就有File.AppendAllText(filename,string)用于追加内容,File.ReadAllLine(filename)用于读取多行。
新民网站建设公司创新互联,新民网站设计制作,有大型网站制作公司丰富经验。已为新民近千家提供企业网站建设服务。企业网站搭建\成都外贸网站建设要多少钱,请找那个售后服务好的新民做网站的公司定做!
你的情况应该是窗体中嵌入子窗体吧:
主窗体.IsMdiContainer = True
Dim 子窗体 As New Form
子窗体.TopMost=False
子窗体.Show()
子窗体.MdiParent = 主窗体
如果不是嵌入窗体captain2005的回答应该没问题,或者你在被覆盖的窗体上:
子窗体.TopMost = True ‘将子窗体设为顶层显示
如果想继续编辑之前的文档,在TXT文件尾部继续添加文本,那么还需要在函数后边加个参数。
VB 代码
方法1:
Dim sw As StreamWriter = New StreamWriter("C:\temp\test.txt")
sw.Write("abc" vbCrLf)
sw.Close()
Dim sw2 As StreamWriter = New StreamWriter("C:\temp\test.txt", True)
sw2.Write("456" vbCrLf)
sw2.Close()
方法2:
My.Computer.FileSystem.WriteAllText("test.txt", "This is test Text", True)
方法3:
System.IO.File.AppendAllText("c:\temp\test.txt", "this is extra test file")
详见:“网页链接”
这个必须用控件的方法解决,VB6有个Line控件很容易解决这个问题,但是VB.NET没有了,幸好微软也想到了这个缺陷,提供免费的Visual Basic PowerPacks控件箱,其中有Line控件。
Visual Basic PowerPacks下载地址:
使用 LineShape 控件绘制直线: