No creo que eso sea algo que deba preocuparte, aqui estamos para ayudar, no para juzgar quien eres por cuanto sabes.



Si, es un operador:
Mod Operator (Visual Basic)



El único inconveniente que le veo es que estás utilizando el DataType Integer, y esto para una calculadora no es lo más apropiado xD, ya que la capacidad máxima de un Integer es poca, y excluye la posibilidad de usar y calcular correctamente decimales.

Aparte de eso, el código en general se puede simplificar mucho, ya que utilizas la abundante repetición de código para hacer lo mismo 4 veces,
eso es de lo más normal en alguien que está aprendiendo, pero mi consejo es que debes acostumbrarte cuanto antes a programar de forma dinámica, es una aventura que te brindará un sin fin de posibilidades, te ayudará a estructurar el código y eso evitará en parte que acabes escribiendo un código spaghetti (Spaghetti code - Wikipedia, the free encyclopedia).

Por un lado, está la Class principal.
Lo más destacable de esta modificación que he escrito sería el Type "MathInfo" y la multiple subscripción del mismo evento de todos los botones, combinando ambas cosas nos ayuda a elaborar la tarea de forma dinámica utilizando la propiedad Tag de los botones para asociar un objeto "MathInfo" a cada botón, esto nos evita tener que duplicar código innecesario.
Y en fín, todo esto nos lleva siempre al método "DoMaths", donde podemos implementar controles de errores, etc. (eso ya es cosa tuya)

También debo decir que lo he estructurado basándome en tu ejemplo, es decir, que esto se podría simplificar más si fuera otro caso, donde no tuvieras 8 TextBoxes para 8 valores distintos y 4 botones.

Option Strict On : Option Explicit On : Option Infer Off
 
Imports WindowsApplication1.MathTools
 
Public Class Form1
 
#Region " Types "
 
    Private Class MathInfo
        Public Property Control1 As Control
        Public Property Control2 As Control
        Public Property MathOperation As MathOperation
    End Class
 
#End Region
 
