Imports System

Public Class Test
	Public Shared Sub Main()
		Dim id As Int32 = 7
        Dim result = "C" & id.ToString("d4")
        Console.Write(result)
	End Sub
End Class