cambio de semestre
Publicado por Roberto (1 intervención) el 26/09/2016 22:11:13
Hola buen dia a todos.
Soy Informatico y ultimamente me ha dado por meterme mas a la programacion, ya que se me hace muy interezante.
y me he topado con un problema que no he podido resolver.
lo que pasa es de que tengo una BS que contiene un campo llamado grupo
el cual se compone de numeros y letras.
a lo cual necesito que cada emestre se aumente por medio de un boton el numero de semestre
la estructura es la sig: 101 M 101 MI 201 M 201 MI 301 M 401 MI ... ETC
ENTONCES HAGO UNA CONSULTA Y LA MUESTRO EN UN DGV1}
Y DESPUES CON UN BOTON AL DAR CLIC ME SUBSTRAE EL NUMERO Y LO AUMENTA.
que tengo que hacer para que se modifiquen los valores de la columna grupo y se guarden en la bd con el semestre siguiente.
Soy Informatico y ultimamente me ha dado por meterme mas a la programacion, ya que se me hace muy interezante.
y me he topado con un problema que no he podido resolver.
lo que pasa es de que tengo una BS que contiene un campo llamado grupo
el cual se compone de numeros y letras.
a lo cual necesito que cada emestre se aumente por medio de un boton el numero de semestre
la estructura es la sig: 101 M 101 MI 201 M 201 MI 301 M 401 MI ... ETC
ENTONCES HAGO UNA CONSULTA Y LA MUESTRO EN UN DGV1}
1
2
3
4
5
6
7
8
9
10
11
12
13
'////////////////////////////////////////////////////////////////////////////////
Dim datos As New DataSet
Dim sql As String
sql = "select num_ctrl, nom_alu, ap_pat, ap_mat, grupo from alumno order by grupo"
Dim adaptador As New MySqlDataAdapter(sql, cadena)
Try
cadena.Open()
adaptador.Fill(datos, "alumno")
DataGridView1.DataSource = datos.Tables(0)
cadena.Close()
'///////////////////////////////////////////////////////////////////////////////////Y DESPUES CON UN BOTON AL DAR CLIC ME SUBSTRAE EL NUMERO Y LO AUMENTA.
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
Private Sub aumentar_Click(sender As Object, e As EventArgs) Handles aumentar.Click
If (DataGridView1.Rows.Count > 0) Then
Do While (DataGridView1.Rows.Count - 1)
Dim grupo As String
grupo = DataGridView1.CurrentRow.Cells(4).Value
Dim subsgrupo As String
subsgrupo = grupo.Substring(0, 3)
Dim subscarrera As String
subscarrera = grupo.Substring(4, 1)
Dim grupomas As Integer
grupomas = CInt(subsgrupo) + 100
Dim pegados As String
pegados = (grupomas.ToString & " " & subscarrera.ToString)
Dim row As Integer
For row = 0 To DataGridView1.Rows.Count - 1
DataGridView1.Rows(row).Cells(4).Value = pegados
Next row
Loop
End If
End Sub
que tengo que hacer para que se modifiquen los valores de la columna grupo y se guarden en la bd con el semestre siguiente.
Valora esta pregunta
0
