vb.net自定义异常的简单介绍

新人vb.net 怎么自定义类型

其实就是结构体，如下面

Public Structure My_type

Public type_1 As Integer

Public type_2 As String

Public type_3 As Double

End Structure

相关问答

Q1: vb.net 自定义事件

变量值的改变本身就是你程序控制的，也就是说它的变化完全是在你掌控中的，做变量值改变的触发事件实在没有价值。

通常编程者关心的应该是用户操作的控件值发生变化，但这些控件的事件通常都是定义好的，且已经定义的非常全了。

猜测搂主其实是想学习自己制作控件，那就高深了，很多底层的事件通常都是从基本控件中获得的！

Q2: VB.net提示“ Private Sub New 是Private ,因此它在此上下文中不可访问”是什么原因啊？

Sub New 是构造函数，在生存实例时被自动调用的，把Private改成Public。

Q3: 在vb.net中怎么调用自定义类？

代码已测试。

一、测试需要的INI文件。名称为“setinfo.ini”，存放路径为你解决方案里“Bin“文件夹的”Debug“文件夹里。

内容：

[Location]

pnlTime.Location.X=787

pnlTime.Location.Y=0

[TopMost]

Top=True

二、操作INI文件的类。新建一个类，类中内容为：

Public Class Class1

Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _

( _

ByVal lpApplicationName As String, _

ByVal lpKeyName As String, _

ByVal lpDefault As String, _

ByVal lpReturnedString As String, _

ByVal nSize As Int32, _

ByVal lpFileName As String _

) As Int32

End Class

三、界面代码：

Imports System.IO 'for path

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

getINI()

End Sub

Private Sub getINI()

Dim iniclass As New Class1 '

Dim myBf As String 'get set_info 开辟存储的内存

myBf = New String(CChar(""), 256)

Dim myFN As String '配置文件的文件路径

myFN = Path.Combine(My.Application.Info.DirectoryPath, "setinfo.ini")

Dim myAN As String 'Application_NAME,也是Section名称

myAN = Me.TextBox1.Text

Dim myKN As String 'KEY_NAME,关键字名称

myKN = Me.TextBox2.Text

Class1.GetPrivateProfileString(myAN, myKN, "", myBf, myBf.Length, myFN) '调用读取INI文件的操作

TextBox3.Text = Microsoft.VisualBasic.Left(myBf, InStr(myBf, Chr(0)) - 1) '截取有用部分,有必要

End Sub

End Class

四、测试截图如下

Q4: vb.net 自定义控件(Panel)中添加控件无法显示如何解决

我弄很正常，有没有调用show显示它啊，我想你没那么傻。把完整代码贴出来看看了。

Public Class myPanel

Inherits System.Windows.Forms.Panel

Dim flb As FlashLabel

Sub New()

flb = New FlashLabel

flb.Text = "正常吗？"

flb.Parent = Me

'Me.Controls.Add(flb)

flb.Show()

End Sub

End Class

Q5: VB.NET中后面接用户自定义方法是什么意思

你该贴一下代码的。

是不等于号

你说的这个用户自定义的方法有可能是function修饰的有返回值的方法

他有可能返回数字，字符串，boolean等等

这个时候就可以用变量去跟方法返回值进行比较

比如 方法返回1

那么

Dim a as integer =2

Public Function returnb () as Integer

return 1

End function

If a returnb Then

Console.write("不相等")

End If