例047テキストボックスの編集

TextBoxクラス

https://docs.microsoft.com/zh-cn/dotnet/api/system.windows.forms.textbox?view=netframework-4.8

TextBox  コントロールを使用する場合  、ユーザーはアプリケーションにテキストを入力できます。このコントロールには、マルチライン編集やパスワード文字マスキングなど、標準のWindowsテキストボックスコントロールにはないその他の機能があります。

通常、TextBox  コントロールは、入力としてテキスト行を表示または受け入れるために使用されます。" Multiline "および " ScrollBars "プロパティを使用して、複数行のテキストを表示または入力できます。 AcceptsTab  と  AcceptsReturn  プロパティが設定されている  true複数行する  テキストボックスが大きいテキスト操作制御を可能にします。

MaxLength  プロパティを特定の文字数に設定する ことによりTextBoxコントロールに入力されるテキスト量を制限  でき  ます。 TextBox  コントロールは、パスワードやその他の機密情報を受け入れるためにも使用できますPasswordChar  プロパティを使用して、コントロールの単一行バージョンに入力された文字をマスクできます  CharacterCasing」属性を使用すると、ユーザーはTextBox  コントロールで大文字、小文字、または大文字と小文字の組み合わせのみを入力できます 

 カーソル(キャレット)がコントロールの表示領域に入るまでTextBoxのコンテンツをスクロール  するには、ScrollToCaret  メソッドを使用できます  テキストボックス内のテキストの範囲を選択するには、Select  メソッドを使用できます 

TextBox  コントロールへのテキスト入力を制限するにはKeyDown  イベントのイベントハンドラー作成して、コントロールに入力さ  れた  各文字を確認します。また、ReadOnly  プロパティ  trueをに設定 して、TextBoxコントロールへのすべてのデータ入力を制限  することもでき  ます

の属性

表2
AcceptsReturn

複数行のTextBox  コントロールEnterキーが押されたときに、コントロールに新しいテキスト行が作成されるか、フォームのデフォルトボタンがアクティブになるかを示す値を取得または設定します 

AcceptsTab

複数のテキストボックスコントロールでTabキーを押したときに、フォーカスをタブの順序で次のコントロールに移動するのではなく、コントロールのTab文字を押すかどうかを示す値を取得または設定します。

(TextBoxBaseから  継承
AllowDrop

ユーザーがコントロールにドラッグアンドドロップしたデータをコントロールが受け入れることができるかどうかを示す値を取得または設定します。

Controlから継承 
自動サイズ

コントロールに割り当てられたフォントが変更されたときに、コントロールの高さが自動的に調整されるかどうかを示す値を取得または設定します。

(TextBoxBaseから  継承
バックカラー

コントロールの背景色を取得または設定します。

(TextBoxBaseから  継承
CanUndo

ユーザーがテキストボックスコントロールで前の操作を元に戻すことができるかどうかを示す値を取得します。

(TextBoxBaseから  継承
フォアカラー

コントロールの前景色を取得または設定します。

(TextBoxBaseから  継承

テキストボックスコントロールのテキスト行を取得または設定します。

(TextBoxBaseから  継承
ロケーション

コンテナーの左上隅を基準にした、コントロールの左上隅の座標を取得または設定します。

Controlから継承 
MaxLength

ユーザーがテキストボックスコントロールに入力または貼り付けできる最大文字数を取得または設定します。

(TextBoxBaseから  継承
マルチライン

これが複数行のTextBox  コントロールであるかどうかを示す値を取得または設定します 

読み取り専用

テキストボックス内のテキストが読み取り専用かどうかを示す値を取得または設定します。

(TextBoxBaseから  継承
ScrollBars

複数行のTextBox  コントロールに表示するスクロールバーを取得または設定し  ます

SelectedText

コントロールで現在選択されているテキストを示す値を取得または設定します。

(TextBoxBaseから  継承
選択開始

テキストボックスで選択されたテキストの開始点を取得または設定します。

(TextBoxBaseから  継承
テキスト

このコントロールに関連付けられたテキストを取得または設定します。

textAlign

TextBox  コントロールのテキストの配置を取得または設定し  ます

TextLength

コントロール内のテキストの長さを取得します。

(TextBoxBaseから  継承

 

方法

表3
AppendText(文字列)

テキストボックスの現在のテキストにテキストを追加します。

(TextBoxBaseから  継承
晴れ()

テキストボックスコントロールからすべてのテキストを消去します。

(TextBoxBaseから  継承
Copy()

将文本框中的当前选定内容复制到“剪贴板”。

(继承自 TextBoxBase)
CreateGraphics()

为控件创建 Graphics

(继承自 Control)
Cut()

将文本框中的当前选定内容移动到“剪贴板”中。

(继承自 TextBoxBase)
DeselectAll()

将 SelectionLength 属性的值指定为零,从而不会在控件中选择字符。

(继承自 TextBoxBase)
DoDragDrop(Object, DragDropEffects)

开始拖放操作。

(继承自 Control)
Paste()

用剪贴板的内容替换文本框中的当前选定内容。

(继承自 TextBoxBase)
Paste(String)

将选定文本设置为指定文本,但不清除撤消缓冲区。

Select()

激活控件。

(继承自 Control)
Undo()

撤消文本框中的上一个编辑操作。

(继承自 TextBoxBase)
Update()

使控件重绘其工作区内的无效区域。

(继承自 Control)

对话框类Form是定义在 Windows名称空间下的类,对话框类中定义了一个名为Controls的属性,用于表示对话框上的所有控件。 Controls为控件集合,可利用下标访问每个控件。集合变量的使用方法类似于数组,可通过下标指定访问的集合元素。

本例控件及其属性值

控件 属性 控件 属性
TextBox Name txtText Button Name btnClear
  Multiline true   text 清除
  text   Button Name btnReadOnly
Button Name btnCopy   Text 只读
  Text 复制 Button Name btnUndo
Button Name btnCut   Text 撤消
  Text 剪切 Button Name btnPaste
        Text 粘贴
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        txtText.Width = Me.Width
        txtText.Height = 220
        txtText.Left = 0
        txtText.Top = 0
        txtText.WordWrap = True '是否自动换行
    End Sub

    Private Sub btnCopy_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCopy.Click
        Static tempStr As String
        tempStr = txtText.SelectedText
        If tempStr = "" Then
            MsgBox("选择文本")
        End If
        String.Copy(tempStr)
    End Sub

    Private Sub btnPaste_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPaste.Click
        txtText.Paste()
    End Sub

    Private Sub btnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClear.Click
        txtText.Clear()
    End Sub

    Private Sub btnUndo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUndo.Click
        txtText.Undo()
    End Sub

    Private Sub btnReadOnly_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnReadOnly.Click
        Dim i As Integer
        If txtText.ReadOnly Then
            btnReadOnly.Text = "只读"
            txtText.ReadOnly = False
            For i = 0 To Me.Controls.Count - 1
                Me.Controls(i).Enabled = True
            Next
        Else
            btnReadOnly.Text = "可写"
            txtText.ReadOnly = True
            For i = 0 To Me.Controls.Count - 1
                If Not (Me.Controls(i) Is btnReadOnly) Then
                    Me.Controls(i).Enabled = False
                End If
            Next

        End If
    End Sub

    Private Sub btnCut_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCut.Click
        txtText.Cut()
    End Sub
End Class

 

发布了146 篇原创文章 · 获赞 0 · 访问量 2713

おすすめ

転載: blog.csdn.net/ngbshzhn/article/details/105682908