Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
1 / 1 / 0
Регистрация: 21.10.2022
Сообщений: 77

Перевод с C# на Visual Basic

08.11.2022, 11:17. Показов 731. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здраствуйте, помогите пожалуйста перевести код на Basic

C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
 class Program
    {
        static void Main(string[] args)
        {
            new Cube(5).Display();
        }
    }
 
    //класс
    class Cube
    {
        //приватное поле
        private double edge;
 
        //конструктор принимающий длину ребра
        public Cube(double edge)
        {
            this.edge = edge;
        }
 
        //метод для вывода всего и сразу на консоль
        public void Display()
        {
            Console.WriteLine($"Данный куб с ребром равным {edge},\n имеет обьем {Volume()},\n площадь {Square()},\n радиус вписанного шара {InnerRadius()},\n радиус описанного шара {OuterRadius()}");
        }
 
        //обьем
        public double Volume()
        {
            double res = Math.Pow(edge, 3);
            return res;
        }
 
        //площадь
        public double Square()
        {
            double res = 6 * (Math.Pow(edge, 2));
            return res;
        }
 
        //вписанный радиус
        public double InnerRadius()
        {
            double res = edge / 2;
            return res;
        }
 
        //описанный радиус
        public double OuterRadius()
        {
            double res = Math.Sqrt(3) * (edge / 2);
            return res;
        }
    }
}
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
08.11.2022, 11:17
Ответы с готовыми решениями:

Перевод из Visual Basic в С++
Здравствуйте. Прошу вашей помощи. Так как я VB не изучал. Можите помочь перевести из Visual Basic в С++ Sub...

Перевод из C++ в Visual Basic
Здравствуйте. Прошу вашей помощи. #include "stdafx.h" #include <iostream> #include <cmath> using namespace std; void main() {...

Перевод из C++ в Visual Basic
Добрый вечер. Очень нужна ваша помощь. VB для меня совсем темный лес. Задача на рассчет последовательностей Фиббончи. Нужно определить,...

5
fly
 Аватар для I can
4952 / 4636 / 844
Регистрация: 13.04.2015
Сообщений: 9,829
08.11.2022, 11:33
Лучший ответ Сообщение было отмечено TanyaYtka как решение

Решение

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Module Module1
 
    Sub Main()
        Dim cube As New Cube
        cube.Cube(5)
        cube.Display()
    End Sub
 
End Module
 
'класс
Class Cube
    'приватное поле
    Private edge As Double
    'конструктор принимающий длину ребра
    Public Sub Cube(myedge)
        edge = myedge
    End Sub
    'метод для вывода всего и сразу на консоль
    Public Sub Display()
        Console.WriteLine("Данный куб с ребром равным " & edge & vbCrLf & "имеет обьем " & Volume() & vbCrLf & "площадь " & Square & vbCrLf & "радиус вписанного шара " & InnerRadius & vbCrLf & "радиус описанного шара " & OuterRadius)
        Console.ReadKey()
    End Sub
    'обьем
    Public Function Volume() As Double
        Return Math.Pow(edge, 3)
    End Function
    'площадь
    Public Function Square() As Double
        Return 6 * (Math.Pow(edge, 2))
    End Function
    'вписанный радиус
    Public Function InnerRadius() As Double
        Return edge / 2
    End Function
    'описанный радиус
    Public Function OuterRadius() As Double
        Return Math.Sqrt(3) * (edge / 2)
    End Function
 
End Class
2
 Аватар для Razvedka2020
40 / 35 / 9
Регистрация: 01.01.2014
Сообщений: 202
09.11.2022, 08:07
Цитата Сообщение от TanyaYtka Посмотреть сообщение
Здраствуйте, помогите пожалуйста перевести код на Basic

Не по теме:

Стыд и срам не воспользоваться гуглом и самостоятельно найти конвертер кода!

0
1 / 1 / 0
Регистрация: 21.10.2022
Сообщений: 77
09.11.2022, 08:50  [ТС]
Я бы не спрашивала, если бы не пробовала
0
 Аватар для Razvedka2020
40 / 35 / 9
Регистрация: 01.01.2014
Сообщений: 202
09.11.2022, 11:09
Цитата Сообщение от TanyaYtka Посмотреть сообщение
Я бы не спрашивала, если бы не пробовала
Открываем новую вкладку в браузере, в строке адреса/поиска вводим "конвертер C# VB.net", переходим по любой понравившейся ссылке, вставляем код, нажимаем кнопку, получаем результат, анализируем, допиливаем и о ЧУДО!!!

Добавлено через 3 минуты
Цитата Сообщение от TanyaYtka Посмотреть сообщение
Я бы не спрашивала, если бы не пробовала

Не по теме:


А еще: обманывать не хорошо... :D Я эту же задачу поставил перед знакомой блондинкой-секретаршей, она справилась с ней с помощью гугла...

0
1 / 1 / 0
Регистрация: 21.10.2022
Сообщений: 77
09.11.2022, 14:49  [ТС]
Я не обманываю. Мне нет цели этого делать. Возможно конвертер плохой и выводит неверно.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
09.11.2022, 14:49
Помогаю со студенческими работами здесь

Перевод с Visual Basic на C#
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim text As String =...

Перевод в Visual Basic
Решить нелинейное уравнение методом простых итераций Ln(x)-x+1.8 = 0 На отрезке По этому уравнению есть программка в Pascal ...

Перевод с visual basic на пайтон
Добрый день.. всем.. я новичёк.. пока многово низнаю.. я - новичок и пока многого не знаю. Интересуюсь пайтоном.. Хотелось бы перевести...

Перевод с Pascal на Visual Basic
Привет форумчане, нужна помощь в переводе с pascal на vb. в масиве А=(а1,а2...аn), все элементы равно нулю, поставить сразу после...

Перевод кода с visual basic на C++
Здравствуйте!Помогите, пожалуйста, перевести задачу о распределении инвестиций с visual basic на C++. 1. ReDim B(0 to M) 2. ...


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru