テキストボックスで折り返し表示するには?

解決


休日出勤  2004-12-23 10:26:35  No: 118489  IP: [192.*.*.*]

複数行入力を許可せずに
テキストボックスで、折り返し表示する方法はありませんか?
データの都合上、改行が入らないようにしたいのですが。

編集 削除
花ちゃん  2004-12-23 11:10:23  No: 118490  IP: [192.*.*.*]

>複数行入力を許可せずに
>テキストボックスで、折り返し表示する方法はありませんか?
矛盾しています。

>データの都合上、改行が入らないようにしたいのですが。
なら、テキストボックス上でVBCrLfを無視するようにすれば
いいだけでは。

編集 削除
花ちゃん  2004-12-23 11:24:23  No: 118491  IP: [192.*.*.*]

Private Sub Text1_KeyPress(KeyAscii As Integer)
    '別途、プロパティで設定  Text1.MultiLine = True
    If KeyAscii = vbKeyReturn Then
        KeyAscii = 0
    End If
End Sub

編集 削除
休日出勤  2004-12-23 11:49:13  No: 118492  IP: [192.*.*.*]

アドバイス有難うございます。
忘れていましたが、環境は.NETです。
あと、よろしければVBCrLfを無視する方法を教えてください。
本当に何も知らなくてすみません。

編集 削除
花ちゃん  2004-12-23 11:59:55  No: 118493  IP: [192.*.*.*]

.NET でもほぼ同様かと思うのですが。自分で調べる気になれませんか?

    Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As _
                    System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        'Enterキーが押された事を取得
        If e.KeyChar = Microsoft.VisualBasic.ChrW(13) Then
            e.Handled = True    'Handled を true に設定して KeyPress イベントをキャンセル。
        End If
    End Sub

編集 削除
休日出勤  2004-12-23 13:05:39  No: 118494  IP: [192.*.*.*]

解決しました、有難うございます。
下記のように記述していたため、
イベントをキャンセルできていなかったようです。

Dim KeyAscii As Short = Asc(e.KeyChar)
If KeyAscii = System.Windows.Forms.Keys.Return Then
  KeyAscii = 0
End If

編集 削除