作者james0903 (JJ)
看板Visual_Basic
标题[.NET] 如果用VB2005写一个能带有历史资讯的功能表
时间Sat May 24 20:43:05 2008
请输入专案类型(网站专案或者应用程式专案)：
各位：
如标题所示，如何能做一个含有历史资讯的功能表
也就是出现已开过的档案名称在功能表中
我手头上有vb6的范例，但已经转很多天也只能
将他储存的地方改写成VB2005的语法而已，请各位指教
原程式片段
...
strfilename = App.Path & "\cdxx.ini"
file = FreeFile()
On Error Resume Next
Open strfilename For Input As #file
Do While Not EOF(file)
Line Input #file, mystring 'mystring前面已经定义成string
If mystring <> "" Then
max_index = max_index + 1
Load mnufilelist(max_index) 'mnufilelist是分格线的名字
mnufilelist(max_index).Caption = mystring
mnufilelist(max_index).Visible = True
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
目前我的程式
strfilename = My.Application.Info.DirectoryPath & "\cdxx.ini"
file = FreeFile()
On Error Resume Next
FileOpen(file, strfilename, OpenMode.Input)
Do While Not EOF(file)
mystring = LineInput(file)
If mystring <> "" Then
max_index = max_index + 1
下面不知如何接下去，因为VB2005好像没有提供index的功能了!!
Thank you everyone
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 211.22.132.142