EditPoint2.ChangeCase(Object, vsCaseOptions) 方法

定义

更改选定文本的大小写。

public:
 void ChangeCase(System::Object ^ PointOrCount, EnvDTE::vsCaseOptions How);
public:
 void ChangeCase(Platform::Object ^ PointOrCount, EnvDTE::vsCaseOptions How);
void ChangeCase(winrt::Windows::Foundation::IInspectable const & PointOrCount, EnvDTE::vsCaseOptions How);
[System.Runtime.InteropServices.DispId(165)]
public void ChangeCase (object PointOrCount, EnvDTE.vsCaseOptions How);
[<System.Runtime.InteropServices.DispId(165)>]
abstract member ChangeCase : obj * EnvDTE.vsCaseOptions -> unit
Public Sub ChangeCase (PointOrCount As Object, How As vsCaseOptions)

参数

PointOrCount
Object

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

How
vsCaseOptions

必需。 一个 vsCaseOptions 常数,该常数指示文本的大小写。

实现

属性

示例

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  

适用于