vb.net卷积实现的简单介绍

vb.net求大神解释

这个一般是一个Form类的构造函数。

MyBase.New ( )是调用父类的构造函数，InitializeComponent ( )是调用自己的InitializeComponent 方法。一般你在VS里拖界面，VS会自动帮你生成这个方法的实现，里面是用代码实现你拖出来的界面布局。

相关问答

Q1: 使用VB.NET的五个技巧之处理数据行

处理数据行（DataRow）

Windows窗体中的数据绑定列表框和组合框很节省时间 典型的代码如下（假定已经建立了SqlDataAdapter或者其它部件获取数据）

Dim ds As New DataSet() SqlDataAdapter Fill(ds Customers ) ListBox DataSource = ds Tables( Customers ) ListBox DisplayMember = CompanyName ListBox ValueMember = CustomerID

在这种情况下 代码使用Northwind数据库的顾客记录工作 DisplayMember属性设置为你希望用户在列表框中看到的记录字段 它是customers表的CompanyName 通常ValueMember属性设置为数据表中的一个键字段 对于customer来说是CustomerID 一旦用户选择了列表框中的一行 很容易使用列表框的SelectedValue属性获得键字段

MsgBox（ListBox SelectedValue）

但是有可能需要一个与被选择项相关的整个数据行对象的引用 例如 如果被选择的行需要被删除 就不知道键了 你需要一个数据行的引用以使用Delete方法

典型的Visual Basic开发者通常这样想 我已经得到了该行的键了 我将编写一些逻辑来查找使用该键的行 这样可以实现 但是有更好的实现方法 可以使用一行代码获取与列表框中选项关联的数据行

Dim dr As DataRow = CType（ListBox SelectedItem DataRowView） Row

通常该逻辑不会凭直觉出现 即使对经验丰富的开发者 为了解释这是怎样实现的 我把上面的一行拆成几行 下面的代码与上面代码的功能相同

Dim drv As DataRowView drv = CType(ListBox SelectedItem DataRowView) Dim dr As DataRow dr = drv Row

DataRowView类是数据行的包装 它被多个Windows窗体控件使用 它使得显示与控件中的数据行相关的数据更加容易 当列表框被数据绑定到数据表时（假定列表框中的有些行当前被选定了） 列表框的SelectedItem属性保存了一个DataRowView对象

这意味着我们能把列表框的SelectedItem属性转换到DataRowView对象 这就是上面代码中的第二行实现的 接着DataRowView暴露一个Row属性 它指向被包装的数据行 上面的代码声明了一个数据行并设置了Row属性

转换对象的类型以访问它的接口的技术在Visual Basic 中不是经常使用 但是在Visual Basic NET中这是经常的 有了上面的例子后 大多数有经验的开发者迅速跟上了这种技术

数据行的引用（dr）可用于用任何方式维护行 访问数据行中的任何特定字段是可行的 行中的数据可以被改变 能使数据行的Delete方法把该行标识为删除 或者从数据表的行集合中删除该行 下面的代码标识删除了一行

dr Delete（）

lishixinzhi/Article/program/net/201311/12974

Q2: 几种经典的二值化方法及其vb.net实现

图像二值化的目的是最大限度的将图象中感兴趣的部分保留下来，在很多情况下，也是进行图像分析、特征提取与模式识别之前的必要的图像预处理过程。这个看似简单的问题，在过去的四十年里受到国内外学者的广泛关注，产生了数以百计的阈值选取方法，但如同其他图像分割算法一样，没有一个现有方法对各种各样的图像都能得到令人满意的结果。

本文针对几种经典而常用的二值发放进行了简单的讨论并给出了其vb.net 实现。

1、P-Tile法

Doyle于1962年提出的P-Tile (即P分位数法)可以说是最古老的一种阈值选取方法。该方法根据先验概率来设定阈值，使得二值化后的目标或背景像素比例等于先验概率，该方法简单高效，但是对于先验概率难于估计的图像却无能为力。

2、OTSU 算法（大津法）

OSTU算法可以说是自适应计算单阈值（用来转换灰度图像为二值图像）的简单高效方法。1978 OTSU年提出的最大类间方差法以其计算简单、稳定有效，一直广为使用。

3、迭代法（最佳阀值法）

(1)． 求出图象的最大灰度值和最小灰度值，分别记为Zl和Zk，令初始阈值为：

(2)． 根据阈值TK将图象分割为前景和背景，分别求出两者的平均灰度值Z0和ZB:

