重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
项目选的是.NET Framework4 还是Client Profile
成都创新互联公司成立于2013年,先为榆树等服务建站,榆树等地企业,进行企业商务咨询服务。为榆树企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。
Client Profile没有System.ServiceModel.Web
步骤如下:
窗体上添加2个列表框,一个按钮:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyDir As String = "C:\123"
'搜索并显示子文件夹
ListBox1.Items.Clear()
For Each MySubDir As String In System.IO.Directory.GetDirectories(MyDir)
ListBox1.Items.Add(MySubDir)
Next
'搜索并显示文件
ListBox2.Items.Clear()
For Each MyFile As String In System.IO.Directory.GetFiles(MyDir)
ListBox2.Items.Add(MyFile)
Next
End Sub
End Class
这个简单呀,select * from 表名称 where 列名称'全部' (也就是查找某列的值ComboBox当前值,就显示出所有的记录了),希望能帮到你