重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
VB 是 COM (Common Object Model) 平台的
创新互联公司是一家专注于成都做网站、网站制作与策划设计,保康网站建设哪家好?创新互联公司做网站,专注于网站建设10多年,网设计领域的专业建站公司;建站业务涵盖:保康等地区。保康做网站价格咨询:18980820575
VB.Net 是 .Net Framework 平台的
自从 VB6.0 以后,有 VB.Net、VB.Net 2002、VB 2005 和 VB 2008
目前最新版是 VB2008。
用 VB.Net 制作的程序运行时需要电脑安装 Microsoft .Net Framework 运行库。
和 Java 比较,VB 主要差在它的程序只能在 Windows 下运行,而 Java 的程序则可以跨平台。
一般的 Windows 下窗口程序 VB 都可以做出来。
VB用Show方法显示窗体时使用style属性为1,就可使显示的窗体以模式窗体显示。 Show 方法,用以显示 MDIForm 或 Form 对象。不支持命名参数。 说明 如果调用 Show 方法时指定的窗体没有装载,Visual Basic 将自动装载该窗体。
您仅仅声明了一个变量,变量在未被赋值时,它指向一个空的地址,所以,它没有被实例化。您给它赋一个值,它就指向您定义的值,就行了。
public module module1
Public i As Integer = 365
end module
结构体无法初始化值,你可以用类实现,或者写一个构造函数,把值传进去。
Public Structure wheelmodel
Public ID As Short
Public swapway() As Short
Public start As Short
Public Sub New(ByVal Size As UShort) 'Size就是传入的数组的大小
swapway = New Short(Size) {}
End Sub
End Structure
调用的时候:
Dim x As wheelmodel = New wheelmodel(10)
解压密码:1299
假设路径为C:\abc
代码:
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim Files As ObjectModel.ReadOnlyCollection(Of String) = My.Computer.FileSystem.GetFiles("C:\abc")
Dim FileSize As Long, FileName As String = Nothing
Dim oFileSize As Long
For Each File As String In Files
oFileSize = My.Computer.FileSystem.GetFileInfo(File).Length
If oFileSize FileSize Then
FileSize = oFileSize
FileName = File
End If
Next
Dim ListN As ListViewItem = New ListViewItem(My.Computer.FileSystem.GetName(FileName))
ListN.SubItems.Add(oFileSize " byte")
ListN.SubItems.Add(My.Computer.FileSystem.GetFileInfo(FileName).Extension " 文件")
ListN.SubItems.Add(FileName)
ListView1.Items.Add(ListN)
End Sub
End Class
详见源代码!!