Visual Basic.NET - Datagridview

 
Vista:
Imágen de perfil de Maick
Val: 49
Ha disminuido su posición en 4 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Datagridview

Publicado por Maick (34 intervenciones) el 20/05/2020 18:55:13
Buenos día, quisiera que me ayudaran con un pequeño problema que tengo con un datagridview, quirto multiplicar dos columnas y mostrar el resultado en una quinta columna, el código que estoy utilizado es este:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
Public Class Form1
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim i As Integer
 
        For i = 1 To 100
            ComboBox1.Items.Add(i)
 
        Next
        ComboBox2.Items.Add("Mouse inalambrico")
        ComboBox2.Items.Add("Teclado Flexible")
        ComboBox2.Items.Add("Teclado Multimedia")
        ComboBox2.Items.Add("Minilaptop")
        ComboBox2.Items.Add("Memoria USB kINGSTON")
        ComboBox2.Items.Add("Camara Web")
 
        ComboBox3.Items.Add("Mouse inalambrico Q. 125.00")
        ComboBox3.Items.Add("Teclado Flexible Q. 80.00")
        ComboBox3.Items.Add("Teclado Multimedia Q. 150.00")
        ComboBox3.Items.Add("Minilaptop Q. 2,500.00")
        ComboBox3.Items.Add("Memoria USB  de 16 gb kINGSTON Q. 100.00")
        ComboBox3.Items.Add("Camara Web Q. 85.00")
 
        Dg1.Columns.Add("no", "No.Factura ")
        Dg1.Columns.Add("Cant", "CANTIDAD")
        Dg1.Columns.Add("Des", "DESCRIPCIÓN DEL PRODUCTO")
        Dg1.Columns.Add("PU", "P/U")
        Dg1.Columns.Add("ST", "SUB-TOTAL")
 
    End Sub
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
 
        If ComboBox1.Text <> "" And ComboBox2.Text <> "" And ComboBox2.Text <> "" Then
            Dg1.Rows.Add(TextBox1.Text, ComboBox1.SelectedItem, ComboBox2.SelectedItem, ComboBox3.SelectedItem)
 
 
        Else
            MsgBox("Debe llenar todos los campos", MsgBoxStyle.Critical, "Error")
        End If
 
    End Sub
 
 End Class

Gracias por su apoyo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Phil Rob
Val: 2.985
Oro
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Datagridview

Publicado por Phil Rob (843 intervenciones) el 20/05/2020 23:36:14
Hola,

Si conoces los indicios de la linea et de las columnas, este es facil de programar :

1
DG1.Item(IndexColumnaResultado, IndexLinea).Value = DG1.Item(IndexColumnaFactor1, IndexLinea).Value * DG1.Item(IndexColumnaFactor2, IndexLinea).Value

Espero que este te ayudará
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar