Форум программистов, компьютерный форум, киберфорум
Python для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.92/13: Рейтинг темы: голосов - 13, средняя оценка - 4.92
0 / 0 / 0
Регистрация: 02.09.2022
Сообщений: 13

Перевод с visual basic на пайтон

02.09.2022, 12:13. Показов 2709. Ответов 23
Метки нет (Все метки)

Добрый день.. всем.. я новичёк.. пока многово низнаю.. я - новичок и пока многого не знаю.
Интересуюсь пайтоном..
Хотелось бы перевести этот код на пайтон.. очень рад был бы помощи..
Visual Basic
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
Sub Main
  Sc.Verbose = False
   For N = &h00 To &hFE
 
 
          Sc.Write("80 00 00 00 05")
          Sc.Read(1)
          Sc.Write("59 33 82 00")
          Sc.Write(H(N))
          Sc.Write("FF 60 30 51 00 72 FE F7 00 00 00 00 00 00 00")
          Sc.Write(H(N))
          Sc.Write("FF 60 30 51 00 72 FE F7 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 7F")
          Sc.Read(2)
 
          If Sc.GetByte(1) = &h5 Then
             Sc.Write("00 C0 00 00 05")
             Sc.Read(8)
             Sc.Print("no ")
 
          End If
 
 
          If Sc.GetByte(1) = &h7 Then
             Sc.Write("00 C0 00 00 07")
             Sc.Read(10)
             Sc.Print("" & H(N) & "")
             Sc.Print("del ")
 
         End If
 
 
 
     Next
End Sub
 
Function H(X)
  H = Hex(X)
  If Len(H) < 2 Then H = "0" & H
End Function
Пробовал найти онлайн конвертор .. толком ничего грамотного не нашёл..
Спасибо..
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
02.09.2022, 12:13
Ответы с готовыми решениями:

Перевод с C# на Visual Basic
Здравствуйте, помогите перевести пожалуйста: using System; using System.Collections.Generic; using System.Linq; using System.Text; ...

Перевод с 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 ...

23
0 / 0 / 0
Регистрация: 02.09.2022
Сообщений: 13
05.09.2022, 23:40  [ТС]
Древняя ещё.. 2.7.18
0
Эксперт PythonЭксперт Java
19530 / 11067 / 2931
Регистрация: 21.10.2017
Сообщений: 23,294
05.09.2022, 23:44
О Боже!
Поставь третий!!!
0
0 / 0 / 0
Регистрация: 02.09.2022
Сообщений: 13
06.09.2022, 00:02  [ТС]
Да я бы и рад.. но на этом оборудовоние пока не получиться.. большее количество пользователей сидят на этой..
0
0 / 0 / 0
Регистрация: 02.09.2022
Сообщений: 13
06.09.2022, 15:35  [ТС]
Нашёл кое какой пример кода.. сейчас попробую что нибуть сворганить..
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
06.09.2022, 15:35

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

Перевод с Visual Basic на C#
Помогите пожалуйста Console.WriteLine(&quot;Данный куб с ребром равным = &quot; &amp; edge &amp; vbCrLf) ...

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

Перевод с C# на Visual Basic
Здраствуйте, помогите пожалуйста перевести код на Basic class Program { static void Main(string args) { ...

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


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

Или воспользуйтесь поиском по форуму:
24
Ответ Создать тему
Новые блоги и статьи
[golang] Конкурентный fetcher с ограничением максимального количества одновременных HTTP запросов.
alhaos 10.06.2026
Задача Реализовать конкурентный fetcher с ограничением максимального количества одновременных HTTP запросов. Сигнатура func Fetch(urls string, maxConcurrent int) Result Пример urls :=. . .
[golang] Состояние гонки (race condition)
alhaos 10.06.2026
Состояние гонки (race condition) Состояние гонки (Race Condition) — это ошибка, возникающая при одновременном доступе нескольких горутин к одним и тем же данным без должной синхронизации. При этом. . .
Взрослые отношения, и почему они не получаются
kumehtar 09.06.2026
Когда в детстве ребёнок не получает от родителей чего-то важного, он лишается не просто приятных переживаний, а основы для формирования определённых внутренних качеств и навыков. Если ребёнок не. . .
[golang] Worker Pool
alhaos 09.06.2026
Worker Pool Worker Pool — паттерн конкурентной обработки задач в Go. Суть: фиксированное количество горутин-воркеров читают задачи из общего канала и пишут результаты в общий канал результатов. . . .
[golang] Pipeline
alhaos 08.06.2026
Pipeline Pipeline — паттерн конкурентной обработки данных в Go. Суть: данные проходят через цепочку независимых стадий, каждая из которых работает в своей горутине и общается с соседями через. . .
Свет внутри себя
kumehtar 07.06.2026
Пусть это будет здесь lIs4oanZS9Y
Программа для com-порта
Uhbif79 05.06.2026
Всем привет, давно хотел изучить Qt, начинал, бросал, потом снова начинал. И сейчас вот смог написать свою первую программу. До этого имел опыт программирования микроконтроллеров, писал прошивки на. . .
Транскрипция 55-минутного видео через Whisper: WhisperDesktop облажался, спас Google Colab[
anaschu 01.06.2026
Понадобилось получить текст из свежезагруженного видео на YouTube. Казалось бы, задача на пять минут. Заняла полтора часа. Делюсь опытом — может кому пригодится последовательность решений. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru