Need VB help advancing from beta1 to beta2 with a project I was working on...

Can anyone help me with some project differences between beta 1 and 2.. Here is the biggest problem I have. I can't view forms in the designer. Code executes though the way it should when I compile and run. I just can't make modifications to the forms. Here is the jist of most of the problems I have...

Warning 1 Method 'System.Drawing.SizeF.op_Implicit' not found. That points to this line of code...

Me.AutoScaleDimensions = New System.Drawing.Size(5, 13)

And then there is this...

Warning 5 'System.Windows.Forms.RaftingContainer' is obsolete: 'This class will be removed after Beta 2, consider using ToolStripContainer/ToolStripPanel instead'  That points to these lines of code...

Friend WithEvents leftRaftingContainer As System.Windows.Forms.RaftingContainer

Friend WithEvents rightRaftingContainer As System.Windows.Forms.RaftingContainer

Friend WithEvents topRaftingContainer As System.Windows.Forms.RaftingContainer

Friend WithEvents bottomRaftingContainer As System.Windows.Forms.RaftingContainer

I have this across all the forms in the project and its too far messed up to revert back to beta 1. I don't mind pushing forward I just need some help with the new language....




Answer this question

Need VB help advancing from beta1 to beta2 with a project I was working on...

  • MartyW

    look like i have the same problem but i don't see anything about rafting.

    the error message points too

    Me.AutoScaleDimensions = New System.Drawing.Size(8, 19)

    but the program runs okay with no problems just can't access the designer on any of my forms. here some of my code from the

    Windows Form Designer generated code

     

    Public Sub New()

    MyBase.New()

    'This call is required by the Windows Form Designer.

    InitializeComponent()

    'Add any initialization after the InitializeComponent() 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.Dispose()

    End If

    End If

    MyBase.Dispose(disposing)

    End Sub

    'Required by the Windows Form Designer

    Private components As System.ComponentModel.IContainer

    '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 btnTest As System.Windows.Forms.Button

    Friend WithEvents btnOptionStrict As System.Windows.Forms.Button

    Friend WithEvents btnVariables As System.Windows.Forms.Button

    Friend WithEvents btnStatic As System.Windows.Forms.Button

    Friend WithEvents btnDataTypes As System.Windows.Forms.Button

    Friend WithEvents btnConversions As System.Windows.Forms.Button

    Friend WithEvents btnOperators As System.Windows.Forms.Button

    Friend WithEvents btnProcedures As System.Windows.Forms.Button

    Friend WithEvents btnLoop As System.Windows.Forms.Button

    Friend WithEvents btnEnumerations As System.Windows.Forms.Button

    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    Me.btnTest = New System.Windows.Forms.Button()

    Me.btnOptionStrict = New System.Windows.Forms.Button()

    Me.btnVariables = New System.Windows.Forms.Button()

    Me.btnStatic = New System.Windows.Forms.Button()

    Me.btnDataTypes = New System.Windows.Forms.Button()

    Me.btnConversions = New System.Windows.Forms.Button()

    Me.btnOperators = New System.Windows.Forms.Button()

    Me.btnProcedures = New System.Windows.Forms.Button()

    Me.btnLoop = New System.Windows.Forms.Button()

    Me.btnEnumerations = New System.Windows.Forms.Button()

    Me.SuspendLayout()

    '

    'btnTest

    '

    Me.btnTest.Location = New System.Drawing.Point(16, 312)

    Me.btnTest.Name = "btnTest"

    Me.btnTest.Size = New System.Drawing.Size(216, 32)

    Me.btnTest.TabIndex = 0

    Me.btnTest.Text = "Display Test Form"

    '

    'btnOptionStrict

    '

    Me.btnOptionStrict.Location = New System.Drawing.Point(16, 16)

    Me.btnOptionStrict.Name = "btnOptionStrict"

    Me.btnOptionStrict.Size = New System.Drawing.Size(216, 32)

    Me.btnOptionStrict.TabIndex = 1

    Me.btnOptionStrict.Text = "&Option Strict Demo"

    '

    'btnVariables

    '

    Me.btnVariables.Location = New System.Drawing.Point(16, 48)

    Me.btnVariables.Name = "btnVariables"

    Me.btnVariables.Size = New System.Drawing.Size(216, 32)

    Me.btnVariables.TabIndex = 2

    Me.btnVariables.Text = "Declare &Variables"

    '

    'btnStatic

    '

    Me.btnStatic.Location = New System.Drawing.Point(16, 80)

    Me.btnStatic.Name = "btnStatic"

    Me.btnStatic.Size = New System.Drawing.Size(216, 32)

    Me.btnStatic.TabIndex = 3

    Me.btnStatic.Text = "&Work With Variables"

    '

    'btnDataTypes

    '

    Me.btnDataTypes.Location = New System.Drawing.Point(16, 112)

    Me.btnDataTypes.Name = "btnDataTypes"

    Me.btnDataTypes.Size = New System.Drawing.Size(216, 32)

    Me.btnDataTypes.TabIndex = 4

    Me.btnDataTypes.Text = "&Data Types"

    '

    'btnConversions

    '

    Me.btnConversions.Location = New System.Drawing.Point(16, 144)

    Me.btnConversions.Name = "btnConversions"

    Me.btnConversions.Size = New System.Drawing.Size(216, 32)

    Me.btnConversions.TabIndex = 5

    Me.btnConversions.Text = "Data Type &Conversions"

    '

    'btnOperators

    '

    Me.btnOperators.Location = New System.Drawing.Point(16, 176)

    Me.btnOperators.Name = "btnOperators"

    Me.btnOperators.Size = New System.Drawing.Size(216, 32)

    Me.btnOperators.TabIndex = 6

    Me.btnOperators.Text = "&Operators"

    '

    'btnProcedures

    '

    Me.btnProcedures.Location = New System.Drawing.Point(16, 208)

    Me.btnProcedures.Name = "btnProcedures"

    Me.btnProcedures.Size = New System.Drawing.Size(216, 32)

    Me.btnProcedures.TabIndex = 7

    Me.btnProcedures.Text = "&Procedures"

    '

    'btnLoop

    '

    Me.btnLoop.Location = New System.Drawing.Point(16, 240)

    Me.btnLoop.Name = "btnLoop"

    Me.btnLoop.Size = New System.Drawing.Size(216, 32)

    Me.btnLoop.TabIndex = 8

    Me.btnLoop.Text = "&Looping and Control Flow"

    '

    'btnEnumerations

    '

    Me.btnEnumerations.Location = New System.Drawing.Point(16, 272)

    Me.btnEnumerations.Name = "btnEnumerations"

    Me.btnEnumerations.Size = New System.Drawing.Size(216, 32)

    Me.btnEnumerations.TabIndex = 10

    Me.btnEnumerations.Text = "&Enumerations"

    '

    'frmMain

    '

    Me.AutoScaleDimensions = New System.Drawing.Size(8, 19)

    Me.ClientSize = New System.Drawing.Size(248, 394)

    Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnEnumerations, Me.btnLoop, Me.btnProcedures, Me.btnOperators, Me.btnConversions, Me.btnDataTypes, Me.btnStatic, Me.btnVariables, Me.btnOptionStrict, Me.btnTest})

    Me.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))

    Me.Name = "frmMain"

    Me.Text = "Switchboard"

    Me.ResumeLayout(False)

    End Sub

    #End Region





  • Nathan Jones

    If u still are having problems with this i solved it u have to change the .Size(8, 19)

    Me.AutoScaleDimensions = New System.Drawing.Size(8, 19)

    to .SizeF(8, 19)

    Me.AutoScaleDimensions = New System.Drawing.SizeF(8, 19)

    because that is what i guess the new format is in VB 2005


  • Jeromy Carriere

    Thank You that did the trick...

    Ed Owens


  • Big Bro

    RaftingContainer has been removed.  To fix your form, remove all lines of code from the .designer.vb file that reference the word "rafting".

    I'm not sure about the AutoScaleDimensions issue, that code looks correct to me. 
    Remove the rafting lines of code and try to open in the designer again.

     - mike

  • Need VB help advancing from beta1 to beta2 with a project I was working on...