Понимаю что, должно быть по другому, но вот что.
Скриншот программы.
http://cs307615.userapi.com/v307615327/2193/DIp74zwZHu0.jpg
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a11, a12, a13, a21, a22, a23, a31, a32, a33 As Integer
TextBox1.Text = a11
TextBox2.Text = a12
TextBox3.Text = a13
TextBox4.Text = a21
TextBox5.Text = a22
TextBox6.Text = a23
TextBox7.Text = a31
TextBox8.Text = a32
TextBox9.Text = a33
TextBox10.Text = a11
TextBox11.Text = a22
TextBox12.Text = a23
TextBox13.Text = a32
TextBox14.Text = a33
TextBox15.Text = a12
TextBox16.Text = a21
TextBox17.Text = a23
TextBox18.Text = a31
TextBox19.Text = a33
TextBox20.Text = a13
TextBox21.Text = a21
TextBox22.Text = a22
TextBox23.Text = a31
TextBox24.Text = a32
TextBox25.Text = a11
TextBox26.Text = (a22 * a33 - a32 * a23)
TextBox27.Text = a12
TextBox28.Text = (a21 * a33 - a31 * a23)
TextBox29.Text = a13
TextBox30.Text = (a21 * a32 - a31 * a22)
TextBox31.Text = a11 * (a22 * a33 - a32 * a23) - a12 * (a21 * a33 - a31 * a23) + a13 * (a21 * a32 - a31 * a22)
Примечание:
Ошибка 1 "StrToFloat" не объявлен. Может быть недоступен из-за своего уровня защиты.
RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.
Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.
Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.