00问答网
所有问题
当前搜索:
vb读取文件
vb读取
文本
文件
中每行的某几个字符
答:
Private Sub Command1_Click()Dim a$, s$(), i&, j&, m& ReDim s$(1 To 1000)Open "c:\1.txt" For Input As #1 While Not EOF(1)Line Input #1, a m = m + 1 If Len(a) >= 10 Then s(m) = Mid(a, 7, 4)End If Wend Close #1 If m = 0 Then Exit Sub Re...
VB
如何
读取
和写入指定行 (TXT)
答:
很简单,相当于寻找
文件
一样。首先在声明里添加 Public success Function FileExists%(fname$)On Local Error Resume Next Dim ff ff% = FreeFile Open fname$ For Input As ff If Err Then FileExists% = False Else FileExists% = True End If Close ff End Function 到这里已经基本完成了。se...
VB读取
TXT
文件
出错问题
答:
Private Sub Form_Load()On Error Resume Next Dim temp As String Dim tp As String List1.Clear Open "c:\now.txt" For Input As #1 Do While Not EOF(1)Line Input #1, tp Text2.Text = tp If Mid(Text2.Text, 1, 5) <> "列表是空的" Then Open "c:\at.txt" For Input ...
如何用
VB读取
某个特定位置的EXCEL
文件
中的某个工作簿中的某行某列的内...
答:
Private Sub CommandButton1_Click()Workbooks.Open Filename:="E:\1.xlsx" '打开目标
文件
Me.TextBox1.Value = ActiveWorkbook.Sheets(2).Range("A3") '给文本框1赋值ActiveWorkbook.Close No '关闭目标文件End Sub根据你的要求,供参考!
vb读取
txt
文件
指定长度
答:
Private Sub Command1_Click()fn = FreeFile Open "d:\data.txt" For Input As fn Line Input #fn, stri Line Input #fn, stri Line Input #fn, stri '要取第三行,所以输入了三行 Close fn a = Split(stri, ",")Text1.Text = Mid(a(0), 8, 4)Text2.Text = Mid(a(0),...
VB
6.0中,如何实现
读取
TXT
文件
中的内容并在VB上显示出来?
答:
'这么点事儿创建AcitveX控件应该没太大意义,而且要写许多属性方法等,这里写不下,就给你个窗体的例子吧,希望能按字论赏 '通用声明 Private Declare Function SHGetSpecialFolderLocation Lib "Shell32" (ByVal hwndOwner As Long, ByVal nFolder As Integer, ppidl As Long) As Long Private Declare ...
vb
如何获取
文件
属性等信息
答:
Private Sub Command1_Click()Dim oDLG Dim pth As String Dim Flname As String Dim shl As Shell32.Shell Dim shfd As Shell32.Folder Dim s As String Dim i As Integer Set oDLG = CreateObject("MSComDlg.CommonDialog")With oDLG .DialogTitle = "打开
文件
".Filter = "所有文件|*....
vb
怎样
读取
一个
文件
的图标
答:
'ImageList Private Const MAX_PATH = 260 Private Const SHGFI_DISPLAYNAME = &H200 ' get display name Private Const SHGFI_EXETYPE = &H2000 ' return exe type Private Const SHGFI_LARGEICON = &H0 ' get ...
vb
.net如何
读取
服务器上的
文件
。把文件读出来……
答:
楼上的继续忽悠人吧。2,3句搞定的东西弄这么复杂。。。就是
读取
服务器
文件
呀。微软论坛就有例子。Imports System Imports System.IO Class Test Public Shared Sub Main()Try ' 创建一个实例的StreamReader阅读从一个文件。Dim sr As StreamReader = New StreamReader("TestFile.txt")Dim line As ...
VB
打开
文件
代码
答:
使用系统API函数ShellExecute实现打开
文件
。执行后会调用与要打开文件扩展名关联的程序打开这个文件。Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal ...
棣栭〉
<涓婁竴椤
6
7
8
9
11
12
13
14
10
15
涓嬩竴椤
灏鹃〉
其他人还搜