Problem to the codes

Due to some reason, I need to combine the lines of codes into one line, as shown in above.

See MSDN VBScript Variables

In VBScript, variables are always of one fundamental data type, Variant.

If I remove the data type from your DIM statement and split it into separate lines, the code runs fine (in VBScript).

Dim val1 'As Integer 
val1=InputBox("Enter a Number","Enter Value") 
Msgbox val1

Select allOpen in new window

What is the reason you need the code on one line?

You have coded a VB.Net form of the statement.  Are you developing in VB.Net or VB6/VBA?

In addition to SimonAdept's correct solution on removing the type, if you want it all on one line then simply separate each line by a colon like this:

Dim val1 : val1=InputBox("Enter a Number","Enter Value") : Msgbox val1

Select allOpen in new window

Thanks all.

Sorry, I have put this

Dim val1 As Integer : val1=InputBox("Enter a Number","Enter Value") : Msgbox val1

Select allOpen in new window

but I still get the attached error

I need to put all into one line.
t943.png