So i was running the program and it says "Runtime error 6 : Overflow " , and it highlights the 20th line where it reads the data . The data are numbers supposed to be in 6 digits forms like xxx-x-xx , however the user is requested to type xxxxxx. Please help . If the full code is needed just tell me . For now i'll have the part up to the error posted . The strange characters are just in another language , i don't think theyhave anything to do with the problem since they are just in expressions .
PHP Code:
Private Sub Command1_Click()
Dim i As Single, j As Single, b As Single, c As Single, d As Single
Dim s As Integer, n As Integer, M As Integer, M_1 As Integer, mesos As Integer, GMID() As Integer, u_1() As Integer, u() As Integer, uu() As Integer, u0() As Integer, sum As Integer
Dim intMID() As Integer
Dim A() As Integer
s = InputBox("ÅéóÜãåôå áñéèìü äéåõèýíóåùí")
n = InputBox("ÅéóÜãåôå áñéèìü ðåñéüäùí")
sum = 0
b = 0
d = 0
ReDim u_1(s * n)
ReDim u(s * n)
ReDim uu(s * n)
ReDim u0(s)
ReDim intMID(s)
ReDim GMID(s * n)
ReDim A(s * n, 2)
For i = 1 To s * n
For j = 1 To 2
A(i, j) = InputBox("ÅéóÜãåôå ãùíßá óêüðåõóçò (óå 6øÞöéá ìïñöÞ, 1ç èåóç/ 1ç óêïð. , 2ç èåóç/1ç óêïðåõóç êôë. )")
Next
Next