把这句DataGridView1.DataSource = ds3.Tables("课程权重")改成DataGridView1.DataSource = ds3.Tables[0]试试
让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:域名与空间、虚拟主机、营销软件、网站建设、罗江网站维护、网站推广。
OA的构架最好是B/S的。。。VB只能构建CS结构的。。就是要用还要安装客户端,维护也不方便。ASP/ASP.net/JSP等构架出的BS结构系统维护方便只要在服务端维护就可,而且无需客户端软件,只要客户机能连接网络使用浏览器就可以使用。
VB5时代曾经有个外国公司开发了一款VB+DirectX的三维游戏。至今国内到还能见到一些人在用vb开发3d游戏,但很少有公司或者工作室以商业目的去用vb开发了。
至于vb为主开发的大型软件有很多,尤其vb6时代很多财务、ERP、OA、教育、会议系统等大型应用软件都是vb开发的。快速应用型开发一直是VB的强项。自从dotNet平台出现,vb.net更是跨入高性能、更强大的平台,不过由于出现了新兴语言C#,国内很多人追新追C类型的语法。事实上在国外VB做大型项目的企业是非常多的,国内搞很多东西都有较为偏激的潮流。事实上没有不好的语言,只有不好的程序员,就像画家不是因为笔的差别而画不出好画一样。
是你的思路一开始就偏了,导致后面不好处理!获取目录下的文件列表,有3种方法,其实都差不多,只是可能后期的处理需求不同用不同的类来实现。
第一种方法:
'读取D:\Temp目录下所有文件完整路径名称
Dim pathArray As String() = IO.Directory.GetFiles("D:\Temp")
'历遍文件完整路径
For Each path As String In pathArray
'获取完整路径下的文件名称,添加到ListBox1
ListBox1.Items.Add(IO.Path.GetFileName(path))
Next
第二种方法:
'读取D:\Temp目录下所有文件完整路径名称
Dim pathArray As String() = IO.Directory.GetFiles("D:\Temp")
'历遍文件完整路径
For Each path As String In pathArray
'根据文件完整路径新建FileInfo文件信息对象
Dim info As New IO.FileInfo(path)
'获取文件名称,添加到ListBox1
ListBox1.Items.Add(info.Name)
Next
第三种方法:
'读取D:\Temp目录下所有文件完整路径名称
Dim pathArray As String() = IO.Directory.GetFiles("D:\Temp")
'历遍文件完整路径
For Each path As String In pathArray
'根据文件完整路径新建DirectoryInfo目录信息对象
Dim info As New IO.DirectoryInfo(path)
'获取文件名称,添加到ListBox1
ListBox1.Items.Add(info.Name)
Next
普通应用,第一种就可以。
用FolderBrowserDialog操作的话,把"D:\Temp"换成 FolderBrowserDialog.SelectedPath