Monografias.com > Sin categoría
Descargar Imprimir Comentar Ver trabajos relacionados

Graficadora de funciones matemáticas en Visual Basic 2005 (página 3)




Enviado por jaimemontoya



Partes: 1, 2, 3, 4, 5, 6

Me.Controls.Add(Me.exponentialfunction)

Me.Controls.Add(Me.functionfunction)

Me.Controls.Add(Me.Label6)

Me.Controls.Add(Me.graficar)

Me.Name =
"formulariodeinicio"

Me.StartPosition =
System.Windows.Forms.FormStartPosition.CenterScreen

Me.Text =
"Graficador de Funciones
Matemáticas"

CType(Me.bienvenido,
System.ComponentModel.ISupportInitialize).EndInit()

CType(Me.sinfunction,
System.ComponentModel.ISupportInitialize).EndInit()

CType(Me.cosfunction,
System.ComponentModel.ISupportInitialize).EndInit()

CType(Me.parabolefunction,
System.ComponentModel.ISupportInitialize).EndInit()

CType(Me.tanfunction,
System.ComponentModel.ISupportInitialize).EndInit()

CType(Me.exponentialfunction,
System.ComponentModel.ISupportInitialize).EndInit()

CType(Me.functionfunction,
System.ComponentModel.ISupportInitialize).EndInit()

Me.ResumeLayout(False)

Me.PerformLayout()

End Sub

Friend WithEvents Timer3 As System.Windows.Forms.Timer

Friend WithEvents Timer2 As System.Windows.Forms.Timer

Friend WithEvents Timer1 As System.Windows.Forms.Timer

Friend WithEvents Timer4 As System.Windows.Forms.Timer

Friend WithEvents bienvenido As
System.Windows.Forms.PictureBox

Friend WithEvents Timer6 As System.Windows.Forms.Timer

Friend WithEvents Timer5 As System.Windows.Forms.Timer

Friend WithEvents sinfunction As
System.Windows.Forms.PictureBox

Friend WithEvents cosfunction As
System.Windows.Forms.PictureBox

Friend WithEvents parabolefunction
As
System.Windows.Forms.PictureBox

Friend WithEvents tanfunction As
System.Windows.Forms.PictureBox

Friend WithEvents exponentialfunction
As
System.Windows.Forms.PictureBox

Friend WithEvents functionfunction
As
System.Windows.Forms.PictureBox

Friend WithEvents Label6 As System.Windows.Forms.Label

Friend WithEvents graficar As System.Windows.Forms.Button

End Class

formulariodesalida.Designer.vb

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
_

Partial Class formulariodesalida

Inherits
System.Windows.Forms.Form

'Form reemplaza a Dispose para limpiar
la lista de componentes.

<System.Diagnostics.DebuggerNonUserCode()>
_

Protected Overrides Sub
Dispose(ByVal
disposing As
Boolean)

Try

If disposing
AndAlso components
IsNot Nothing Then

components.Dispose()

End If

Finally

MyBase.Dispose(disposing)

End Try

End Sub

'Requerido por el Diseñador de
Windows Forms

Private components
As
System.ComponentModel.IContainer

'NOTA: el Diseñador de Windows
Forms necesita el siguiente procedimiento

'Se puede modificar usando el
Diseñador de Windows Forms.

'No lo modifique con el editor de
código.

<System.Diagnostics.DebuggerStepThrough()>
_

Private Sub InitializeComponent()

Me.components =
New
System.ComponentModel.Container

Dim resources
As
System.ComponentModel.ComponentResourceManager =
New
System.ComponentModel.ComponentResourceManager(GetType(formulariodesalida))

Me.labelcerrando =
New
System.Windows.Forms.Label

Me.Timer2 =
New
System.Windows.Forms.Timer(Me.components)

Me.Timer1 =
New
System.Windows.Forms.Timer(Me.components)

Me.labelsaliendodelprograma
= New
System.Windows.Forms.Label

Me.SuspendLayout()

'

'labelcerrando

'

Me.labelcerrando.AutoSize
= True

Me.labelcerrando.BackColor
= System.Drawing.Color.Transparent

