锐客网

  1. 首页 > 生活百科 > it技术 > >

vb.net判断条件 vb条件判断语句( 二 )

IT技术运算符


Dim InfoList As New ArrayList
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim fs As New FileStream("c:\1.txt", FileMode.Open, FileAccess.Read, FileShare.None)
Dim fw As New StreamReader(fs, Encoding.Default)
Do Until fw.EndOfStream
InfoList.Add(fw.ReadLine)
Loop
fw.Close()
fs.Close()
End Sub
【vb.net判断条件 vb条件判断语句】Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim tmp As String, a As Integer
a = -1
tmp = TextBox1.Text
For i = 0 To InfoList.Count - 1
If InStr(InfoList.Item(i).ToString, tmp)0 Then a = i : Exit For
Next
If a = 0 Then TextBox2.Text = InfoList.Item(a)
End Sub
End Class
VB.Net如何利用“文本中是否包含某字符串”作为判断条件应该用什么函数？有一个字符串函数：Instr(n,S1,S2)
该函数的功能：从字符串S1的左起第N位开始，向右逐位进行搜索匹配字符串S2 ， 如果找到匹配 ， 就返回一个整数指明匹配的位置，否则就返回0 。如果缺省n，就是默认从字符串S1的左起第1位开始，进行搜索匹配字符串S2 。
例如1：Instr(1,"abcde","a")，返回1
例如2：Instr(3,"abcde","a")，返回0
例如3：Instr(1,"abcde","c") ， 返回3
例如4：Instr(1,"abcde","cde")，返回3
例如5：Instr(4,"ab12cd12e12","12")，返回7 ， 这里从字符串"ab12cd12e12"左起第4位开始向右搜索匹配字符串"12"，找到的是中间一个“12” ， 这个“12”是位于字符串"ab12cd12e12"左起的第7个字符 。
而：Instr(1,"ab12cd12e12","12") ， 返回3
Instr("ab12cd12e12","12")，返回3
vb.net判断条件的介绍就聊到这里吧，感谢你花时间阅读本站内容 ， 更多关于vb条件判断语句、vb.net判断条件的信息别忘了在本站进行查找喔 。

推荐阅读


上一篇：直播城乡集合是什么意思，城乡集合属于居民户口还是农村户口

下一篇：快乎直播伴侣，百度快手直播伴侣