VB.net的特殊语法(区别于C#.NET)

1:引入命名空间(Imports)

Imports System.Exception
Imports System.Data.SqlClient
Imports System.Security.Cryptography
Imports System.Text.StringBuilder

2:实例化类

Dim myConn As SqlConnection
myConn = New SqlConnection(ConnString)

3:IF THEN ELSE END块

If Not IsPostBack() Then
     txtEmployee.Text = ""
     txtPassWord.Text = ""
else
  txtEmployee.Text = "
      txtPassWord.Text = ""
End If

4:Try catch Fanally End Try块

Try
    myConn = New SqlConnection(ConnString)
    myConn.Open()Catch ex As Exception
    Throw New Exception(ex.Message & "clsDatabaseAccess.GetDataBase()")
Finally
    myConn.Close()
    myConn = Nothing
End Try

5:Sub块

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Try
            If Not IsPostBack() Then
                txtEmployee.Text = ""
                txtPassWord.Text = ""
            End If

        Catch ex As Exception
            Response.Write(ex.Message)
        End Try
End Sub

6:函数块(function)

    Private Function ByteArrayToString(ByVal arrInput() As Byte) As String
        Dim i As Integer
        Dim sOutput As New System.Text.StringBuilder(arrInput.Length)

        For i = 0 To arrInput.Length - 1
            sOutput.Append(arrInput(i).ToString("X2"))
        Next
        Return sOutput.ToString()
    End Function

7:变量定义

        Dim bytMessage As Byte()
        Dim bytMD5 As Byte()
        Dim strMD5 As String
        Dim strPassword As String
        Dim Readlen As Integer

     ‘数组定义        Dim tTfile() As String = Split(tfileN.Trim, "\")
        Dim MD5 As New      System.Security.Cryptography.MD5CryptoServiceProvider

8:数据库连接获取DS方法

WEBConfig中配置数据库连接字符串

<appSettings>
    <add key="ConnectionString" value="server=1.1.1.1; database=dbTest;user=test;password=test"></add>
</appSettings>

取得WEbCnfig中配置的特定字符串的值:

Private strConnectString = System.Configuration.ConfigurationSettings.AppSettings.Get("ConnectPassWord")

数据库连接并返回ds:

        Dim myConn As SqlConnection
        Dim myDataAdapter As SqlDataAdapter
        Dim ds As DataSet

        Try
            myConn = New SqlConnection(ConnString)
            myConn.Open()

           strSql = "select EmployeeManagementID from mstEmployeeBasic where EmployeeCode =" & txtEmployee.Text.Trim().ToString()
            myDataAdapter = New SqlDataAdapter(Sql, myConn)
            Dim ds As New DataSet

            myDataAdapter.Fill(ds)
            GetDataBase = ds

            If Not (ds.Tables(0).Rows.Count > 0) Then
                txtEmployee.Text = ""
                txtPassWord.Text = ""
            Else
                txtEmployee.Text = ""
            End If
        Catch ex As Exception
            Throw New Exception(ex.Message & "clsDatabaseAccess.GetDataBase()")

        Finally
            myConn.Close()
            myConn = Nothing
        End Try            

9:后台提示信息在前台显示:

Response.Write("<script lanugage=‘javascript‘>alert(‘パスワードが間違いました。‘);</script>")

10:后台页面跳转:

Response.Redirect("TestPaperList.aspx?code=" & StrConv(txtEmployee.Text.Trim(), VbStrConv.Narrow) & "")

11:后台取URL传过来的参数的值

            employeecode = Request.QueryString("code")
            AdminType = Request.QueryString("type")

12:在Vb.net中 用me代替了this

                Me.txtCode.Text = ""
                Me.txtPassword1.Text = ""
                Me.txtPassword2.Text = ""

13:类型转换

                intCode = CInt(employeecode.Trim())
                intType = CInt(AdminType.Trim)

14:拼接数据库字符串

            strSql = ""
            strSql = strSql & "insert into                                      " & vbCrLf
            strSql = strSql & "   administrator values(                          " & vbCrLf
            strSql = strSql & "         <$code>                                  " & vbCrLf
            strSql = strSql & "        ,‘<$password>‘                            " & vbCrLf
            strSql = strSql & "        ,<$type>)                                  " & vbCrLf

            strSql = Replace(strSql, "<$code>", code.ToString)
            strSql = Replace(strSql, "<$password>", password.Trim.Replace("‘", "‘‘"))
            strSql = Replace(strSql, "<$type>", type.ToString)

15:For循环块

Dim i As Integer = 0For i = 0 To dsSelectedEmployee.Tables(0).Rows.Count - 1
     lstSelected.Items(i).Text = dsSelectedEmployee.Tables(0).Rows(i)(0) & " " & dsSelectedEmployee.Tables(0).Rows(i)(1)
Next

16:下拉框绑定值

        Dim dsSelectedEmployee As DataSet

        Try
            If Me.dlstClass.SelectedIndex <> 0 Then
                dsSelectedEmployee = GetAnswerer()
                Me.lstSelected.DataValueField = "EmployeeNo"
                Me.lstSelected.DataSource = dsSelectedEmployee.Tables(0)
                Me.lstSelected.DataBind()
                Dim i As Integer = 0
                For i = 0 To dsSelectedEmployee.Tables(0).Rows.Count - 1
                    lstSelected.Items(i).Text = dsSelectedEmployee.Tables(0).Rows(i)(0) & " " & dsSelectedEmployee.Tables(0).Rows(i)(1)
                Next
            Else
                Me.lstSelected.Items.Clear()
            End If

        Catch ex As Exception
            Response.Write(ex.Message)
        End Try
时间: 2024-10-04 17:54:58

VB.net的特殊语法(区别于C#.NET)的相关文章

VB.NET与C# 语法区别展示

在学习VB.NET后发现,VB.NET与C#的语法主要的不同在两个部分,这两部分搞通了,那就游刃有余,迎刃而解了.现将其对比总结如下: 一.实体部分 (与VB相比,在C#和VB.NET中,实体的使用很有新意,将其作为第一个对比呈现) C#实体:语法格式为 //方式 public int ID { get { return ID; } set { ID = value; } } //方式 public int ID { get; set; } VB.NET实体:语法格式为 Private stuC

Python2和Python3的一些语法区别

Python2和Python3的一些语法区别 python Python2和Python3的一些语法区别 1.print 2.input 3. python3版本相对2版本的部分其他区别 问题:为何会出现乱码的情况 问题:如何获取编码方式的信息? 问题:在控制台上看到的到底是什么? 1.print 在版本2的使用方法是: print 'this is version 2 也可以是 print('this is version 2') 但到了3,就只能加上括号,像一个函数一样来使用 print:

VB中 &#39;&amp;&#39; 和 &#39;+&#39; 号的区别

释义 &(Ampersand)是英语单字and之代表符号,亦可用作中文中的“和”.“与”之代表符号.这个符号源于拉丁文的et的连写. 可读做 ampersand,即 "and per se and",意思是 "and [the symbol which] by itself [is] and". '+'常见运算方法(几乎所有高级语言)1)数字 + 数字 :执行数学加法.例如 11 + 22 = 332)字符串 + 字符串 : 字符串连接.例如 "1

C++与Java的语法区别

C++与Java的语法区别 首先,两个大的不同是主函数和怎样编译的不同,接下来是许多小的区别. main 函数C++//自由浮动的函数int main( int argc, char* argv[]){    printf( "Hello, world" );}Java// 每个函数都必须是一个类的一部分;当java <class>运行是一个特定类的主函数会被调用// (因此你可以让每个类都有一个main函数,这在写单元测试是很有用)class HelloWorld{   

groovy与java语法区别

groovy与java语法区别 Groovy试图对Java开发人员尽可能地兼容.在设计Groovy时,遵循最不意外的原则,尤其是对于那些来自Java背景的开发人员. 这里我们列出了Java和Groovy之间的所有主要区别. 1.额外的关键字 Groovy中比Java多一些关键字,不要将它们用于变量名称等. as def in trait 2.数组初始化 在Groovy中,{...}块保留用于闭包.这意味着您无法使用以下语法创建数组字面量: // java初始化 int[] array = { 1

python语法区别

python语法区别: 大小写敏感 (动态语言:python)变量不用声明 p.s: 静态语言(Java)必须声明变量 语句末尾可以不打分号 可以直接进行数学计算 复制.粘贴功能失效,粘贴到别的地方的代码需要重新检查缩进是否正确 整数没有大小限制 浮点数也没有大小限制,但超出一定范围直接表示为inf(无限大) 原文地址:https://www.cnblogs.com/musecho/p/11666538.html

C#和JAVA语法区别

< > <= >= instanceof(Java特有) 解释,当你拿到一个对象的引用时(例如参数),你可能需要判断这个引用真正指向的类.所以你需要从该类继承树的最底层开始,使用instanceof操作符判断,第一个结果为true的类即为引用真正指向的类. 在 Java 中,包是类.接口或其它包的集合,包主要用来将类组织起来成为组,从而对类进行管理. 没有像VS里的#region,#endregion一样的代码段区域 java中声明”属性”: //声明两个私有字段 private

201671010139 2016-2017-2 JAVA 和C语言的语法区别

java和c语言的语法上有很多相似的地方,但也有很多不同. 一,在初始值的区别 在C语言中,是可以不初始化使用的 而在JAVA中,是必须初始化值的 二,在抽象方法或抽象类的区别 C语言的对等语法是"纯虚函数"和"抽象类" Java使用abstract关键字修饰抽象方法或抽象类,final类不能被继承 都使用抽象类作为继承层次中的基类,提供一般概念,由子类实现其抽象方法,且抽象类都不能被直接实例化为对象 E.super关键字的区别 JAVA super关键字,指代父类

vb.net 与 c# 运算符区别

vb.net vs c# 详细的Operators运算符区别 vb.net ===================== Comparison = < > <= >= <> Arithmetic + - * / Mod \ (integer division) ^ (raise to a power) Assignment = += -= *= /= \= ^= <<= >>= &= Bitwise And Or Xor Not <&