2014-02-19 10 views
0

У меня есть файл INI, который выглядит так!читать целые числа, разделенные запятыми, в файле INI

[columnNumber] 
Number1=2,4 

это мой код ини файл read using function defined here

columberNumber берется в качестве строки «2,4» я хочу разделить это и передать его в моем случае выбора объекта mytmp цикла для всех значений в Number1 передать его mytmp в выберите

columnNum = ReadIni(file, "columnNumber", "Number1") 
    mytmp = columnNum 
    x = Split(mytmp, ",") 
    For k = 0 To UBound(x) 
    'mytmp1 = Split(array_colnum, ",") 
    'mytmp2 = Search(array_col) 


    'mytmp1 = x(k) 
    'mytmp2 = x(k) 
    Next k 

это мой выбор случай

select case i...<does something> 

     select case mytmp 

Может ли кто-нибудь помочь мне в этом?

Обновлено: Я хочу поместить в select case i значения, полученные из [columnNumber], моя функция ReadIni читает из [columnNumber section] number1 = {2,4}, я хочу разбить это и сохранить в переменной, переменная прочитайте из переменной case case

+0

Можете ли вы уточнить свой вопрос? Трудно сказать, что вы на самом деле спрашиваете –

+0

Я обновил вопрос, если теперь вы можете это проверить! pls –

ответ

3

Не совсем понятно, что именно вы пытаетесь сделать ... Что такое переменная «I»? что он должен содержать?

mytmp = "2,4" 
    x = Split(mytmp, ",") 

    For k = LBound (x) To UBound (x) 
      '## Get value and store in variable "I". 
      i = x (k) 

      Select Case i 
        Case "2" 
          Response.Write "yep, it's 2" 
        Case "4" 
          Response.Write "yep, it's 4" 
      End Select 
    Next 
+0

ok! +1, но случай не должен быть раздельным, например 'a [2] = {2,4} select case i', как это сделать. –

+0

у Zam! 'x = Split (columnNum,", ") Для k = LBound (x) To UBound (x) i = x (k) mytmp = Val (i)' в этом mytmp дает мне 2, получить 4? –

+0

2 - это правильно, потому что у вас есть только 2 значения. если вам нужно пройти 4 раза, то вы должны 1) разобрать все и найти максимальное значение (наш случай будет 4). 2) вы должны перемещать SELECT CASE вне «For k = LBound (x) To UBound (x)" – Zam

Смежные вопросы