fork(16) download
copy 
  1. Dim Op1, Op2 As Double
  2. Dim Opr As String
  3.  
  4. Private Sub Command1_Click()
  5. Text1.Text = Text1.Text + Command1.Caption
  6. If cleardisplay Then
  7. Text1.Text = ""
  8. cleardisplay = False
  9. End If
  10. End Sub
  11.  
  12. Private Sub Command2_Click()
  13. Text1.Text = Text1.Text + Command2.Caption
  14. If cleardisplay Then
  15. Text1.Text = ""
  16. cleardisplay = False
  17. End If
  18.  
  19. End Sub
  20.  
  21. Private Sub Command3_Click()
  22. Text1.Text = Text1.Text + Command3.Caption
  23. If cleardisplay Then
  24. Text1.Text = ""
  25. cleardisplay = False
  26. End If
  27.  
  28. End Sub
  29.  
  30. Private Sub Command4_Click()
  31. Text1.Text = Text1.Text + Command4.Caption
  32. If cleardisplay Then
  33. Text1.Text = ""
  34. cleardisplay = False
  35. End If
  36.  
  37. End Sub
  38.  
  39. Private Sub Command5_Click()
  40. Text1.Text = Text1.Text + Command5.Caption
  41. If cleardisplay Then
  42. Text1.Text = ""
  43. cleardisplay = False
  44. End If
  45.  
  46. End Sub
  47.  
  48. Private Sub Command6_Click()
  49. Text1.Text = Text1.Text + Command6.Caption
  50. If cleardisplay Then
  51. Text1.Text = ""
  52. cleardisplay = False
  53. End If
  54.  
  55. End Sub
  56.  
  57. Private Sub Command7_Click()
  58. Text1.Text = Text1.Text + Command7.Caption
  59. If cleardisplay Then
  60. Text1.Text = ""
  61. cleardisplay = False
  62. End If
  63.  
  64. End Sub
  65.  
  66. Private Sub Command8_Click()
  67. Text1.Text = Text1.Text + Command8.Caption
  68. If cleardisplay Then
  69. Text1.Text = ""
  70. cleardisplay = False
  71. End If
  72.  
  73. End Sub
  74.  
  75. Private Sub Command9_Click()
  76. Text1.Text = Text1.Text + Command9.Caption
  77. If cleardisplay Then
  78. Text1.Text = ""
  79. cleardisplay = False
  80. End If
  81. End Sub
  82.  
  83. Private Sub Command10_Click()
  84. Text1.Text = Text1.Text + Command10.Caption
  85. If cleardisplay Then
  86. Text1.Text = ""
  87. cleardisplay = False
  88. End If
  89. End Sub
  90. Private Sub CommandDot_Click()
  91. If InStr(Text1.Text, ".") Then
  92. Exit Sub
  93. Else
  94. Text1.Text = Text1.Text + "."
  95. End If
  96. End Sub
  97.  
  98. Private Sub Commandcls_Click()
  99. Text1.Text = ""
  100. End Sub
  101.  
  102. Private Sub CommandPlus_Click()
  103. Op1 = Val(Text1.Text)
  104. Opr = "+"
  105. Text1.Text = ""
  106. End Sub
  107.  
  108. Private Sub CommandMinus_Click()
  109. Op1 = Val(Text1.Text)
  110. Opr = "-"
  111. Text1.Text = ""
  112. End Sub
  113.  
  114. Private Sub CommandMul_Click()
  115. Op1 = Val(Text1.Text)
  116. Opr = "*"
  117. Text1.Text = ""
  118. End Sub
  119.  
  120. Private Sub CommandDiv_Click()
  121. Op1 = Val(Text1.Text)
  122. Opr = "/"
  123. Text1.Text = ""
  124. End Sub
  125.  
  126. Private Sub CommandEqu_Click()
  127. Op2 = Val(Text1.Text)
  128. Select Case Opr
  129. Case "+": Text1.Text = Op1 + Op2
  130. Case "*": Text1.Text = Op1 * Op2
  131. Case "-": Text1.Text = Op1 - Op2
  132. Case "/": Text1.Text = Op1 / Op2
  133. End Select
  134. End Sub
  135.  
  136. Private Sub Commandexit_Click()
  137. End
  138. End Sub
  139.  
  140. Private Sub Form_Load()
  141. Text1.Text = ""
  142. End Sub
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
Standard input is empty
compilation info 
Visual Basic.Net Compiler version 0.0.0.5943 (Mono 3.8 - tarball)
Copyright (C) 2004-2010 Rolf Bjarne Kvinge. All rights reserved.

/home/xOfQUy/prog.vb (1,5) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (2,4) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (4,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (5,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (6,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (7,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (8,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (9,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (10,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (12,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (13,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (14,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (15,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (16,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (17,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (19,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (21,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (22,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (23,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (24,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (25,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (26,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (28,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (30,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (31,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (32,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (33,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (34,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (35,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (37,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (39,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (40,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (41,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (42,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (43,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (44,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (46,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (48,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (49,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (50,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (51,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (52,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (53,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (55,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (57,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (58,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (59,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (60,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (61,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (62,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (64,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (66,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (67,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (68,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (69,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (70,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (71,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (73,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (75,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (76,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (77,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (78,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (79,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (80,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (81,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (83,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (84,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (85,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (86,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (87,13) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (88,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (89,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (90,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (91,3) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (92,5) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (93,5) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (94,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (95,7) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (96,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (98,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (99,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (100,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (102,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (103,4) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (104,4) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (105,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (106,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (108,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (109,4) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (110,4) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (111,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (112,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (114,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (115,4) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (116,4) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (117,6) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (118,8) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (120,12) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (121,4) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (122,4) : error VBNC30203: Identifier expected.
/home/xOfQUy/prog.vb (123,6) : error VBNC30203: Identifier expected.
vbnc : Command line : error VBNC30041: Too many errors.
stdout
copy 
Standard output is empty
https://ideone.com/M8EMgj
language:
VB.NET (mono-3.10)
created:
9 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!