锐客网

  1. 首页 > 睿知 > it技术 > >

关于vb.net标准表达式的信息

IT技术标准

vb.net 正则表达式正则表达式是：
/[a-zA-Z/]+$
如果要把第一个斜杠去掉vb.net标准表达式，就是匹配index/index/indexvb.net标准表达式，用后向匹配vb.net标准表达式，正则是：
(?=/)[a-zA-Z/]+$
VB.net 中 标准表达式中数据类型不匹配数据库中 age 字段，birthday 字段是什么类型？都不是字符型吧 。。。
=======================================================
birthday 是数字？不太可能吧 。。。难道你不是用来存放生日的！
要真是 数字 你这样写试试
MyCommand = New OleDbCommand("UPDATE yggrxx SET name ='"TextBox2.Text"',sex = '"TextBox3.Text"',age ="TextBox4.Text",birthday = "val(TextBox5.Text)", address = '"TextBox6.Text"', postid = "TextBox7.Text", pwd = '"TextBox8.Text"' where id = "TextBox1.Text, MyConnection)
要是是 日期/时间 你这样写试试
MyCommand = New OleDbCommand("UPDATE yggrxx SET name ='"TextBox2.Text"',sex = '"TextBox3.Text"',age ="TextBox4.Text",birthday = #"TextBox5.Text"#, address = '"TextBox6.Text"', postid = "TextBox7.Text", pwd = '"TextBox8.Text"' where id = "TextBox1.Text, MyConnection)
vb.net正则表达式Imports System.Text.RegularExpressions
Public Class Form1
Public Function MadeRegexArray(ByVal strText As String, ByVal strRegx As String, ByVal rexOpt As RegexOptions, ByVal Groups As Integer) As String()
REM 正则结果直接以字符串组形式返回
REM strHtml待搜索的字符串
REM strRegx正则表达式
REM rexOpt正则选项
On Error Resume Next
Return MadeMatchString(MadeRegexMatch(strText, strRegx, rexOpt), Groups)
End Function
Public Function MadeMatchString(ByVal mc As MatchCollection, ByVal Groups As Integer) As String()
REM 把MatchCollection以字符串组形式保存
REM mc正则匹配的集合
REM 返回字符串组
On Error Resume Next
Dim strRegCode(mc.Count) As String
For i As Integer = 0 To mc.Count - 1
strRegCode(i) = mc(i).Groups(Groups).Value
Next i
Return strRegCode
End Function
Public Function MadeRegexMatch(ByVal strText As String, ByVal strRegex As String, ByVal rexOpt As RegexOptions) As MatchCollection
REM 获取正则表达式匹配的集合
REM strHtml待正则的字符串
REM strRegex正则表达式
REM rexOpt正则选项
REM 返回 MatchCollection 类型集合
On Error Resume Next
Dim rex As Regex = New Regex(strRegex, rexOpt)
Return rex.Matches(strText)
End Function
Public Function MadeRegexReplace(ByVal sText As String, ByVal sRegex As String, ByVal sReplace As String) As String
REM 正则表达式文本替换
REM sText原文本
REM sRegex表达式
REM sReplace替换文本
On Error Resume Next
Dim rex As Regex = New Regex(sRegex, RegexOptions.IgnoreCase)
Return rex.Replace(sText, sReplace)
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
On Error Resume Next
Dim sRegex As String = "([\s\S]*?)"
Dim aTable() As String = MadeRegexArray(TextBox1.Text, sRegex, RegexOptions.IgnoreCase, 1)
For i As Integer = 0 To aTable.Length - 1
TextBox2.Text = TextBox2.TextaTable(i)
Next i
End Sub
End Class
如图：
vb.net 标准表达式中数据类型不匹配VB6中vb.net标准表达式，在使用Select语句vb.net标准表达式的Where子句时vb.net标准表达式：
对于字符型，要用单引号vb.net标准表达式：
Where 字段名=' "字符型变量"'"
而对于日期型，要用井字号“#”：
Where 日期型字段名=# "日期型变量"#"
对于VB.net，应该是一样的道理 ， 你可以按照VB6试试 。
VB.NET的正则表达式Imports System.Text.RegularExpressions '引入命名空间
dim isTrue as boolean = regex.Match(textbox1.text, _

推荐阅读


上一篇：c语言学输出带框文字，c语言如何打出框

下一篇：Java模仿网络爬虫，java写网络爬虫