重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
vb.net里有个,可以做历史记录的,象google那样的.
成都创新互联公司长期为千余家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为武乡企业提供专业的成都网站建设、网站制作,武乡网站改版等技术服务。拥有十余年丰富建站经验和众多成功案例,为您定制开发。
vb6只是存到别处,下次一行行的读取然后 combo.additem 内容即可
例:注册表
Private Sub Form_Load()
AddandLoad ""
End Sub
Private Sub Combo1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 And Shift = 0 Then
AddandLoad Combo1.Text '先在这里触发了,如果你要在别处,只要移动这一行
End If
End Sub
Sub AddandLoad(ByVal s As String)
Dim s1 As String
Dim i As Long
Dim b As Boolean
Do
i = i + 1
s1 = GetSetting(App.Title, "history", "h" i, "")
If Len(s1) = 0 Then Exit Do
b = b Or LCase(s) = LCase(s1)
Me.Combo1.AddItem s1
Loop
If Not b Then
If Len(s) 0 Then
SaveSetting App.Title, "history", "h" i, s
Me.Combo1.AddItem s
End If
End If
End Sub
保存文件的步骤为:
关闭流,特别是写入流
关闭并保存文件
示例代码如下:
Imports System.Windows.Forms
Imports System.IO
Imports System.Text
Sub SaveFileDemo()
'打开文件。如果文件不存在则创建新的文件
Dim myFile As New IO.FileStream("d:\data.txt", _
FileMode.OpenOrCreate, _
FileAccess.Write)
'在文件末尾添加一行
Dim tw As New StreamWriter(myFile)
myFile.Seek(0, SeekOrigin.End)
tw.WriteLine("白刃格斗英雄连英模部队方队亮相阅兵")
'关闭流
tw.Close()
'关闭文件并保存文件
myFile.Close()
End Sub
我用的是火狐浏览器,点击“工具-选项-隐私-历史:Firefox将会:使用自定义历史记录(选中)——”记录查询和表单历史“不选中即可
有不是多线程的,.NET有一个异步控件来完成这个事情,BackgroundWorker。
多线程其实比你想象的简单,你计划操作步骤,打比方说我们处理一个文件,用进度条来显示进度。我们可以定义解压他进度为5%,解密文件后哦进度完成20%,读取数据后进度完成30%,重新整理插入数据后进度完成60%,再加密,进度为80%,再压缩进度为90%,再发送进度为95%,删除历史记录结束动作进度为100%。这种事就要多线程去完成,调用控件你就需要委托或者回调控件。
进度条给他赋值就好了,程序运行后你会发现进度条在动。
这是现在90%程序进度条原理。