式中，Z(i,j）是图像上(i,j)点的象素值，N(i,j)是(i,j)点的权值，一般取1。

(3)． 若TK=TK+1，则所得即为阈值，否则转2，迭代计算。

4、一维最大熵阈值法

它的思想是统计图像中每一个灰度级出现的概率 ，计算该灰度级的熵 ,假设以灰度级T分割图像，图像中低于T灰度级的像素点构成目标物体（O），高于灰度级T的像素点构成背景（B），那么各个灰度级在本区的分布概率为：

O区： i=1,2……,t

B区： i=t+1,t+2……L-1

上式中的 ,这样对于数字图像中的目标和背景区域的熵分别为：

对图像中的每一个灰度级分别求取W=H0 +HB，选取使W最大的灰度级作为分割图像的阈值，这就是一维最大熵阈值图像分割法。

Q3: vb.net求个解个函数或是过程

我是这么做的，你参考一下：

所有Panel的Visiable属性都是False

'设置全局变量

Private lblMenu As Object = Nothing '鼠标移动的前一菜单项

Private MenuSelect As Object = Nothing '鼠标点击的前一菜单项

Private FrmShow As Object = Nothing '前一菜单项所指向内容

Private Sub MixedControls_Click(sender As System.Object, e As System.EventArgs) Handles _

Label1.Click, Label2.Click, Label3.Click, Label4.Click, Label5.Click, Label6.Click, Label7.Click

If MenuSelect IsNot Nothing Then

MenuSelect.forecolor = Color.White '前面选择的菜单项前景色变为白色

End If

If FrmShow IsNot Nothing Then

FrmShow.visible = False '前一菜单项内容隐藏

End If

sender.forecolor = Color.Chartreuse '当前选择的菜单项前景色为亮绿色

MenuSelect = sender '保存当前选择菜单项

Select Case sender.name.ToString

Case "Label1"

FrmShow = Panel1 '保存当前菜单项选择

Me.Panel1.Dock = DockStyle.Fill '显示运行界面

Me.Panel1.Visible = True

Case "Label2"

FrmShow = Panel2 '保存当前菜单项选择

Me.Panel2.Dock = DockStyle.Fill '显示设置界面

Me.Panel2.Visible = True

Case "Label3"

FrmShow = Panel3 '保存当前菜单项选择

Me.Panel3.Dock = DockStyle.Fill '显示关于界面

Me.Panel3.Visible = True

End Select

End Sub

Private Sub MixedControls_MouseDown(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles _

Label1.MouseDown, Label2.MouseDown, Label3.MouseDown, Label4.MouseDown, Label5.MouseDown, Label6.MouseDown, Label7.MouseDown

sender.BorderStyle = BorderStyle.FixedSingle '鼠标按下菜单效果

End Sub

Private Sub MixedControls_MouseUp(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles _

Label1.MouseUp, Label2.MouseUp, Label3.MouseUp, Label4.MouseUp, Label5.MouseUp, Label6.MouseUp, Label7.MouseUp

sender.BorderStyle = BorderStyle.None '鼠标抬起取消菜单效果

End Sub

Private Sub MixedControls_MouseEnter(sender As Object, e As System.EventArgs) Handles _

Label1.MouseEnter, Label2.MouseEnter, Label3.MouseEnter, Label4.MouseEnter, Label5.MouseEnter, Label6.MouseEnter, Label7.MouseEnter

If lblMenu IsNot Nothing Then

Call MixedControls_MouseLeave(lblMenu, e) '前一菜单项恢复初始状态

End If

sender.backcolor = Color.DeepSkyBlue '鼠标进入菜单范围的效果：背景色变深蓝

lblMenu = sender '保存当前进入菜单项

End Sub

Private Sub MixedControls_MouseLeave(sender As Object, e As System.EventArgs) Handles _

Label1.MouseLeave, Label2.MouseLeave, Label3.MouseLeave, Label4.MouseLeave, Label5.MouseLeave, Label6.MouseLeave, Label7.MouseLeave

sender.backcolor = Color.Transparent '鼠标离开菜单项恢复默认效果，背景色透明

sender.BorderStyle = BorderStyle.None '菜单项边框取消

lblMenu = Nothing '删除保存的菜单项

End Sub

Q4: VB.NET中的一个方法

用replace函数

Replace(expression, find, replacewith)

Replace函数语法有如下几部分：

expression 字符串表达式vb.net卷积实现，包含要替换的子字符串。

find 要搜索到的子字符串。

replacewith 用来替换的子字符串。

以你的要求:

str=Replace(A,"A","a")

如果你要做一个学生姓名对应一个学生学号vb.net卷积实现，你输了姓名，学号自动就显示出来了.

最好通过数据库实现.

select studentid from student where studentname=输入姓名

Q5: 请问在VB.net 中能不能实现这种功能

基本思路：

1，设置绘图区域vb.net卷积实现的坐标。

2，将每个站点vb.net卷积实现的坐标（x,y)保存到数组。

3，通过鼠标单击点vb.net卷积实现的坐标（x,y)与数组比较，然后确定显示相应信息。

关于vb.net卷积实现和的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。