Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
tyapckin
0 / 0 / 0
Регистрация: 09.02.2015
Сообщений: 7
1

Wrong number of dimensions vba ошибка

27.05.2016, 19:54. Просмотров 495. Ответов 2
Метки нет (Все метки)

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Option Explicit
Sub pp()
Dim x(1 To 10)  As Integer, y(1 To 10) As Integer, s As Single, sr As Single, i As Single, n As Single
s = 0
n = 10
For i = 1 To 10
  If x(i, 1) = 0 Then m1 = m1 + 1
  If y(i, 1) = 0 Then m2 = m2 + 1
x(i) = Int((100 - 50 + 1) * Rnd + 50)
y(i) = Int((100 - 50 + 1) * Rnd + 50)
Sheets("Лист1").Cells(i, 1) = x(i)
Sheets("Лист1").Cells(i, 1) = y(i)
s = s + (x(i, 1) - y(i, 1)) ^ 2
Next i
Sheets("Лист1").Cells(i, 3) = s
Sheets("Лист1").Cells(i, 4) = m1
Sheets("Лист1").Cells(i, 5) = m2
 
End Sub
Выдает ошибку wrong number of dimensions. Как ее исправить?
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.05.2016, 19:54
Ответы с готовыми решениями:

Ошибка "Wrong number of dimensions"
Sub Лист5_Кнопка1_Щелчок() Dim x(100), i, s, k As Integer n = InputBox("Какова размерность...

Ошибка "Wrong number of arguments or invalid property assignment" на кнопке ленты (Решено)
Тема называлась иначе, но пока писал, сам же нашёл ошибку, вспомнил одну очень важную деталь, без...

Ошибка в программе "Compile error: Wrong number of arguments or invalid property assignment"
Ошибка: Compile error: Wrong number of arguments or invalid property assignment Sub answ() s =...

Wrong number of arguments or invalid property assignment (Error 450)
При выполнении этой программки вылетает вот такое сообщение: Wrong number of arguments or invalid...

2
shanemac51
Модератор
Эксперт MS Access
9373 / 3705 / 590
Регистрация: 07.08.2010
Сообщений: 10,409
Записей в блоге: 2
27.05.2016, 21:33 2
сколько же размерностей у массивов
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
''ОДНОМЕРНЫЙ массив
Dim x(1 To 10)  As Integer, y(1 To 10) As Integer, s As Single, sr As Single, i As Single, n As Single
s = 0
n = 10
For i = 1 To 10
'' двумерный
 If x(i, 1) = 0 Then m1 = m1 + 1
''двумерный
  If y(i, 1) = 0 Then m2 = m2 + 1
''одномерный
x(i) = Int((100 - 50 + 1) * Rnd + 50)
''одномерный
y(i) = Int((100 - 50 + 1) * Rnd + 50)
''одномерный
Sheets("Лист1").Cells(i, 1) = x(i)
''одномерный
Sheets("Лист1").Cells(i, 1) = y(i)
''двумерный
s = s + (x(i, 1) - y(i, 1)) ^ 2
1
tyapckin
0 / 0 / 0
Регистрация: 09.02.2015
Сообщений: 7
27.05.2016, 22:04  [ТС] 3
Одномерный
Wrong number of dimensions vba ошибка

Вот задание

 Комментарий модератора 
Перепечатывайте задание на форум в виде текста.
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.05.2016, 22:04

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Number of indices is less than the number of dimensions of the indexed array
Есть вот такой вот код, при выполнении которого выскакивают ошибки на 34 строке: Number of indices...

Метод Гаусса и ошибка Wrong number of parametres specified for call to 'ff'
помогите,пожалуйста, выводит 'wrong number of parametres specified for call to 'ff' ...

Ошибка: "wrong number of argument or invalid property assignment"
For i = 1 To ASize A(i - 1) = Text1.Text(i) Next i почему ругается на данную конструкцию....

Светофор: ошибка "Wrong number of parameters specified"
Подсвечивает ошибку(Wrong number of parameters specified for call to "OnShape"), помогите исправить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.