Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Двумерный массив Добавлено: 27.09.02 08:22  

Автор вопроса:  Mystf0rse

Нужно написать процедуру, которая формирует массив размерностью 5*5, где у меня ошибка.(если можно дайти ссылку на пример)

Dim A(1 To 5, 1 To 5) As Single
Dim B As Single
Private Sub Command1_Click()
Print Format(B(i, j), "##,#") = Text1.Text;
End Sub

Private Sub Form_Load()
For i = 1 To 5
For j = 1 To 5
A(1, 1) = 1: A(1, 2) = 2: A(1, 3) = 3: A(1, 4) = 4: A(1, 5) = 5
A(2, 1) = 1: A(1, 2) = 4: A(1, 3) = 9: A(1, 4) = 16: A(1, 5) = 25
A(3, 1) = 1: A(1, 2) = 8: A(1, 3) = 27: A(1, 4) = 64: A(1, 5) = 125
A(4, 1) = 1: A(1, 2) = 16: A(1, 3) = 81: A(1, 4) = 256: A(1, 5) = 625
A(1, 1) = 1: A(1, 2) = 32: A(1, 3) = 243: A(1, 4) = 1024: A(1, 5) = 3125
Next j
Print
Next i
End Sub

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 Evgeny D



Вопросов: 10
Ответов: 33
 Профиль | | #1 Добавлено: 27.09.02 12:39

Может так? И для чего text1.text?

Private A(1 To 5, 1 To 5) As Single

Private Sub Command1_Click()

Dim i As Integer

Dim j As Integer

For j = 1 To 5

For i = 1 To 5

Print Format(A(i, j), "##0.0")

Next i

Next j

End Sub

Private Sub Form_Load()

Dim i As Integer

Dim j As Integer

For j = 1 To 5

For i = 1 To 5

A(j, i) = i ^ j

Next i

Next j

End Sub

Ответить

Номер ответа: 2
Автор ответа:
 CyRax



Разработчик Offline Client

ICQ: 204447456 

Вопросов: 180
Ответов: 4229
 Web-сайт: basicproduction.nm.ru
 Профиль | | #2
Добавлено: 27.09.02 19:41

Какой-то глюкануты пример.

Зачем тебе цикл, если он всё равно ничего не делает?

Насчёт Print Format(B(i, j), "##,#") = Text1.Text

По-моему всё верно, если тебе нужно значение Истина/Ложь.

А, понял, ты ступил

B(i, j), - у тебя не объявлен как массив.

Вообщето синтаксические и орфографические ошибки нужно самому исправлять. Чем больше практики, тем меньше ошибок.

 

 

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам