SLY69
1

Не могу исправить простую ошибку в коде

21.11.2009, 20:50. Показов 1644. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Решил вспомнить как писать на ВБ, накидал простую програмку с одномерным масивом, которая должна взять значение из поля текст один и с помощью него установить границу масива, потом заполнить его в рандомном порядке цифрами и вывести на форму.

Столкнулся с проблемой. По идее более простой способ

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Dim N As Integer
'============
Dim A(1 To N) As Integer
'============
 
 
Private Sub Command1_Click()
 
N = Val(Text1.Text)
 
For i = 1 To N
    A(i) = Val(12 * Rnd - 6)
Next i
 
For i = 1 To N
    Print A(i)
Next i
    
End Sub
Но он не работает, выдает ошибку
Constant expression required в выделенном месте.

Более сложный способ работает как задумывалось.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Dim N As Integer
Dim A() As Integer
 
 
Private Sub Command1_Click()
 
N = Val(Text1.Text)
ReDim A(1 To N)
For i = 1 To N
    A(i) = Val(12 * Rnd - 6)
Next i
 
For i = 1 To N
    Print A(i)
Next i
    
End Sub

Прошу помочь исправить ошибку в первом варианте программы.
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.11.2009, 20:50
Ответы с готовыми решениями:

Не могу исправить ошибку в коде.
Не могу исправить ошибку в коде, а именно не могу в путь к файлу вставить переменную. //...

Не могу исправить 1 ошибку в коде
Друзья, помогите пожалуйста исправить ошибку в коде! нужно обработать форму Анкета. Создаю 2 php...

не могу исправить ошибку в коде
не могу исправить ошибку в коде Program Zer; var br1, br2, expr: string; i, k: integer; ...

Не могу найти и исправить ошибку в коде
#include <iostream> #include <locale.h> using namespace std; double masA={0}; long...

1
1161 / 288 / 23
Регистрация: 28.09.2008
Сообщений: 553
22.11.2009, 11:48 2
Нету никакой ошибки. Второй вариант и есть правильное решение. Нельзя в vb объявлять массив, границы которого не определены. Т.е можно именно так Dim массив() As тип, или можно так
Visual Basic
1
2
Const n As Integer=10
Dim массив(1 To n) As тип
Но т.к. у тебя в первом варианте - нельзя.
0
22.11.2009, 11:48
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.11.2009, 11:48
Помогаю со студенческими работами здесь

не могу понять как исправить ошибку в коде
Создать односвязный список из случайных чисел вывести его. выполнить сортировку методом простого...

не могу исправить ошибку в коде. в паскале вылетает ошибка.
program Project1; {$APPTYPE CONSOLE} uses SysUtils; type tptz=^tstack; tstack=record

Не могу найти простую ошибку. Склеивает строки
Привет. Программа выводит всю информацию правильно, но последние две строки не так как нужно. В...

В коде выдает ошибку на 15 строчке. Мне надо исправить эту ошибку
procedure TForm1.BOkClick(Sender: TObject); var e1, e2: double; begin Label1.Caption := '';...

Как исправить исправить ошибку в коде
Здравствуйте,помогите пожалуйста исправить ошибку в коде.using System; using System.Threading; ...

Двумерный массив. Поиск нулей.Не могу найти ошибку ошибку в коде
Вот,например массив 5 5 0 1 0 1 0 1 1 1 1 1 0 0 0 0 1 0 0 1 0 0 1 0 0 0 0 считываются два...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru