' Declare four textboxes.
Friend WithEvents vertical As System.Windows.Forms.TextBox
Friend WithEvents horizontal As System.Windows.Forms.TextBox
Friend WithEvents both As System.Windows.Forms.TextBox
Friend WithEvents none As System.Windows.Forms.TextBox

Private Sub SetFourDifferentScrollBars()

    Me.vertical = New System.Windows.Forms.TextBox
    Me.horizontal = New System.Windows.Forms.TextBox
    Me.both = New System.Windows.Forms.TextBox
    Me.none = New System.Windows.Forms.TextBox

    ' Create a string for the Text property.
    Dim startString As String = _
        "The scroll bar style for my textbox is: "

    ' Set the location of the four textboxes.
    horizontal.Location = New Point(10, 10)
    vertical.Location = New Point(10, 70)
    none.Location = New Point(10, 170)
    both.Location = New Point(10, 110)

    ' For horizonal scroll bars, the Multiline property must
    ' be true and the WordWrap property must be false.
    ' Increase the size of the Height property to ensure the 
    ' scroll bar is visible.
    horizontal.ScrollBars = ScrollBars.Horizontal
    horizontal.Multiline = True
    horizontal.WordWrap = False
    horizontal.Height = 40
    horizontal.Text = startString & ScrollBars.Horizontal.ToString()

    ' For the vertical scroll bar, Multiline must be true.
    vertical.ScrollBars = ScrollBars.Vertical
    vertical.Multiline = True
    vertical.Text = startString & ScrollBars.Vertical.ToString()

    ' For both scroll bars, the Multiline property 
    ' must be true, and the WordWrap property must be false.
    ' Increase the size of the Height property to ensure the 
    ' scroll bar is visible.
    both.ScrollBars = ScrollBars.Both
    both.Multiline = True
    both.WordWrap = False
    both.Height = 40
    both.AcceptsReturn = True
    both.Text = startString & ScrollBars.Both.ToString()

    ' The none scroll bar does not require specific 
    ' property settings.
    none.ScrollBars = ScrollBars.None
    none.Text = startString & ScrollBars.None.ToString()

    ' Add the textboxes to the form.
    Me.Controls.Add(Me.vertical)
    Me.Controls.Add(Me.horizontal)
    Me.Controls.Add(Me.both)
    Me.Controls.Add(Me.none)

End Sub

    // Declare four textboxes.
    internal System.Windows.Forms.TextBox vertical;
    internal System.Windows.Forms.TextBox horizontal;
    internal System.Windows.Forms.TextBox both;
    internal System.Windows.Forms.TextBox none;

    private void SetFourDifferentScrollBars()
    {
        
        this.vertical = new System.Windows.Forms.TextBox();
        this.horizontal = new System.Windows.Forms.TextBox();
        this.both = new System.Windows.Forms.TextBox();
        this.none = new System.Windows.Forms.TextBox();

        // Create a string for the Text property.
        string startString = "The scroll bar style for my textbox is: ";

        // Set the location of the four textboxes.
        horizontal.Location = new Point(10, 10);
        vertical.Location = new Point(10, 70);
        none.Location = new Point(10, 170);
        both.Location = new Point(10, 110);

        // For horizonal scroll bars, the Multiline property must
        // be true and the WordWrap property must be false.
        // Increase the size of the Height property to ensure the 
        // scroll bar is visible.
        horizontal.ScrollBars = ScrollBars.Horizontal;
        horizontal.Multiline = true;
        horizontal.WordWrap = false;
        horizontal.Height = 40;
        horizontal.Text = startString + 
            ScrollBars.Horizontal.ToString();

        // For the vertical scroll bar, Multiline must be true.
        vertical.ScrollBars = ScrollBars.Vertical;
        vertical.Multiline = true;
        vertical.Text = startString + ScrollBars.Vertical.ToString();

        // For both scroll bars, the Multiline property 
        // must be true, and the WordWrap property must be false.
        // Increase the size of the Height property to ensure the 
        // scroll bar is visible.
        both.ScrollBars = ScrollBars.Both;
        both.Multiline = true;
        both.WordWrap = false;
        both.Height = 40;
        both.AcceptsReturn = true;
        both.Text = startString + ScrollBars.Both.ToString();

        // The none scroll bar does not require specific 
        // property settings.
        none.ScrollBars = ScrollBars.None;
        none.Text = startString + ScrollBars.None.ToString();

        // Add the textboxes to the form.
        this.Controls.Add(this.vertical);
        this.Controls.Add(this.horizontal);
        this.Controls.Add(this.both);
        this.Controls.Add(this.none);

    }

   // Declare four textboxes.
internal:
   System::Windows::Forms::TextBox^ vertical;
   System::Windows::Forms::TextBox^ horizontal;
   System::Windows::Forms::TextBox^ both;
   System::Windows::Forms::TextBox^ none;

private:
   void SetFourDifferentScrollBars()
   {
      this->vertical = gcnew System::Windows::Forms::TextBox;
      this->horizontal = gcnew System::Windows::Forms::TextBox;
      this->both = gcnew System::Windows::Forms::TextBox;
      this->none = gcnew System::Windows::Forms::TextBox;

      // Create a string for the Text property.
      String^ startString = "The scroll bar style for my textbox is: ";

      // Set the location of the four textboxes.
      horizontal->Location = Point(10,10);
      vertical->Location = Point(10,70);
      none->Location = Point(10,170);
      both->Location = Point(10,110);

      // For horizonal scroll bars, the Multiline property must
      // be true and the WordWrap property must be false.
      // Increase the size of the Height property to ensure the 
      // scroll bar is visible.
      horizontal->ScrollBars = ScrollBars::Horizontal;
      horizontal->Multiline = true;
      horizontal->WordWrap = false;
      horizontal->Height = 40;
      horizontal->Text = String::Concat( startString, ScrollBars::Horizontal );

      // For the vertical scroll bar, Multiline must be true.
      vertical->ScrollBars = ScrollBars::Vertical;
      vertical->Multiline = true;
      vertical->Text = String::Concat( startString, ScrollBars::Vertical );

      // For both scroll bars, the Multiline property 
      // must be true, and the WordWrap property must be false.
      // Increase the size of the Height property to ensure the 
      // scroll bar is visible.
      both->ScrollBars = ScrollBars::Both;
      both->Multiline = true;
      both->WordWrap = false;
      both->Height = 40;
      both->AcceptsReturn = true;
      both->Text = String::Concat( startString, ScrollBars::Both );

      // The none scroll bar does not require specific 
      // property settings.
      none->ScrollBars = ScrollBars::None;
      none->Text = String::Concat( startString, ScrollBars::None );

      // Add the textboxes to the form.
      this->Controls->Add( this->vertical );
      this->Controls->Add( this->horizontal );
      this->Controls->Add( this->both );
      this->Controls->Add( this->none );
   }