Looking for an inspiration? Below you will find public programs submitted by other users.

Filter by: All Bash C C# C++ 4.8.1 C++11 Haskell Java Java7 Objective-C Pascal (fpc) Pascal (gpc) Perl PHP Python Python 3 Ruby SQL VB.NET Ada Assembler Assembler AWK (gawk) AWK (mawk) bc Brainf**k C++ 4.3.2 C99 strict CLIPS Clojure COBOL COBOL 85 Common Lisp (clisp) D (dmd) Erlang F# Factor Falcon Forth Fortran Go Groovy Icon Intercal JavaScript (rhino) JavaScript (spidermonkey) Lua Nemerle Nice Nimrod Node.js Ocaml Octave Oz PARI/GP Perl 6 Pike Prolog (gnu) Prolog (swi) R Scala Scheme (guile) Smalltalk Tcl Text Unlambda Whitespace

#GBt0XI VB.NET 6 days ago
Compilation error
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim numbers = {10, 20, 30}
  6. for index = 0 to numbers
  7. console.writeline(numbers(index))
  8. next
  9. End Sub
#uxriBE VB.NET 6 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. ' your code goes here
  6. End Sub
  7. End Class
#4G1l0l VB.NET 6 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim intArea As Integer = 5
  6. intArea * 5
  7. End Sub
  8. End Class
#ISFMuF VB.NET 7 days ago
Compilation error
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5.  
  6. Dim age as Integer
  7.  
  8. Dim name as String
#ewk83A VB.NET 7 days ago
Compilation error
  1. Imports System
  2.  
  3. Sub FuncionVB_1()
  4. 'Script para calcular la tasa de respiracion, las siguientes son las ecuaciones a utilizar :'
  5. 'Volmuestra=masaproducto/Densidad.'
  6. 'VLibre =Volinterno-Volmuestra'
  7. 'Tar=Tpco2*1.8*VolLibre*'
  8. 'CoeficienteC02=ProdC02fin-ProdC02fin'
  9. 'Coeficiente02=Prod02fin-Prod02fin'
#wG4gLq VB.NET 6 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim age as Integer
  6. Dim name, answer as String
  7.  
  8. Console.WriteLine("Please tell me your name.")
  9. name = Console.ReadLine()
#8B8q5d VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim Count as Integer
  6. Count = 1
  7. Console.WriteLine(Count)
  8. End Sub
  9. End Class
#DGQdnq VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Module Module1
  4.  
  5.  
  6.  
  7. Sub Main()
  8.  
  9. Console.WriteLine("Hello World")
#mnn7VA VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Module Module1
  4.  
  5. 'This program will display Hello World
  6.  
  7. Sub Main()
  8.  
  9. Console.WriteLine("Hello World")
#8jq35Y VB.NET 7 days ago
Success
  1. Module VBModule
  2.  
  3.  
  4.  
  5. Sub Main()
  6.  
  7. Console.WriteLine("Hello, world!")
  8.  
  9. End Sub
#V6pmlJ VB.NET 7 days ago
Success
  1. Module VBModule
  2.  
  3. Sub Main()
  4. Dim pyg As String = "ay" 'Defining Pig Latin variable
  5. console.writeline("Enter string to be translated: ")
  6. Dim str As String = console.read() 'Defining string to be modified
  7. Dim stri As String ' Declaring variable for lower-case string
  8. Dim first As Char 'Declaring First character variable
  9. Dim neword As String 'Declaring new word variable
#yrT4hZ VB.NET 7 days ago
Compilation error
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. MessageBox.Show("Hello World")
  6. End Sub
  7. End Class
#MtuzZk VB.NET 7 days ago
Success
  1. Module VBModule
  2. sub Main()
  3. Console.WriteLine("Hello, World!")
  4. End Sub
  5. End Module
#CDdsEb VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim A,B,C as integer
  6. Dim mayor as integer
  7. Console.Write("Digite primer número:")
  8. A=Convert.ToInt32(Console.ReadLine())
  9. Console.Write("Digite segundo número:")
