▪
Всё, что не железо
|
|
|
ddx1
Posts: 10500
Has thanked: 2816 times
Have thanks: 5038 times
|
Fenih wrote:Алгоритмически, или кодом?
Алгоритмически — циклом? Это понятно. Я вообще VB впервые вижу (когда-то изучал бейсик и паскаль), жене контрольную помогаю сделать. Мне непонятны поведение и возможности этих полей/кнопок/форм :-(
|
|
|
|
|
|
|
|
ddx1
Posts: 10500
Has thanked: 2816 times
Have thanks: 5038 times
|
Low_Pressure wrote:ребенку в школе
мой пока ещё в садике. по сабжу — решил пока сделать ввод через шесть текстовых полей O_o, в условии задачи это не оговаривается
|
|
|
|
|
|
|
|
ddx1
Posts: 10500
Has thanked: 2816 times
Have thanks: 5038 times
|
Fenih wrote:распилить строку на шесть строк с разделителем в запятой
было бы здорово, а ещё лучше — пробелом, т.к. числа могут быть с десятичной частью
|
|
|
|
|
|
|
|
Low_Pressure
Posts: 2808
Has thanked: 645 times
Have thanks: 273 times
|
ddx1 wrote:было бы здорово, а ещё лучше — пробелом, т.к. числа могут быть с десятичной частью
Это по условию задачи? Тогда как-то так: x="первый символ" if x="." then следующая итерация цикла x=x+"второй символ"/10 if x=" " then конец вложенного цикла, начало внешнего, переходим к элементу y массива. Ну это на правах КО. Если серьезно, я бы погуглил в поисках готового решения.
|
|
|
|
|
|
|
|
Fenih
Posts: 5734
Has thanked: 781 times
Have thanks: 789 times
|
ddx1 wrote:было бы здорово, а ещё лучше — пробелом, т.к. числа могут быть с десятичной частью
Сравниваешь каждый символ с пробелом, записываешь номера в массив или просто в 6 переменных. После этого командой типа "bString = aString.Substring(2, 6)" распиливаешь на строки. Строки в числа конвертируются командой Val.
Ты сам выбрал такой путь - сам и вывози, и не жалуйся. И не говори даже, что тебе это все не нравится.
|
|
|
|
|
|
|
|
ddx1
Posts: 10500
Has thanked: 2816 times
Have thanks: 5038 times
|
Low_Pressure wrote:оно
нет, но там есть полезная инфа :-) Fenih wrote:j = 1 //счётчик for i = 1 to (длина строки) do if (aString = Mid(aString, i, i) = (пробелу)) and (j <5) then begin (или нет бегинов?) massiv(j) = i j = j + 1 end \\нашли все номера, надо выйти из цикла как-то 1string = aString.Substring(0, massiv(1)) 2string = aString.Substring(massiv(1), massiv(2)) 3string = aString.Substring(massiv(2), massiv(3))
мне это будет сниться сегодня О_О
|
|
|
|
|
|
|
|
ddx1
Posts: 10500
Has thanked: 2816 times
Have thanks: 5038 times
|
Fenih wrote:Почему?
Потому, что я ни разу не программист и меня вносящие неопределённость комментарии, типа «как-то», подавляют, я уже даже с Атомик Рустер на Тыр перешёл, чтобы взбодриться
|
|
|
|
|
|
|
|
Fenih
Posts: 5734
Has thanked: 781 times
Have thanks: 789 times
|
Продолжение видимо такое: 1string = aString.Substring(1, (massiv(1)-1)) \\первая строка - от первого символа, до символа перед первым пробелом. 2string = aString.Substring((massiv(1)+1), (massiv(2)-1))) \\Вторая строка - от символа после первого пробела, до символа перед вторым пробелом 3string = aString.Substring((massiv(2)+1), (massiv(3)-1))) \\Третья строка - от символа после второго пробела, до символа перед треьтим пробелом Оставшиеся строки аналогично. Единственное, я не уврен, что в первой строке надо всё-таки с первого символа, а не нулевого — я так и не нагуглил, как строка заносится.
Ты сам выбрал такой путь - сам и вывози, и не жалуйся. И не говори даже, что тебе это все не нравится.
|
|
|
|
|
|
|
|
DrakarD
Posts: 6300
Has thanked: 895 times
Have thanks: 759 times
|
ddx1 wrote:мой пока ещё в садике
Ну так, нынче есть и продвинутые садики для детишек-индиго. VB и теорию бозонных струн в ясельках проходят.
|
|
|
|
|
|
|
|
ddx1
Posts: 10500
Has thanked: 2816 times
Have thanks: 5038 times
|
qpMM wrote:Можно еще раз конкретное задание с деталями и прочим? Чуть выше есть.
|
|
|
|
|
|