Messagebox Display

[Icyculyr]

Option Explicit On
Option Strict On

Imports System.Globalization

Public Class Form1
    Dim intNumbers(9) As Integer
    Dim intPut As Integer = 0
    Dim dblAvg As Double = 0.0
    Dim intSort As Integer = 0
 
    Private Sub btnput_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnput.Click
 
        Dim displayString As String = ""
        For i As Integer = 0 To 9
            intNumbers(i) = CInt(InputBox("Enter a Number"))
            displayString &= "Number " & (i+1) & ": Value " & intNumbers(i) & ControlChars.NewLine
        Next i
        MessageBox.Show("something here" & displayString, MessageBoxButtons.OK)
    End Sub

You don't actually need intNumbers() but I thought you might need it later on...... but perhaps not...

I rewrote your code a fair bit..