Me.labelcerrando.Font
= New
System.Drawing.Font("Georgia", 36.0!, CType((System.Drawing.FontStyle.Bold
Or
System.Drawing.FontStyle.Italic),
System.Drawing.FontStyle),
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.labelcerrando.ForeColor
= System.Drawing.Color.White

Me.labelcerrando.Location
= New
System.Drawing.Point(250, 270)

Me.labelcerrando.Name
= "labelcerrando"

Me.labelcerrando.Size
= New
System.Drawing.Size(313, 56)

Me.labelcerrando.TabIndex =
45

Me.labelcerrando.Text
= "Cerrando…"

Me.labelcerrando.Visible
= False

'

'Timer2

'

Me.Timer2.Enabled =
True

Me.Timer2.Interval =
4000

'

'Timer1

'

Me.Timer1.Enabled =
True

Me.Timer1.Interval =
2000

'

'labelsaliendodelprograma

'

Me.labelsaliendodelprograma.AutoSize
= True

Me.labelsaliendodelprograma.BackColor =
System.Drawing.Color.Transparent

Me.labelsaliendodelprograma.Font =
New
System.Drawing.Font("Georgia", 36.0!, CType((System.Drawing.FontStyle.Bold
Or
System.Drawing.FontStyle.Italic),
System.Drawing.FontStyle),
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.labelsaliendodelprograma.ForeColor =
System.Drawing.Color.White

Me.labelsaliendodelprograma.Location
= New
System.Drawing.Point(70, 270)

Me.labelsaliendodelprograma.Name =
"labelsaliendodelprograma"

Me.labelsaliendodelprograma.Size =
New System.Drawing.Size(653,
56)

Me.labelsaliendodelprograma.TabIndex =
44

Me.labelsaliendodelprograma.Text =
"Saliendo del Programa…"

'

'formulariodesalida

'

Me.AutoScaleDimensions
= New
System.Drawing.SizeF(6.0!, 13.0!)

Me.AutoScaleMode =
System.Windows.Forms.AutoScaleMode.Font

Me.BackgroundImage =
CType(resources.GetObject("$this.BackgroundImage"),
System.Drawing.Image)

Me.ClientSize =
New System.Drawing.Size(793,
596)

Me.Controls.Add(Me.labelcerrando)

Me.Controls.Add(Me.labelsaliendodelprograma)

Me.Name =
"formulariodesalida"

Me.StartPosition =
System.Windows.Forms.FormStartPosition.CenterScreen

Me.Text =
"Graficador de Funciones
Matemáticas"

Me.ResumeLayout(False)

Me.PerformLayout()

End Sub

Friend WithEvents labelcerrando
As
System.Windows.Forms.Label

Friend WithEvents Timer2 As System.Windows.Forms.Timer

Friend WithEvents Timer1 As System.Windows.Forms.Timer

Friend WithEvents labelsaliendodelprograma
As
System.Windows.Forms.Label

End Class

formulariometododelafalsaposicion.Designer.vb

 

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
_

Partial Class
formulariometododelafalsaposicion

Inherits
System.Windows.Forms.Form

'Form reemplaza a Dispose para limpiar
la lista de componentes.

<System.Diagnostics.DebuggerNonUserCode()>
_

Protected Overrides Sub
Dispose(ByVal
disposing As
Boolean)

Try

If disposing
AndAlso components
IsNot Nothing Then

components.Dispose()

End If

Finally

MyBase.Dispose(disposing)

End Try

End Sub

'Requerido por el Diseñador de
Windows Forms

Private components
As
System.ComponentModel.IContainer

'NOTA: el Diseñador de Windows
Forms necesita el siguiente procedimiento

'Se puede modificar usando el
Diseñador de Windows Forms.

'No lo modifique con el editor de
código.

<System.Diagnostics.DebuggerStepThrough()>
_

Private Sub InitializeComponent()

Dim resources
As
System.ComponentModel.ComponentResourceManager =
New
System.ComponentModel.ComponentResourceManager(GetType(formulariometododelafalsaposicion))

Me.TextBox2 =
New
System.Windows.Forms.TextBox

Me.Label3 =
New
System.Windows.Forms.Label

Me.TextBox1 =
New
System.Windows.Forms.TextBox

Me.Label2 =
New
System.Windows.Forms.Label

Me.regresar =
New
System.Windows.Forms.Button

Me.encontrarraizconmetodofalsaposicion
= New
System.Windows.Forms.Button

Me.textboxtolerancia
= New
System.Windows.Forms.TextBox

Me.textboxb =
New
System.Windows.Forms.TextBox

Me.textboxa =
New
System.Windows.Forms.TextBox

Me.labeltolerancia =
New
System.Windows.Forms.Label

Me.labelb =
New
System.Windows.Forms.Label

Me.Labela =
New
System.Windows.Forms.Label

Me.textboxfuncion =
New
System.Windows.Forms.TextBox

Me.Label1 =
New
System.Windows.Forms.Label

Me.Label6 =
New
System.Windows.Forms.Label

Me.AxMSFlexGrid1 =
New
AxMSFlexGridLib.AxMSFlexGrid

CType(Me.AxMSFlexGrid1,
System.ComponentModel.ISupportInitialize).BeginInit()

Me.SuspendLayout()

'

'TextBox2

'

Me.TextBox2.Location
= New
System.Drawing.Point(637, 560)

Me.TextBox2.Name =
"TextBox2"

Me.TextBox2.Size =
New System.Drawing.Size(88,
20)

Me.TextBox2.TabIndex =
74

'

'Label3

'

Me.Label3.AutoSize =
True

Me.Label3.BackColor =
System.Drawing.Color.Transparent

Me.Label3.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Label3.ForeColor =
System.Drawing.Color.White

Me.Label3.Location =
New System.Drawing.Point(513,
561)

Me.Label3.Name =
"Label3"

Me.Label3.Size =
New System.Drawing.Size(119,
16)

Me.Label3.TabIndex =
73

Me.Label3.Text =
"con un error de"

'

'TextBox1

'

Me.TextBox1.Location
= New
System.Drawing.Point(437, 561)

Me.TextBox1.Name =
"TextBox1"

Me.TextBox1.Size =
New System.Drawing.Size(70,
20)

Me.TextBox1.TabIndex =
72

'

'Label2

'

Me.Label2.AutoSize =
True

Me.Label2.BackColor =
System.Drawing.Color.Transparent

Me.Label2.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Label2.ForeColor =
System.Drawing.Color.White

Me.Label2.Location =
New System.Drawing.Point(31,
564)

Me.Label2.Name =
"Label2"

Me.Label2.Size =
New System.Drawing.Size(396,
16)

Me.Label2.TabIndex =
71

Me.Label2.Text =
"La raíz de la función
introducida es aproximadamente"

'

'regresar

'

Me.regresar.BackgroundImage
= CType(resources.GetObject("regresar.BackgroundImage"),
System.Drawing.Image)

Me.regresar.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.regresar.Location
= New
System.Drawing.Point(392, 143)

Me.regresar.Name =
"regresar"

Me.regresar.Size =
New System.Drawing.Size(147,
45)

Me.regresar.TabIndex =
70

Me.regresar.Text =
"Regresar"

Me.regresar.UseVisualStyleBackColor
= True

'

'encontrarraizconmetodofalsaposicion

'

Me.encontrarraizconmetodofalsaposicion.BackgroundImage
= CType(resources.GetObject("encontrarraizconmetodofalsaposicion.BackgroundImage"),
System.Drawing.Image)

Me.encontrarraizconmetodofalsaposicion.Font
= New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.encontrarraizconmetodofalsaposicion.Location
= New
System.Drawing.Point(223, 143)

Me.encontrarraizconmetodofalsaposicion.Name
= "encontrarraizconmetodofalsaposicion"

Me.encontrarraizconmetodofalsaposicion.Size
= New
System.Drawing.Size(147, 45)

Me.encontrarraizconmetodofalsaposicion.TabIndex
= 69

Me.encontrarraizconmetodofalsaposicion.Text
= "Encontrar Raíz"

Me.encontrarraizconmetodofalsaposicion.UseVisualStyleBackColor
= True

'

'textboxtolerancia

'

Me.textboxtolerancia.Location =
New System.Drawing.Point(532,
104)

Me.textboxtolerancia.Name
= "textboxtolerancia"

Me.textboxtolerancia.Size
= New
System.Drawing.Size(57, 20)

Me.textboxtolerancia.TabIndex =
68

'

'textboxb

'

Me.textboxb.Location
= New
System.Drawing.Point(325, 103)

Me.textboxb.Name =
"textboxb"

Me.textboxb.Size =
New System.Drawing.Size(57,
20)

Me.textboxb.TabIndex =
67

'

'textboxa

'

Me.textboxa.Location
= New
System.Drawing.Point(184, 103)

Me.textboxa.Name =
"textboxa"

Me.textboxa.Size =
New System.Drawing.Size(57,
20)

Me.textboxa.TabIndex =
66

'

'labeltolerancia

'

Me.labeltolerancia.AutoSize
= True

Me.labeltolerancia.BackColor =
System.Drawing.Color.Transparent

Me.labeltolerancia.Font
= New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.labeltolerancia.ForeColor =
System.Drawing.Color.White

Me.labeltolerancia.Location
= New
System.Drawing.Point(442, 104)

Me.labeltolerancia.Name
= "labeltolerancia"

Me.labeltolerancia.Size
= New
System.Drawing.Size(92, 16)

Me.labeltolerancia.TabIndex
= 65

Me.labeltolerancia.Text
= "Tolerancia:"

'

'labelb

'

Me.labelb.AutoSize =
True

Me.labelb.BackColor =
System.Drawing.Color.Transparent

Me.labelb.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.labelb.ForeColor =
System.Drawing.Color.White

Me.labelb.Location =
New System.Drawing.Point(300,
108)

Me.labelb.Name =
"labelb"

Me.labelb.Size =
New System.Drawing.Size(22,
16)

Me.labelb.TabIndex =
64

Me.labelb.Text =
"b:"

'

'Labela

'

Me.Labela.AutoSize =
True

Me.Labela.BackColor =
System.Drawing.Color.Transparent

Me.Labela.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Labela.ForeColor =
System.Drawing.Color.White

Me.Labela.Location =
New System.Drawing.Point(162,
104)

Me.Labela.Name =
"Labela"

Me.Labela.Size =
New System.Drawing.Size(21,
16)

Me.Labela.TabIndex =
63

Me.Labela.Text =
"a:"

'

'textboxfuncion

'

Me.textboxfuncion.Location
= New
System.Drawing.Point(310, 72)

Me.textboxfuncion.Name
= "textboxfuncion"

Me.textboxfuncion.Size
= New
System.Drawing.Size(229, 20)

Me.textboxfuncion.TabIndex
= 62

'

'Label1

'

Me.Label1.AutoSize =
True

Me.Label1.BackColor =
System.Drawing.Color.Transparent

Me.Label1.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Label1.ForeColor =
System.Drawing.Color.White

Me.Label1.Location =
New System.Drawing.Point(220,
72)

Me.Label1.Name =
"Label1"

Me.Label1.Size =
New System.Drawing.Size(74,
16)

Me.Label1.TabIndex =
61

Me.Label1.Text =
"Función:"

'

'Label6

'

Me.Label6.AutoSize =
True

Me.Label6.BackColor =
System.Drawing.Color.Transparent

Me.Label6.Font =
New
System.Drawing.Font("Georgia", 20.25!, CType(((System.Drawing.FontStyle.Bold
Or
System.Drawing.FontStyle.Italic) _

Or
System.Drawing.FontStyle.Underline),
System.Drawing.FontStyle),
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Label6.ForeColor =
System.Drawing.Color.White

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

Me.Label6.Name =
"Label6"

Me.Label6.Size =
New System.Drawing.Size(735,
31)

Me.Label6.TabIndex =
60

Me.Label6.Text =
"Método de
la Falsa Posición Para Encontrar Raíces"

'

'AxMSFlexGrid1

'

Me.AxMSFlexGrid1.Location
= New
System.Drawing.Point(52, 214)

Me.AxMSFlexGrid1.Name
= "AxMSFlexGrid1"

Me.AxMSFlexGrid1.OcxState
= CType(resources.GetObject("AxMSFlexGrid1.OcxState"),
System.Windows.Forms.AxHost.State)

Me.AxMSFlexGrid1.Size
= New
System.Drawing.Size(666, 342)

Me.AxMSFlexGrid1.TabIndex =
75

'

'formulariometododelafalsaposicion

'

Me.AutoScaleDimensions
= New
System.Drawing.SizeF(6.0!, 13.0!)

Me.AutoScaleMode =
System.Windows.Forms.AutoScaleMode.Font

Me.BackgroundImage =
CType(resources.GetObject("$this.BackgroundImage"),
System.Drawing.Image)

Me.ClientSize =
New System.Drawing.Size(767,
596)

Me.Controls.Add(Me.AxMSFlexGrid1)

Me.Controls.Add(Me.TextBox2)

Me.Controls.Add(Me.Label3)

Me.Controls.Add(Me.TextBox1)

Me.Controls.Add(Me.Label2)

Me.Controls.Add(Me.regresar)

Me.Controls.Add(Me.encontrarraizconmetodofalsaposicion)

Me.Controls.Add(Me.textboxtolerancia)

Me.Controls.Add(Me.textboxb)

Me.Controls.Add(Me.textboxa)

Me.Controls.Add(Me.labeltolerancia)

Me.Controls.Add(Me.labelb)

Me.Controls.Add(Me.Labela)

Me.Controls.Add(Me.textboxfuncion)

Me.Controls.Add(Me.Label1)

Me.Controls.Add(Me.Label6)

Me.Name =
"formulariometododelafalsaposicion"

Me.StartPosition =
System.Windows.Forms.FormStartPosition.CenterScreen

Me.Text =
"Método de la Falsa Posición
Para Encontrar Raíces"

CType(Me.AxMSFlexGrid1,
System.ComponentModel.ISupportInitialize).EndInit()

Me.ResumeLayout(False)

Me.PerformLayout()

End Sub

Friend WithEvents TextBox2 As System.Windows.Forms.TextBox

Friend WithEvents Label3 As System.Windows.Forms.Label

Friend WithEvents TextBox1 As System.Windows.Forms.TextBox

Friend WithEvents Label2 As System.Windows.Forms.Label

Friend WithEvents regresar As System.Windows.Forms.Button

Friend WithEvents
encontrarraizconmetodofalsaposicion As System.Windows.Forms.Button

Friend WithEvents textboxtolerancia
As
System.Windows.Forms.TextBox

Friend WithEvents textboxb As System.Windows.Forms.TextBox

Friend WithEvents textboxa As System.Windows.Forms.TextBox

Friend WithEvents labeltolerancia
As
System.Windows.Forms.Label

Friend WithEvents labelb As System.Windows.Forms.Label

Friend WithEvents Labela As System.Windows.Forms.Label

Friend WithEvents textboxfuncion
As
System.Windows.Forms.TextBox

Friend WithEvents Label1 As System.Windows.Forms.Label

Friend WithEvents Label6 As System.Windows.Forms.Label

Friend WithEvents AxMSFlexGrid1
As
AxMSFlexGridLib.AxMSFlexGrid

End Class

formulariometodonewtonraphson.Designer.vb

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
_

Partial Class
formulariometodonewtonraphson

Inherits
System.Windows.Forms.Form

'Form reemplaza a Dispose para limpiar
la lista de componentes.

<System.Diagnostics.DebuggerNonUserCode()>
_

Protected Overrides Sub
Dispose(ByVal
disposing As
Boolean)

Try

If disposing
AndAlso components
IsNot Nothing Then

components.Dispose()

End If

Finally

MyBase.Dispose(disposing)

End Try

End Sub

'Requerido por el Diseñador de
Windows Forms

Private components
As
System.ComponentModel.IContainer

'NOTA: el Diseñador de Windows
Forms necesita el siguiente procedimiento

'Se puede modificar usando el
Diseñador de Windows Forms.

'No lo modifique con el editor de
código.

<System.Diagnostics.DebuggerStepThrough()>
_

Private Sub InitializeComponent()

Dim resources
As
System.ComponentModel.ComponentResourceManager =
New
System.ComponentModel.ComponentResourceManager(GetType(formulariometodonewtonraphson))

Me.TextBox2 =
New
System.Windows.Forms.TextBox

Me.Label3 =
New
System.Windows.Forms.Label

Me.TextBox1 =
New
System.Windows.Forms.TextBox

Me.Label2 =
New
System.Windows.Forms.Label

Me.regresar =
New
System.Windows.Forms.Button

Me.encontrarraizconmetodonewtonraphson
= New
System.Windows.Forms.Button

Me.textboxtolerancia
= New
System.Windows.Forms.TextBox

Me.textboxx0 =
New
System.Windows.Forms.TextBox

Me.labeltolerancia =
New
System.Windows.Forms.Label

Me.Labela =
New
System.Windows.Forms.Label

Me.textboxfuncion =
New
System.Windows.Forms.TextBox

Me.Label1 =
New
System.Windows.Forms.Label

Me.Label6 =
New
System.Windows.Forms.Label

Me.AxMSFlexGrid1 =
New
AxMSFlexGridLib.AxMSFlexGrid

CType(Me.AxMSFlexGrid1,
System.ComponentModel.ISupportInitialize).BeginInit()

Me.SuspendLayout()

'

'TextBox2

'

Me.TextBox2.Location
= New
System.Drawing.Point(646, 558)

Me.TextBox2.Name =
"TextBox2"

Me.TextBox2.Size =
New System.Drawing.Size(74,
20)

Me.TextBox2.TabIndex =
83

'

'Label3

'

Me.Label3.AutoSize =
True

Me.Label3.BackColor =
System.Drawing.Color.Transparent

Me.Label3.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Label3.ForeColor =
System.Drawing.Color.White

Me.Label3.Location =
New System.Drawing.Point(521,
560)

Me.Label3.Name =
"Label3"

Me.Label3.Size =
New System.Drawing.Size(119,
16)

Me.Label3.TabIndex =
82

Me.Label3.Text =
"con un error de"

'

'TextBox1

'

Me.TextBox1.Location
= New
System.Drawing.Point(441, 559)

Me.TextBox1.Name =
"TextBox1"

Me.TextBox1.Size =
New System.Drawing.Size(74,
20)

Me.TextBox1.TabIndex =
81

'

'Label2

'

Me.Label2.AutoSize =
True

Me.Label2.BackColor =
System.Drawing.Color.Transparent

Me.Label2.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Label2.ForeColor =
System.Drawing.Color.White

Me.Label2.Location =
New System.Drawing.Point(39,
559)

Me.Label2.Name =
"Label2"

Me.Label2.Size =
New System.Drawing.Size(396,
16)

Me.Label2.TabIndex =
80

Me.Label2.Text =
"La raíz de la función
introducida es aproximadamente"

'

'regresar

'

Me.regresar.BackgroundImage
= CType(resources.GetObject("regresar.BackgroundImage"),
System.Drawing.Image)

Me.regresar.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.regresar.Location
= New
System.Drawing.Point(396, 143)

Me.regresar.Name =
"regresar"

Me.regresar.Size =
New System.Drawing.Size(147,
45)

Me.regresar.TabIndex =
79

Me.regresar.Text =
"Regresar"

Me.regresar.UseVisualStyleBackColor
= True

'

'encontrarraizconmetodonewtonraphson

'

Me.encontrarraizconmetodonewtonraphson.BackgroundImage
= CType(resources.GetObject("encontrarraizconmetodonewtonraphson.BackgroundImage"),
System.Drawing.Image)

Me.encontrarraizconmetodonewtonraphson.Font
= New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.encontrarraizconmetodonewtonraphson.Location
= New
System.Drawing.Point(227, 143)

Me.encontrarraizconmetodonewtonraphson.Name
= "encontrarraizconmetodonewtonraphson"

Me.encontrarraizconmetodonewtonraphson.Size
= New
System.Drawing.Size(147, 45)

Me.encontrarraizconmetodonewtonraphson.TabIndex
= 78

Me.encontrarraizconmetodonewtonraphson.Text
= "Encontrar Raíz"

Me.encontrarraizconmetodonewtonraphson.UseVisualStyleBackColor
= True

'

'textboxtolerancia

'

Me.textboxtolerancia.Location =
New System.Drawing.Point(475,
113)

Me.textboxtolerancia.Name
= "textboxtolerancia"

Me.textboxtolerancia.Size
= New
System.Drawing.Size(57, 20)

Me.textboxtolerancia.TabIndex =
77

'

'textboxx0

'

Me.textboxx0.Location
= New
System.Drawing.Point(277, 109)

Me.textboxx0.Name =
"textboxx0"

Me.textboxx0.Size =
New System.Drawing.Size(57,
20)

Me.textboxx0.TabIndex =
76

'

'labeltolerancia

'

Me.labeltolerancia.AutoSize
= True

Me.labeltolerancia.BackColor =
System.Drawing.Color.Transparent

Me.labeltolerancia.Font
= New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.labeltolerancia.ForeColor =
System.Drawing.Color.White

Me.labeltolerancia.Location
= New
System.Drawing.Point(385, 113)

Me.labeltolerancia.Name
= "labeltolerancia"

Me.labeltolerancia.Size
= New
System.Drawing.Size(92, 16)

Me.labeltolerancia.TabIndex
= 75

Me.labeltolerancia.Text
= "Tolerancia:"

'

'Labela

'

Me.Labela.AutoSize =
True

Me.Labela.BackColor =
System.Drawing.Color.Transparent

Me.Labela.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Labela.ForeColor =
System.Drawing.Color.White

Me.Labela.Location =
New System.Drawing.Point(239,
110)

Me.Labela.Name =
"Labela"

Me.Labela.Size =
New System.Drawing.Size(32,
16)

Me.Labela.TabIndex =
74

Me.Labela.Text =
"Xo:"

'

'textboxfuncion

'

Me.textboxfuncion.Location
= New
System.Drawing.Point(314, 72)

Me.textboxfuncion.Name
= "textboxfuncion"

Me.textboxfuncion.Size
= New
System.Drawing.Size(229, 20)

Me.textboxfuncion.TabIndex
= 73

'

'Label1

'

Me.Label1.AutoSize =
True

Me.Label1.BackColor =
System.Drawing.Color.Transparent

Me.Label1.Font =
New
System.Drawing.Font("Georgia", 9.75!,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Label1.ForeColor =
System.Drawing.Color.White

Me.Label1.Location =
New System.Drawing.Point(224,
72)

Me.Label1.Name =
"Label1"

Me.Label1.Size =
New System.Drawing.Size(74,
16)

Me.Label1.TabIndex =
72

Me.Label1.Text =
"Función:"

'

'Label6

'

Me.Label6.AutoSize =
True

Me.Label6.BackColor =
System.Drawing.Color.Transparent

Me.Label6.Font =
New
System.Drawing.Font("Georgia", 20.25!, CType(((System.Drawing.FontStyle.Bold
Or
System.Drawing.FontStyle.Italic) _

Or
System.Drawing.FontStyle.Underline),
System.Drawing.FontStyle),
System.Drawing.GraphicsUnit.Point, CType(0, Byte))

Me.Label6.ForeColor =
System.Drawing.Color.White

Me.Label6.Location =
New System.Drawing.Point(13,
17)

Me.Label6.Name =
"Label6"

Me.Label6.Size =
New System.Drawing.Size(740,
31)

Me.Label6.TabIndex =
71

Me.Label6.Text =
"Método de Newton-Raphson
Para Encontrar Raíces"

'

'AxMSFlexGrid1

'

Me.AxMSFlexGrid1.Location
= New
System.Drawing.Point(127, 207)

Me.AxMSFlexGrid1.Name
= "AxMSFlexGrid1"

Me.AxMSFlexGrid1.OcxState
= CType(resources.GetObject("AxMSFlexGrid1.OcxState"),
System.Windows.Forms.AxHost.State)

Me.AxMSFlexGrid1.Size
= New
System.Drawing.Size(537, 342)

Me.AxMSFlexGrid1.TabIndex =
84

'

'formulariometodonewtonraphson

'

Me.AutoScaleDimensions
= New
System.Drawing.SizeF(6.0!, 13.0!)

Me.AutoScaleMode =
System.Windows.Forms.AutoScaleMode.Font

Me.BackgroundImage =
CType(resources.GetObject("$this.BackgroundImage"),
System.Drawing.Image)

Me.ClientSize =
New System.Drawing.Size(767,
596)

Me.Controls.Add(Me.AxMSFlexGrid1)

Me.Controls.Add(Me.TextBox2)

Me.Controls.Add(Me.Label3)

Me.Controls.Add(Me.TextBox1)

Me.Controls.Add(Me.Label2)

Me.Controls.Add(Me.regresar)

Me.Controls.Add(Me.encontrarraizconmetodonewtonraphson)

Me.Controls.Add(Me.textboxtolerancia)

Me.Controls.Add(Me.textboxx0)

Me.Controls.Add(Me.labeltolerancia)

Me.Controls.Add(Me.Labela)

Me.Controls.Add(Me.textboxfuncion)

Me.Controls.Add(Me.Label1)

Me.Controls.Add(Me.Label6)

Me.Name =
"formulariometodonewtonraphson"

Me.StartPosition =
System.Windows.Forms.FormStartPosition.CenterScreen

Me.Text =
"Método de Newton-Raphson Para
Encontrar Raíces"

CType(Me.AxMSFlexGrid1,
System.ComponentModel.ISupportInitialize).EndInit()

Me.ResumeLayout(False)

Me.PerformLayout()

End Sub

Friend WithEvents TextBox2 As System.Windows.Forms.TextBox

Friend WithEvents Label3 As System.Windows.Forms.Label

Friend WithEvents TextBox1 As System.Windows.Forms.TextBox

Friend WithEvents Label2 As System.Windows.Forms.Label

Friend WithEvents regresar As System.Windows.Forms.Button

Friend WithEvents
encontrarraizconmetodonewtonraphson As System.Windows.Forms.Button

Friend WithEvents textboxtolerancia
As
System.Windows.Forms.TextBox

Friend WithEvents textboxx0 As System.Windows.Forms.TextBox

Friend WithEvents labeltolerancia
As
System.Windows.Forms.Label

Friend WithEvents Labela As System.Windows.Forms.Label

Friend WithEvents textboxfuncion
As
System.Windows.Forms.TextBox

Friend WithEvents Label1 As System.Windows.Forms.Label

Friend WithEvents Label6 As System.Windows.Forms.Label

Friend WithEvents AxMSFlexGrid1
As
AxMSFlexGridLib.AxMSFlexGrid

End Class

formularioparagraficar.Designer.vb

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
_

Partial Class formularioparagraficar

Inherits
System.Windows.Forms.Form

'Form reemplaza a Dispose para limpiar
la lista de componentes.

<System.Diagnostics.DebuggerNonUserCode()>
_

Protected Overrides Sub
Dispose(ByVal
disposing As
Boolean)

Try

If disposing
AndAlso components
IsNot Nothing Then

components.Dispose()

End If

Finally

MyBase.Dispose(disposing)

End Try

End Sub

'Requerido por el Diseñador de
Windows Forms

Private components
As
System.ComponentModel.IContainer

'NOTA: el Diseñador de Windows
Forms necesita el siguiente procedimiento

'Se puede modificar usando el
Diseñador de Windows Forms.

'No lo modifique con el editor de
código.

<System.Diagnostics.DebuggerStepThrough()>
_

Private Sub InitializeComponent()

Dim resources
As
System.ComponentModel.ComponentResourceManager =
New
System.ComponentModel.ComponentResourceManager(GetType(formularioparagraficar))

Me.EscalamínimaEnYToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Me.EscalaMáximaEnXToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Me.EscalaMáximaEnYToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Me.AumentarToolStripMenuItem =
New
System.Windows.Forms.ToolStripMenuItem

Me.ZoomToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Me.DisminuirToolStripMenuItem =
New
System.Windows.Forms.ToolStripMenuItem

Me.EscalaMínimaEnXToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Me.SalirToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Me.InsertarToolStripMenuItem =
New
System.Windows.Forms.ToolStripMenuItem

Me.SalirToolStripMenuItem1
= New
System.Windows.Forms.ToolStripMenuItem

Me.EditarFunciónToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Me.EdiciónToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Me.AcercaDeGraficadosDeFuncionesMatemáticasToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Me.UsoDelProgramaToolStripMenuItem
= New
System.Windows.Forms.ToolStripMenuItem

Partes: 1, 2, 3, 4, 5, 6
 Página anterior Volver al principio del trabajoPágina siguiente 

Nota al lector: es posible que esta página no contenga todos los componentes del trabajo original (pies de página, avanzadas formulas matemáticas, esquemas o tablas complejas, etc.). Recuerde que para ver el trabajo en su versión original completa, puede descargarlo desde el menú superior.

Todos los documentos disponibles en este sitio expresan los puntos de vista de sus respectivos autores y no de Monografias.com. El objetivo de Monografias.com es poner el conocimiento a disposición de toda su comunidad. Queda bajo la responsabilidad de cada lector el eventual uso que se le de a esta información. Asimismo, es obligatoria la cita del autor del contenido y de Monografias.com como fuentes de información.

Categorias
Newsletter