VB question.

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • me

    #1

    VB question.

    Hello.

    I have some simple code here (attached) I generated in VS.net 2k3. I
    thought I was going nuts when I did this.

    The code is simple. A windows form, w/ a button. when clicked, it opens
    a message box w/ the text in the code. I can put a whole lotta text in
    there and the text doesn't show up in the message box, or at least from
    what I can tell, but the message box will be the appropriate size to show
    the text.

    I've tried changing the settings in the display settings on the OS to no
    go. I've run this on 3 different PC's and got the same result.

    Am I missing something? If you can, take a look at the code and PLEASE
    let me know what I'm missing. ps. what's in between the 'region' tags
    was auto-generated by VS.net.

    Public Class Form1
    Inherits System.Windows. Forms.Form

    #Region " Windows Form Designer generated code "

    Public Sub New()
    MyBase.New()

    'This call is required by the Windows Form Designer.
    InitializeCompo nent()

    'Add any initialization after the InitializeCompo nent() call

    End Sub

    'Form overrides dispose to clean up the component list.
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
    If disposing Then
    If Not (components Is Nothing) Then
    components.Disp ose()
    End If
    End If
    MyBase.Dispose( disposing)
    End Sub

    'Required by the Windows Form Designer
    Private components As System.Componen tModel.IContain er

    'NOTE: The following procedure is required by the Windows Form
    Designer
    'It can be modified using the Windows Form Designer.
    'Do not modify it using the code editor.
    Friend WithEvents Button1 As System.Windows. Forms.Button
    <System.Diagnos tics.DebuggerSt epThrough()> Private Sub
    InitializeCompo nent()
    Me.Button1 = New System.Windows. Forms.Button
    Me.SuspendLayou t()
    '
    'Button1
    '
    Me.Button1.Loca tion = New System.Drawing. Point(168, 96)
    Me.Button1.Name = "Button1"
    Me.Button1.TabI ndex = 0
    Me.Button1.Text = "Button1"
    '
    'Form1
    '
    Me.AutoScaleBas eSize = New System.Drawing. Size(5, 13)
    Me.ClientSize = New System.Drawing. Size(292, 266)
    Me.Controls.Add (Me.Button1)
    Me.Name = "Form1"
    Me.Text = "Form1"
    Me.ResumeLayout (False)

    End Sub

    #End Region

    Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As
    System.EventArg s) Handles MyBase.Load

    End Sub

    Private Sub Button1_Click(B yVal sender As System.Object, ByVal e As
    System.EventArg s) Handles Button1.Click
    MessageBox.Show ("This is some flippin' text")
    End Sub
    End Class

  • Scott M.

    #2
    Re: VB question.

    I copied your code exactly as you have it below into a Windows Forms project
    and it works just fine for me.


    "me" <me@me.com> wrote in message news:Xns9652BC6 978B09memecom@6 8.6.19.6...[color=blue]
    > Hello.
    >
    > I have some simple code here (attached) I generated in VS.net 2k3. I
    > thought I was going nuts when I did this.
    >
    > The code is simple. A windows form, w/ a button. when clicked, it opens
    > a message box w/ the text in the code. I can put a whole lotta text in
    > there and the text doesn't show up in the message box, or at least from
    > what I can tell, but the message box will be the appropriate size to show
    > the text.
    >
    > I've tried changing the settings in the display settings on the OS to no
    > go. I've run this on 3 different PC's and got the same result.
    >
    > Am I missing something? If you can, take a look at the code and PLEASE
    > let me know what I'm missing. ps. what's in between the 'region' tags
    > was auto-generated by VS.net.
    >
    > Public Class Form1
    > Inherits System.Windows. Forms.Form
    >
    > #Region " Windows Form Designer generated code "
    >
    > Public Sub New()
    > MyBase.New()
    >
    > 'This call is required by the Windows Form Designer.
    > InitializeCompo nent()
    >
    > 'Add any initialization after the InitializeCompo nent() call
    >
    > End Sub
    >
    > 'Form overrides dispose to clean up the component list.
    > Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
    > If disposing Then
    > If Not (components Is Nothing) Then
    > components.Disp ose()
    > End If
    > End If
    > MyBase.Dispose( disposing)
    > End Sub
    >
    > 'Required by the Windows Form Designer
    > Private components As System.Componen tModel.IContain er
    >
    > 'NOTE: The following procedure is required by the Windows Form
    > Designer
    > 'It can be modified using the Windows Form Designer.
    > 'Do not modify it using the code editor.
    > Friend WithEvents Button1 As System.Windows. Forms.Button
    > <System.Diagnos tics.DebuggerSt epThrough()> Private Sub
    > InitializeCompo nent()
    > Me.Button1 = New System.Windows. Forms.Button
    > Me.SuspendLayou t()
    > '
    > 'Button1
    > '
    > Me.Button1.Loca tion = New System.Drawing. Point(168, 96)
    > Me.Button1.Name = "Button1"
    > Me.Button1.TabI ndex = 0
    > Me.Button1.Text = "Button1"
    > '
    > 'Form1
    > '
    > Me.AutoScaleBas eSize = New System.Drawing. Size(5, 13)
    > Me.ClientSize = New System.Drawing. Size(292, 266)
    > Me.Controls.Add (Me.Button1)
    > Me.Name = "Form1"
    > Me.Text = "Form1"
    > Me.ResumeLayout (False)
    >
    > End Sub
    >
    > #End Region
    >
    > Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As
    > System.EventArg s) Handles MyBase.Load
    >
    > End Sub
    >
    > Private Sub Button1_Click(B yVal sender As System.Object, ByVal e As
    > System.EventArg s) Handles Button1.Click
    > MessageBox.Show ("This is some flippin' text")
    > End Sub
    > End Class
    >[/color]


    Comment

    • Norman Yuan

      #3
      Re: VB question.

      My memory could be wrong here: I remember similar problem reported and it
      could be caused by certaim anti-virus program. Try to disable your
      anti-virus progam to see what happens.

      "me" <me@me.com> wrote in message news:Xns9652BC6 978B09memecom@6 8.6.19.6...[color=blue]
      > Hello.
      >
      > I have some simple code here (attached) I generated in VS.net 2k3. I
      > thought I was going nuts when I did this.
      >
      > The code is simple. A windows form, w/ a button. when clicked, it opens
      > a message box w/ the text in the code. I can put a whole lotta text in
      > there and the text doesn't show up in the message box, or at least from
      > what I can tell, but the message box will be the appropriate size to show
      > the text.
      >
      > I've tried changing the settings in the display settings on the OS to no
      > go. I've run this on 3 different PC's and got the same result.
      >
      > Am I missing something? If you can, take a look at the code and PLEASE
      > let me know what I'm missing. ps. what's in between the 'region' tags
      > was auto-generated by VS.net.
      >
      > Public Class Form1
      > Inherits System.Windows. Forms.Form
      >
      > #Region " Windows Form Designer generated code "
      >
      > Public Sub New()
      > MyBase.New()
      >
      > 'This call is required by the Windows Form Designer.
      > InitializeCompo nent()
      >
      > 'Add any initialization after the InitializeCompo nent() call
      >
      > End Sub
      >
      > 'Form overrides dispose to clean up the component list.
      > Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
      > If disposing Then
      > If Not (components Is Nothing) Then
      > components.Disp ose()
      > End If
      > End If
      > MyBase.Dispose( disposing)
      > End Sub
      >
      > 'Required by the Windows Form Designer
      > Private components As System.Componen tModel.IContain er
      >
      > 'NOTE: The following procedure is required by the Windows Form
      > Designer
      > 'It can be modified using the Windows Form Designer.
      > 'Do not modify it using the code editor.
      > Friend WithEvents Button1 As System.Windows. Forms.Button
      > <System.Diagnos tics.DebuggerSt epThrough()> Private Sub
      > InitializeCompo nent()
      > Me.Button1 = New System.Windows. Forms.Button
      > Me.SuspendLayou t()
      > '
      > 'Button1
      > '
      > Me.Button1.Loca tion = New System.Drawing. Point(168, 96)
      > Me.Button1.Name = "Button1"
      > Me.Button1.TabI ndex = 0
      > Me.Button1.Text = "Button1"
      > '
      > 'Form1
      > '
      > Me.AutoScaleBas eSize = New System.Drawing. Size(5, 13)
      > Me.ClientSize = New System.Drawing. Size(292, 266)
      > Me.Controls.Add (Me.Button1)
      > Me.Name = "Form1"
      > Me.Text = "Form1"
      > Me.ResumeLayout (False)
      >
      > End Sub
      >
      > #End Region
      >
      > Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As
      > System.EventArg s) Handles MyBase.Load
      >
      > End Sub
      >
      > Private Sub Button1_Click(B yVal sender As System.Object, ByVal e As
      > System.EventArg s) Handles Button1.Click
      > MessageBox.Show ("This is some flippin' text")
      > End Sub
      > End Class
      >[/color]


      Comment

      • Tom Shelton

        #4
        Re: VB question.

        On 2005-05-11, me <me@me.com> wrote:[color=blue]
        > Hello.
        >
        > I have some simple code here (attached) I generated in VS.net 2k3. I
        > thought I was going nuts when I did this.
        >
        > The code is simple. A windows form, w/ a button. when clicked, it opens
        > a message box w/ the text in the code. I can put a whole lotta text in
        > there and the text doesn't show up in the message box, or at least from
        > what I can tell, but the message box will be the appropriate size to show
        > the text.
        >
        > I've tried changing the settings in the display settings on the OS to no
        > go. I've run this on 3 different PC's and got the same result.
        >
        > Am I missing something? If you can, take a look at the code and PLEASE
        > let me know what I'm missing. ps. what's in between the 'region' tags
        > was auto-generated by VS.net.
        >
        > Public Class Form1
        > Inherits System.Windows. Forms.Form
        >
        > #Region " Windows Form Designer generated code "
        >
        > Public Sub New()
        > MyBase.New()
        >
        > 'This call is required by the Windows Form Designer.
        > InitializeCompo nent()
        >
        > 'Add any initialization after the InitializeCompo nent() call
        >
        > End Sub
        >
        > 'Form overrides dispose to clean up the component list.
        > Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        > If disposing Then
        > If Not (components Is Nothing) Then
        > components.Disp ose()
        > End If
        > End If
        > MyBase.Dispose( disposing)
        > End Sub
        >
        > 'Required by the Windows Form Designer
        > Private components As System.Componen tModel.IContain er
        >
        > 'NOTE: The following procedure is required by the Windows Form
        > Designer
        > 'It can be modified using the Windows Form Designer.
        > 'Do not modify it using the code editor.
        > Friend WithEvents Button1 As System.Windows. Forms.Button
        > <System.Diagnos tics.DebuggerSt epThrough()> Private Sub
        > InitializeCompo nent()
        > Me.Button1 = New System.Windows. Forms.Button
        > Me.SuspendLayou t()
        > '
        > 'Button1
        > '
        > Me.Button1.Loca tion = New System.Drawing. Point(168, 96)
        > Me.Button1.Name = "Button1"
        > Me.Button1.TabI ndex = 0
        > Me.Button1.Text = "Button1"
        > '
        > 'Form1
        > '
        > Me.AutoScaleBas eSize = New System.Drawing. Size(5, 13)
        > Me.ClientSize = New System.Drawing. Size(292, 266)
        > Me.Controls.Add (Me.Button1)
        > Me.Name = "Form1"
        > Me.Text = "Form1"
        > Me.ResumeLayout (False)
        >
        > End Sub
        >
        > #End Region
        >
        > Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As
        > System.EventArg s) Handles MyBase.Load
        >
        > End Sub
        >
        > Private Sub Button1_Click(B yVal sender As System.Object, ByVal e As
        > System.EventArg s) Handles Button1.Click
        > MessageBox.Show ("This is some flippin' text")
        > End Sub
        > End Class
        >[/color]

        Your running symantec aren't you? There's a patch for this...

        --
        Tom Shelton [MVP]

        Comment

        • Peter van der Goes

          #5
          Re: VB question.


          "me" <me@me.com> wrote in message news:Xns9652BC6 978B09memecom@6 8.6.19.6...[color=blue]
          > Hello.
          >
          > I have some simple code here (attached) I generated in VS.net 2k3. I
          > thought I was going nuts when I did this.
          >
          > The code is simple. A windows form, w/ a button. when clicked, it opens
          > a message box w/ the text in the code. I can put a whole lotta text in
          > there and the text doesn't show up in the message box, or at least from
          > what I can tell, but the message box will be the appropriate size to show
          > the text.
          >
          > I've tried changing the settings in the display settings on the OS to no
          > go. I've run this on 3 different PC's and got the same result.
          >
          > Am I missing something? If you can, take a look at the code and PLEASE
          > let me know what I'm missing. ps. what's in between the 'region' tags
          > was auto-generated by VS.net.
          >[/color]
          All three test machines are running MacAfee Anti-Virus, right? IIRC, it's
          version 8.something and MacAfee has issued a patch to correct their error.

          --
          Peter [MVP Visual Developer]
          Jack of all trades, master of none.


          Comment

          Working...