Преобразование числа в символ для макроса в Statistica - VB

Узнай цену своей работы

Формулировка задачи:

Здравствуйте, потребовалось провести множественную линейную регрессию в Statistica много раз, для чего решил сделать макрос. Макрос программа написала сама, я лишь добавил цикл. Проблема в строчке:
Листинг программы
  1. oAD1.Variables = "1 | 2 - 4"
В ней указываются в виде текста предиктант и предикторы в виде номеров столбцов в таблице (в данном случае предиктор в 1 столбце, предиктанты - в 2-4 столбцах) . Как запрограммировать их изменение (например, увеличение на единицу каждого из них) с каждой итерацией цикла? Большое спасибо. Весь код макроса:
Листинг программы
  1. Option Base 1
  2. Sub Main
  3. Dim A As Integer
  4. For A = 1 To 10
  5. Dim AO As AnalysisOutput
  6. Dim AWB As Workbook
  7. Dim S1 As Spreadsheet
  8. Set S1 = ActiveDataSet
  9. Dim newanalysis2 As Analysis
  10. Set newanalysis2 = Analysis (scMultipleRegression, S1)
  11. Dim oAD1 As STARegression.RegStartup
  12. Set oAD1 = newanalysis2.Dialog
  13. oAD1.Variables = "1 | 2 - 4"
  14. oAD1.InputFile = scRegRawData
  15. oAD1.CasewiseDeletionOfMD = True
  16. oAD1.PerformNonDefaultStepwiseAnalysis = False
  17. oAD1.ReviewDescriptiveStatistics = False
  18. oAD1.ExtendedPrecisionComputations = False
  19. oAD1.BatchProcessingAndPrinting = False
  20.  
  21. newanalysis2.Run
  22. Dim oAD2 As STARegression.RegResults
  23. Set oAD2 = newanalysis2.Dialog
  24. oAD2.ComputeConfidenceLimits = True
  25. oAD2.AlphaForLimits = 0.05
  26. oAD2.PLevelForHighlighting = 0.05
  27.  
  28. Set AO = newanalysis2.RouteOutput(oAD2.Summary)
  29. AO.Visible = True
  30. If AO.HasWorkbook Then
  31. Set AWB = AO.Workbook
  32. Else
  33. Set AWB = Nothing
  34. End If
  35. Next
  36. End Sub

Решение задачи: «Преобразование числа в символ для макроса в Statistica»

textual
Листинг программы
  1. oAD1.Variables = A & " | " & A+1 & " - " & A+3

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 4.143 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы