| 
▪
 Всё, что не железо
 
	
		|  | 							
 |  |  
		| ddx1 
 
   Posts: 10501
 Has thanked: 2816 times
 Have thanks: 5038 times
 
 
					
                    
 | Fenih wrote:Алгоритмически, или кодом?
 Алгоритмически — циклом? Это понятно. Я вообще VB впервые вижу (когда-то изучал бейсик и паскаль), жене контрольную помогаю сделать. Мне непонятны поведение и возможности этих полей/кнопок/форм :-(  |  |  
		|    |  |  |  
	
		|  | 							
 |  |  
		| ddx1 
 
   Posts: 10501
 Has thanked: 2816 times
 Have thanks: 5038 times
 
 
					
                    
 | Low_Pressure wrote:ребенку в школе
 мой пока ещё в садике. по сабжу — решил пока сделать ввод через шесть текстовых полей O_o, в условии задачи это не оговаривается  |  |  
		|    |  |  |  
	
		|  | 							
 |  |  
		| ddx1 
 
   Posts: 10501
 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: 10501
 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: 10501
 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: 10501
 Has thanked: 2816 times
 Have thanks: 5038 times
 
 
					
                    
 | Чуть выше естьqpMM wrote:Можно еще раз конкретное задание с деталями и прочим?
 .  |  |  
		|    |  |  |  |