Двумерный массив

@dagidag · Регистрация: 29.09.2019

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста сделать двумерный массив с вводом количества строк и столбцов. Я могу сделать с определенным количество, а именно с вводом из Textbox не удается. Буду очень благодарен за помощь

@andrsh · 25.11.2020, 10:29

dagidag,

VB.NET

1
2
3

Dim i As Integer = CInt(TextBox1.Text)
        Dim j As Integer = CInt(TextBox2.Text)
        Dim msv(i, j) As Integer

I can · 25.11.2020, 10:45

andrsh, нет, извините, Вы не правы.

@andrsh · 25.11.2020, 10:47

I can, Ну почему же?

I can · 25.11.2020, 10:51

Сообщение от andrsh

Ну почему же?

Это было бы верно в C# или в C++, а в VB столбцов и строк получится на 1 больше.

Поэтому правильно будет

VB.NET

1	Dim msv(i-1, j-1) As Integer

@andrsh · 25.11.2020, 11:07

I can, Если в текстбоксах указывать необходимые значения кол-ва строк и столбцов то

VB.NET

1 2	Dim i As Integer = CInt(TextBox1.Text)-1 Dim j As Integer = CInt(TextBox2.Text)-1

Добавлено через 2 минуты
ну а заполнение случайными числами можно сделать так:

VB.NET

 Randomize()
        For i1 As Integer = 0 To i
            For j1 As Integer = 0 To j
                msv(i1, j) = Int(Rnd() * 100)
            Next j1
        Next i1

как пример.

Добавлено через 7 минут
в строке 4 ошибка

VB.NET

1	msv(i1, j1) = Int(Rnd() * 100)

вот теперь правильно

Добавлено через 1 минуту
Вернее наоборот:

VB.NET

1	msv(i, j) = Int(Rnd() * 100)

I can · 25.11.2020, 11:51

Сообщение от andrsh

Вернее наоборот:

Не-а

@dagidag 0 / 0 / 0 Регистрация: 29.09.2019 Сообщений: 16
		1
	Двумерный массив 25.11.2020, 10:18. Показов 1347. Ответов 6 Метки visual basic .net (Все метки) Помогите пожалуйста сделать двумерный массив с вводом количества строк и столбцов. Я могу сделать с определенным количество, а именно с вводом из Textbox не удается. Буду очень благодарен за помощь 0

I can help 4489 / 4099 / 812 Регистрация: 13.04.2015 Сообщений: 8,960
	25.11.2020, 10:45	3
	andrsh, нет, извините, Вы не правы. 0

@andrsh 261 / 213 / 53 Регистрация: 01.08.2016 Сообщений: 825
	25.11.2020, 10:47	4
	I can, Ну почему же? 0

I can help 4489 / 4099 / 812 Регистрация: 13.04.2015 Сообщений: 8,960
	25.11.2020, 11:51	7
	Сообщение от andrsh Вернее наоборот: Не-а 0