Share via


EditPoint.ChangeCase 方法

更改选定文本的大小写。

命名空间:  EnvDTE
程序集:  EnvDTE(在 EnvDTE.dll 中)

语法

声明
Sub ChangeCase ( _
    PointOrCount As Object, _
    How As vsCaseOptions _
)
void ChangeCase(
    Object PointOrCount,
    vsCaseOptions How
)
void ChangeCase(
    [InAttribute] Object^ PointOrCount, 
    [InAttribute] vsCaseOptions How
)
abstract ChangeCase : 
        PointOrCount:Object * 
        How:vsCaseOptions -> unit
function ChangeCase(
    PointOrCount : Object, 
    How : vsCaseOptions
)

参数

  • PointOrCount
    类型:Object

    必需。 或者是 TextPoint 对象,或者是字符数。

示例

Sub ChangeCaseExample()
   Dim objTextDoc As TextDocument
   Dim objEditPt As EditPoint, iCtr As Integer
        
   ' Create a new text file.
   DTE.ItemOperations.NewFile("General\Text File")
       
   ' Get a handle to the new document and create an EditPoint.
   objTextDoc = DTE.ActiveDocument.Object("TextDocument")
   objEditPt = objTextDoc.StartPoint.CreateEditPoint
        
   ' Insert ten lines of text.
   For iCtr = 1 To 10
     objeditpt.Insert("This is a test." & Chr(13))
   Next iCtr
       
   'Capitalize the third word of the second line
   objEditPt.StartOfDocument()
   objEditPt.LineDown(2)
   objEditPt.WordRight(3)
   objEditPt.ChangeCase(4, vsCaseOptions.vsCaseOptionsCapitalize)
End Sub

.NET Framework 安全性

请参阅

参考

EditPoint 接口

EnvDTE 命名空间