#Region " Event Handlers "
 
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) _
    Handles Me.Load
 
        Me.Button1.Tag = New MathInfo With
                         {.Control1 = Me.txt1, .Control2 = Me.txt2, .MathOperation = MathOperation.Sum}
 
        Me.Button2.Tag = New MathInfo With
                         {.Control1 = Me.txt3, .Control2 = Me.txt4, .MathOperation = MathOperation.Rest}
 
        Me.Button3.Tag = New MathInfo With
                         {.Control1 = Me.txt5, .Control2 = Me.txt6, .MathOperation = MathOperation.DivisorRemainder}
 
        Me.Button4.Tag = New MathInfo With
                         {.Control1 = Me.txt7, .Control2 = Me.txt8, .MathOperation = MathOperation.Multiply}
    End Sub
 
    ''' <summary>
    ''' Handles the Click event of the Button controls.
    ''' </summary>
    Private Sub Buttons_Click(ByVal sender As Object, ByVal e As EventArgs) _
    Handles Button1.Click,
            Button2.Click,
            Button3.Click,
            Button4.Click
 
        Me.DoMaths(DirectCast(DirectCast(sender, Button).Tag, MathInfo))
 
    End Sub
 
#End Region
 
#Region " Methods "
 
    ''' <summary>
    ''' Performs an arithmetic operation with the values contained on the specified <see cref="T:MathInfo" />.
    ''' And shows an informative <see cref="T:MessageBox" /> with the resulting value.
    ''' </summary>
    Private Sub DoMaths(ByVal mathInfo As MathInfo)
 
        Dim value1 As Decimal = CDec(mathInfo.Control1.Text)
        Dim value2 As Decimal = CDec(mathInfo.Control2.Text)
        Dim mathOperation As MathOperation = mathInfo.MathOperation
        Dim result As Decimal = MathTools.GetMathResult(value1, value2, mathOperation)
 
        MessageBox.Show(CStr(result), String.Format("Resulting value of an {0} operation", mathOperation.ToString),
                        MessageBoxButtons.OK, MessageBoxIcon.Information)
 
    End Sub
 
#End Region
 
End Class

Y por otro lado, lo apropiado es separar las funciones que haces en otra Class, donde puedes implementar las herramientas relacionadas con la aritmética:

( Ten en cuenta que "simplificar", no siempre significa escribir menos )

''' <summary>
''' Contains related Mathematial tools.
''' </summary>
Public NotInheritable Class MathTools
 
    ''' <summary>
    ''' Specifies an arithmetic operation.
    ''' </summary>
    Public Enum MathOperation As Integer
 
        Sum = 1I
        Rest = 2I
        Multiply = 3I
        DivisorRemainder = 4I
 
    End Enum
 
    ''' <summary>
    ''' Performs an arithmetic operation with the specified two values.
    ''' </summary>
    ''' <param name="value1">The first value.</param>
    ''' <param name="value2">The second value.</param>
    ''' <param name="mathOperation">The arithmetic operation.</param>
    ''' <returns>The resulting value.</returns>
    ''' <exception cref="System.ArgumentException">mathOperation</exception>
    Public Shared Function GetMathResult(ByVal value1 As Decimal,
                                         ByVal value2 As Decimal,
                                         ByVal mathOperation As MathOperation) As Decimal
 
        Select Case mathOperation
 
            Case MathTools.MathOperation.Sum
                Return (value1 + value2)
 
            Case MathTools.MathOperation.Rest
                Return (value1 - value2)
 
            Case MathTools.MathOperation.Multiply
                Return (value1 * value2)
 
            Case MathTools.MathOperation.DivisorRemainder
                Return (value1 Mod value2)
 
            Case Else
                Throw New ArgumentException("Tu mensaje de error aquí", "mathOperation")
                Return 0D
 
        End Select
 
    End Function
 
End Class

Espero que te haya servido.

Saludos.

Estás en tu derecho de hacer lo que quieras con tu app, pero, ¿has visto alguna app con adflys? (yo si, solo 2 en toda mi vida, y obviamente no tuvieron futuro), como mucho le meten banners publicitarios en la interface de usuario.

Si quieres sacar beneficios, vende el software y punto, o ponle un botón de donaciones Paypal, e slo más común.

Si vas a compartirlo de forma "medio" gratis Shareware intentando sacar beneficio entonces no le pongas mierd@ como tener que pulsar un adfly, banners, o instaladores basura.
Los programas que hacen eso son odiosos y la opinión que tendrá el endusar sobre tu producto no será muy buena, captarás poco su atención, así que en mi opinión es mucho mejor si haces una versión Trial o una versión demo con características limitadas, sin incordiar con anuncios, y quien quiera que compre la app después del periodo de prueba.

Puedes utilizar cualquier herramienta profesional para hacer versiones triales, que expiren en "X" usos o "X" días, como por ejemplo Crypto Licensing, .Net Reactor, o WinLicense.

Saludos!

1) Un botón de donaciones Paypal en la UI.

2) Crear tu propia web, para vender tus productos.

3) Crear un instalador añadiendo el típico servicio adaware (tipo Softonic). No me viene a la cabeza ninguna web que ofrezca este servicio, peor las hay, y te pagan por utilizar sus instaladores de pura *****.

4) Usar Google para encontrar servicios donde vender código fuente.
11 Websites Where You Can Buy And Sell App Source Codes!

Saludos!

Ya lo revisé yo mismo ayer, el código fuente si que va incluido (para quienes quieran saberlo).

PD: Gracias por compartir.

Saludos

Es tarde por aquí, pero por la mañana en cuanto pueda te ayudo mostrándote un código (si no se me adelanta nadie)

saludos

No era sarcasmo, solo pretendía evitar que por error leyeras algo que no te serviría, yo no sabia si era una simple errata.

Sobre Bash, no puedo ayudarte, esperemos que alguien te pueda servir de más ayuda.

Saludos!

Entiendo que quieres declarar las variables de forma dinámica y secuencial, ¿pero que debería ocurrir al llegar a la "Z", por ejemplo?.

Mejor hazlo así, tiene muchas menos complicaciones:

@Echo OFF 
 
For /F "UseBackQ Tokens=* Delims=" %%a In ("Archivo.txt") Do (
	Set /A   "Count+=1"
	Call Set "Var%%Count%%=%%~a"
)
 
Echo %Var1% %Var2% %Var3%
 
Pause&Exit /B 0

Saludos

Pues vas mal encaminado si te da por leer un tutorial de Batch, ya que lo que estás utilizando es Bash, la diferencia es que el primero es para Windows, y el segundo para Linux.

Saludos

Es porque el índice en .Net está basado en "0", no empieza por "1". por ende no puedes acceder a la columna 5, ya que el rango de columnas son 4 (0, 1, 2, 3, 4).
Disminúyele un número a los índices como hiciste con las filas, y ya está:

Dim Col1 As Integer = &H0I
Dim Col3 As Integer = &H2I
Dim Col5 As Integer = &H4I

Te muestro el ejemplo completo:

        Const ColIndex1 As Integer = &H0I
        Const ColIndex3 As Integer = &H2I
        Const ColIndex5 As Integer = &H4I
 
        Dim totalCol1 As Integer, totalCol3 As Integer, totalCol5 As Integer
 
        For Each row As DataGridViewRow In Me.DataGridView1.Rows
 
            totalCol1 += CType(row.Cells(ColIndex1).Value, Integer)
            totalCol3 += CType(row.Cells(ColIndex3).Value, Integer)
            totalCol5 += CType(row.Cells(ColIndex5).Value, Integer)
 
        Next row
 
        Label4.Text = String.Format("La suma de los valores de la columna 1 es de: {0}", CStr(totalCol1))
        Label5.Text = String.Format("La suma de los valores de la columna 3 es de: {0}", CStr(totalCol3))
        Label6.Text = String.Format("La suma de los valores de la columna 5 es de: {0}", CStr(totalCol5))

Saludos

Songoku te formula una pregunta muy razonable.

En mi opinión, o te está fallando Windows por un problema derivado de una modificación ajena, o te están fallando los drivers de nVidia y esto está afectando al SO.

Si tienes tiempo y ganas, y en caso de que estés usando un Windows7 sin modificar, entonces podrias probar a reinstalar de nuevo Windows7 para utilizar el PC PERO sin instalar los drivers de la gráfica, a ver si no sale más el error, y si ves que así funciona, entonces... ya se verá como solucionar el tema de la ausencia de drivers.

Saludos