1. vb查找文件
用SQL语句，将表导出为EXCEL。
SELECT
字段表
INTO
[Excel
8.0;database=D:\temp\200803.XLS].Data
FROM 表
2. vb查找文件的几种方式
vb中有web browser控件，但网址输入采用的是普通文本框，可以通过trxt属性获取里边的内容
3. vb 搜索文件
查找字符串的函数是 instr，替换字符串的函数是replace，用法：instr(n , S1 , S2) 在字符串S1中，从左边第n个字符向后搜索S2第一次出现的位置，例如i = instr ( 3, "abcbcbc", "b" )，此时 i = 4replace（s,s1,s2) 在字符串s中搜索s1，如果搜索到就将s1替换成s2，例如replace("asdfasdfasfas","asd","m") 结果是 mfmfasfas希望对你有用
4. vbs搜索文件
1、首先开始 - 运行（输入regedit）- 确定或者回车，打开注册表编辑器。
2、然后在打开的注册表编辑器窗口，点击：编辑 - 查找。
3、接着在弹出的窗口输入：XX杀毒软件，再点击：查找下一个。
4、然后通过搜索，就会找到该软件的残留信息，右键删除就可以了。
5、最后重启计算机，就不会提示找不到文件了。
5. vb查找文件路径怎么避开某个文件目录
app.path是VB6中的用法.vb2010属于VB.Net，VB.Net中使用如下方法:Application.StartupPath'获取当前程序路径,如果你的程序在C:\App\,结果为C:\AppAppDomain.CurrentDomain.SetupInformation.ApplicationBase'获取当前程序路径,如果你的程序在C:\App\,结果为C:\App\'后者比前者的结果会多一个"\"
6. vb查找文件的路径
用 CommonDialog 控件的 ShowOpen 和 ShowSave 方法可显示“打开”和“另存为”对话框：
Private Sub Command1_Click()' 设置“CancelError”为 TrueCommonDialog1.CancelError = TrueOn Error GoTo ErrHandler' 设置标志CommonDialog1.Flags = cdlOFNHideReadOnly' 设置过滤器CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _"(*.txt)|*.txt|Batch Files (*.bat)|*.bat"' 指定缺省的过滤器CommonDialog1.FilterIndex = 2' 显示“打开”对话框CommonDialog1.ShowOpen' 显示选定文件的名字MsgBox CommonDialog1.FileName '显示路径Exit SubErrHandler:' 用户按了“取消”按钮Exit SubEnd Sub
7. vb查找文件内容字符串并替换
如果只是取前两个字符的话,可以参考以下几个函数:Right 返回字符串右部指定个数的字符 Right("Budapest"
,3)返回pes Left 返回字符串左部指定个数的字符 Left("Budapest"
,4)返回Buda Mid 从某一指定起始点开始返回字符串中指定个数的字符 Mid("Sommers", 4, 3) 返回mer
8. vb查找文件显示文件全路径
Private Sub Browse_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Browse.Click If (OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK) Then FileName = OpenFileDialog1.FileName TextBox1.Text = FileName End If End Sub用openfiledialog控件，在你要选择文件的botton的click事件下面下选择文件的代码，把文件的路径显示到textbox1.text里面
9. vb查找文件夹下面的文件
我想这个要用到Common Dialog控件 ，打开工程（project）>>>部件（components） ， 勾选Microsoft Common Dialog Control 6.0 点击确定。
在窗体上画一个CommonDialog控件（默认名为CommonDialog,并且在他的Filter属性窗口里面写入“数据库文件（*.mdb)|*.mdb ” 或者 在代码里面写入：
CommonDialog1.Filter = "数据库文件（*.mdb)|*.mdb 。
假设窗体上有一个Command1按钮 , 在他的click事件里面加入代码： CommonDialog1.ShowOpen 这样的话就可以在点击Command1的时候打开一个打开文件的对话框（就是你说的用户选择界面），然后你就可以找需要的文件了。
但实际上CommonDialog控件并不是真正的打开文件，他只是把你在“用户选择界面”所选择的想要打开的文件的路径存了起来，存在哪呢，就存在CommonDialog1.FileName里面 如果你想真正的把你选的文件打开，就要另外写代码了。 首先 我们要定义一个打开文件的Function（Function和Sub在vb里都叫做过程，不同的是Function过程有返回值，而Sub过程没有返回值）代码如下：
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 lpDirectory As String, ByVal nShowCmd As Long) As Long 括号里都是这个Function的参数和相应的数据类型，不想深究的话可以不管他 然后 我们就要在合适的时候调用这个过程 综上所述 完整的代码 如下：
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 lpDirectory As String, ByVal nShowCmd As Long) As Long Private Sub Command1_Click() CommonDialog1.ShowOpen ShellExecute Me.hWnd, "open", CommonDialog1.FileName, "", "", 1 End Sub
10. vb查找文件中部分文件
SQL = "select Name fom 1 Whee Name Like'" & Text1 & "%' ode y
name"
以上是实现模糊查询的SQL语句,是从表名1查询Name字段的.
在VB6中可用ADO及DATAGRID控件，用如下语句可更灵活：
Pivate Su Fom_Load()
Text1 = ""
With Adodc1
Adodc1.ConnectionSting = "Povide=Micosoft.Jet.OLEDB.4.0;Data Souce=E:\
;Pesist Secuity Info=False"
Adodc1.RecodSouce = "select name fom 1 ode y name"
Adodc1.Refesh
DataGid1.Refesh
End With
End Su
Pivate Su Text1_Change()
Adodc1.ConnectionSting = "Povide=Micosoft.Jet.OLEDB.4.0;Data Souce=E:\
;Pesist Secuity Info=False"
Adodc1.RecodSouce = "select name fom 1 whee name ='" & Text1 & "'
ode y name"
Adodc1.Refesh'对查询更新
DataGid1.Refesh
End Su
- 相关评论
- 我要评论
-