vb点虐 大小写字母转换

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click

我们提供的服务有：网站设计制作、成都网站设计、微信公众号开发、网站优化、网站认证、临潼ssl等。为上千企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的临潼网站制作公司

Dim s As String = "0Ff0ajkh04624F"

Dim i As Integer = 0

Dim sTemp As String = ""

Dim ss As String = ""

For i = 1 To Strings.Len(s)

sTemp = Mid(s, i, 1)

If Asc(sTemp) = 65 And Asc(sTemp) = 90 Then

sTemp = LCase(sTemp)

ElseIf Asc(sTemp) = 95 And Asc(sTemp) = 122 Then

sTemp = UCase(sTemp)

Else

sTemp = sTemp

End If

ss = ss sTemp

Next

MsgBox(ss)

End Sub

VB.NET代码不区分字母的大小写是什么意思啊？

就是你在写代码是用大写字母和小写字母vb点虐 认为都一样，没区别。你定义变量时Abc

使用时 用abc 它自动会把 abc改成Abc。

VB点虐 2008 为何正则表达式的忽略大小写的功能失效？

Dim Regex As System.Text.RegularExpressions.Regex  '这个是常量对象，参数要在构造函数中设定，以后就不能更改，就是下面这句

Regex = New System.Text.RegularExpressions.Regex("you", System.Text.RegularExpressions.RegexOptions.Singleline Or System.Text.RegularExpressions.RegexOptions.IgnoreCase)  '创建正则表达式实例，匹配模式是you

Dim Matchs As System.Text.RegularExpressions.MatchCollection

Dim Match As System.Text.RegularExpressions.Match

'Dim Ops As RegexOptions = RegexOptions.IgnoreCase + RegexOptions.Singleline ,什么情况，这与Regex对象不搭边，当然起不了作用了

Dim IsMatch As Boolean = Regex.IsMatch(" 1 You  you yOU yoU")

Matchs = Regex.Matches((" 1 You  you yOU yoU"))

Dim a As Integer = Matchs.Count

MsgBox(a)

Dim sItems As String = ""

For Each Match In Matchs

sItems += Match.Value  vbCrLf

Next

MsgBox(sItems)

Dim s = Regex.Replace(" 1 You  you yOU yoU", "me", 1) '后一个参数是替换次数

MsgBox(s)

分享标题：vb点虐 忽略大小写 vba 忽略警告
浏览地址：http://cdweb.net/article/ddesese.html