本文整理汇总了VB.NET中System.Web.Services.Description.MimeTextMatch.Repeats属性的典型用法代码示例。如果您正苦于以下问题:VB.NET MimeTextMatch.Repeats属性的具体用法?VB.NET MimeTextMatch.Repeats怎么用?VB.NET MimeTextMatch.Repeats使用的例子?那么恭喜您, 这里精选的属性代码示例或许可以为您提供帮助。您也可以进一步了解该属性所在类System.Web.Services.Description.MimeTextMatch
的用法示例。
在下文中一共展示了MimeTextMatch.Repeats属性的1个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: myMimeTextMatch
' Create an InputBinding.
Dim myInputBinding As New InputBinding()
Dim myMimeTextBinding As New MimeTextBinding()
Dim myMimeTextMatchCollection1 As New MimeTextMatchCollection()
Dim myMimeTextMatch(2) As MimeTextMatch
myMimeTextMatchCollection1 = myMimeTextBinding.Matches
' Intialize the MimeTextMatch.
For myInt = 0 To 2
' Get a new MimeTextMatch.
myMimeTextMatch(myInt) = New MimeTextMatch()
' Assign values to properties of the MimeTextMatch.
myMimeTextMatch(myInt).Name = "Title" + Convert.ToString(myInt)
myMimeTextMatch(myInt).Type = "*/*"
myMimeTextMatch(myInt).Pattern = "TITLE>(.*?)<"
myMimeTextMatch(myInt).IgnoreCase = True
myMimeTextMatch(myInt).Capture = 2
myMimeTextMatch(myInt).Group = 2
If myInt <> 0 Then
' Assign the Repeats property if the index is not 0.
myMimeTextMatch(myInt).Repeats = 2
Else
' Assign the RepeatsString property if the index is 0.
myMimeTextMatch(myInt).RepeatsString = "4"
End If
' Add 'MimeTextMatch' instance to collection.
myMimeTextMatchCollection1.Add(myMimeTextMatch(myInt))
Next myInt