#y7X6hl VB.NET 7 days ago
Compilation error
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim A,B,C as integer
  6. Console.Write("Digite número:")
  7. A=Convert.ToInt32(Console.ReadLine())
  8. Console.Write("Digite número:")
  9. B=Convert.ToInt32(Console.ReadLine())
#3dkO4A VB.NET 7 days ago
Compilation error
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main ()
  5. Dim A,B,C as integer
  6. Dim mayor as integer
  7. Console.Write("Digite primer número:")
  8. A=Convert.ToInt32(Console.ReadLine())
  9. Console.Write("Digite segundo número:")
#l86be6 VB.NET 7 days ago
Compilation error
  1. Import System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim A,B,C as Integer
  6. Console.Write(¨Digite primer numero¨)
  7. A=Convert.ToInt32(Console.ReadLine())
  8. Console.Write(¨Digite segndo numer¨)
  9. B=Convert.ToInt32(Console.ReadLine())
#t8hlFx VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer=5
  6. if(N mod 2=0) THEN
  7. Console.WriteLine("El número es par")
  8. else
  9. Console.WriteLine("El número es impar")
#LJQLYz VB.NET 7 days ago
Compilation error
  1. Imports System
  2.  
  3.  
  4.  
  5. Public Class Test
  6.  
  7. Public Shared Sub Main()
  8.  
  9. Dim A,B,C as integer
#DKNPXO VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim A,B,C as integer
  6. Dim mayor as integer
  7. Console.WriteLine("Digite primer numero:")
  8. A=Convert.Toint32(Console.ReadLine())
  9. Console.WriteLine("Digite segundo numero:")
#eTQDAz VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer=5
  6. if (N mod 2=0) THEN
  7. console.Writeline("El numero es par")
  8. else
  9. console.Writeline("El numero es impar")
#CY602W VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer
  6. Console.Write("Digite numero")
  7. N=Convert.ToInt32(Console.ReadLine())
  8. if(N>0) then
  9. Console.WriteLine("El numero es positivo")
#Yp93qS VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer=5
  6. if(N mod 2=0) THEN
  7. Console.WriteLine("El numero es par")
  8. else
  9. Console.WriteLine("El numero es impar")
#fCsN06 VB.NET 7 days ago
Compilation error
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer=5
  6. if (N mod 2=0) THEN
  7. console.Writeline("El numero es par")
  8. else
  9. controle.Writeline("El numero es impar")
#4tkFox VB.NET 7 days ago
Compilation error
  1. Imports System
  2. Dim N as integer
  3. N=17
  4. Console.Write("Digite numero")
  5. N=Convert.ToInt32(Console.ReadLine())
  6. if(N>0) then
  7. Console.WriteLine("El numero es positivo")
  8. else
  9. if(N<0) then
#JgG6EL VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim n As Integer
  6. n = Console.ReadLine
  7. Do While n <> 42
  8. System.Console.WriteLine(n)
  9. n = Console.ReadLine
#lP7eDp VB.NET 7 days ago
Compilation error
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer=5
  6. if (N mod 2=0) THEN
  7. console.Writeline("el numero es par")
  8. else
  9. controle.WriteLine("el numero es impar")
#507haA VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer
  6. Console.Write("Digite número:")
  7. N=Convert.ToInt32(Console.ReadLine())
  8. If(N>0) Then
  9. Console.WriteLine("Positivo")
#PJjEg3 VB.NET 7 days ago
Runtime error
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer
  6. Console.Write("Digite número:")
  7. N=Convert.ToInt32(Console.ReadLine())
  8. If(N>0) Then
  9. Console.WriteLine("Positivo")
#uCta5B VB.NET 7 days ago
Success
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer=5
  6. if(N mod 2=0) then
  7. Console.WriteLine("El numero es par")
  8. else
  9. Console.WriteLine("El numero es impar")