Pregunta: | 67846 - CREAR CLASS1 EN VB DE OPERACIONES |
Autor: | JUAN MA HUERTA |
Por favor necesito orientación. Tengo un el codigo visual basic.net y contiene todo lo necesario para realizar operaciones se + - * / Module Module1 Function sumar(ByVal x As Double, ByVal y As Double) As Double Dim resultado As Double = 0 resultado = x + y Return resultado End Function Function restar(ByVal x As Double, ByVal y As Double) As Double Dim resultado As Double = 0 resultado = x - y Return resultado End Function Function multiplicar(ByVal x As Double, ByVal y As Double) As Double Dim resultado As Double = 0 resultado = x * y Return resultado End Function Function dividir(ByVal x As Double, ByVal y As Double) As Double Dim resultado As Double = 0 resultado = x / y Return resultado End Function Sub Main() Dim a As Double = 67 Dim b As Double = 23 Dim s As Double = 0 Dim r As Double = 0 Dim m As Double = 0 Dim d As Double = 0 s = sumar(a, b) System.Console.WriteLine("sumar= " & s) r = restar(a, b) System.Console.WriteLine("restar= " & r) m = multiplicar(a, b) System.Console.WriteLine("multiplicar= " & m) d = dividir(a, b) System.Console.WriteLine("dividir= " & d) System.Console.ReadLine() End Sub End Module NECESITO AYUDA PARA CONSTRUIR UNA CLASE NUEVA CON EL NOMBRE OPEARITME Y NO TENDO IDEA DE COMO HACERLO YA QUE REALIEC UNO MUY SENCILLO CLASS 1 Public Class Class1 Public Sub monto(ByVal y As Integer) System.Console.WriteLine(y) System.Console.ReadKey() End Sub End Class MODULE Module Module1 Sub Main() Dim c As Integer Dim cuenta As New Class1 c = 60 cuenta.monto(c) End Sub End Module Por favor un rumbo, se que es pregunta de novato pero por algún lado tengo que empezar. Gracias. |