API tools faq
paste
Advertisement
ayouberr

hilikols

ayouberr
Apr 9th, 2020
715
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VisualBasic 25.16 KB | None | 0 0
raw download clone embed print report
  1.  
  2.  
  3. ###########################  Table1 1  #####################################
  4.  
  5. Sub Table1()
  6. If option 1 = 10 or option 2 = 10 or option 3 = 10 or option 4 = 10 Then Result = RESULT 1
  7. ElseIf option 5 = 0 Then show Table 2
  8. End If
  9. End sub
  10.  
  11.  
  12. ###########################  Table1 2  #####################################
  13. Sub Table 2()
  14. Collect Score and Then go to table 3
  15. End sub
  16.  
  17.  
  18. ###########################  Table1 3  #####################################
  19. Sub Table 3()
  20. Collect Score and Then go to table 4
  21. End sub
  22.  
  23.  
  24. ###########################  Table1 4  #####################################
  25. Sub Table 4()
  26. Collect Score and Then go to table 5
  27. End sub
  28.  
  29. ###########################  Table1 5  #####################################
  30. Sub Table1 5()
  31. If choix = oui  go to table A
  32. ElseIf choix = non Then go to table B
  33. End If
  34. End sub
  35.  
  36.  
  37. ###########################  Table1 A  #####################################
  38. Sub Table1 A()
  39. If choix = oui     and  score of Table2 >= 3      and score of Table3 >= 8      and score of Table4 >= 5      Then Result = RESULT 2B
  40. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8   and score of Table4 >= 5   Then Result = RESULT 2B
  41. ElseIf choix = oui and  score of Table2 >= 3       and score of Table3 >= 8     and score of Table4 Like"[3-35]" Then Result = RESULT 2B
  42. ElseIf choix = oui and  score of Table2 >= 3  and score of Table3 Like"[4-32]" and score of Table4 >= 5   Then Result = RESULT 2B
  43. ElseIf choix = oui and  score of Table2 >= 3  and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 2B
  44. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 2B
  45. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 2B
  46. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 2B
  47. ElseIf choix = oui and  score of Table2 >= 3     and score of Table3 Like"[4-32]"                           Then Result = RESULT 2B
  48. ElseIf choix = oui                                   and score of Table3 >= 8                               Then Result = RESULT 2B
  49. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 =< 4      and score of Table4 =< 3    Then Result = RESULT 2A
  50. ElseIf choix = oui                                                         and score of Table4 =< 7         Then Result = RESULT 2A
  51. ElseIf choix = oui                                   and score of Table3  < 4                               Then Result = RESULT 2A
  52. ElseIf choix = oui                        and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 2A
  53. ElseIf choix = oui                                   and score of Table3 =  0                               Then Result = RESULT 2A
  54.  
  55. ElseIf choix = Non Then go to Table A2
  56.  
  57. End If
  58. End sub
  59.  
  60.  
  61. ###########################  Table1 A2  #####################################
  62. Sub Table1 A2()
  63. If choix = oui     and  score of Table2 >= 3       and score of Table3 >= 8       and score of Table4 >= 5      Then Result = RESULT 2B
  64. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8        and score of Table4 >= 5   Then Result = RESULT 2B
  65. ElseIf choix = oui and  score of Table2 >= 3      and score of Table3 >= 8     and score of Table4 Like"[3-35]" Then Result = RESULT 2B
  66. ElseIf choix = oui and  score of Table2 >= 3     and score of Table3 Like"[4-32]" and score of Table4 >= 5     Then Result = RESULT 2B
  67. ElseIf choix = oui and  score of Table2 >= 3  and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 2B
  68. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8  and score of Table4 Like"[2-35]" Then Result = RESULT 2B
  69. ElseIf choix = oui and  score of Table2 Like"[1-3]" and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 2B
  70. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7  Then Result = RESULT 2B
  71. ElseIf choix = oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                           Then Result = RESULT 2B
  72. ElseIf choix = oui                                   and score of Table3 >= 8                                 Then Result = RESULT 2B
  73. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 =< 4       and score of Table4 =< 3    Then Result = RESULT 2A
  74. ElseIf choix = oui                                                          and score of Table4 =< 7         Then Result = RESULT 2A
  75. ElseIf choix = oui                                   and score of Table3  < 4                                 Then Result = RESULT 2A
  76. ElseIf choix = oui                          and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 2A
  77. ElseIf choix = oui                        and score of Table3 =  0                                            Then Result = RESULT 2A
  78.  
  79. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 >= 8      and score of Table4 >= 5       Then Result = RESULT 3B
  80. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 3B
  81. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 Like"[3-35]" Then Result = RESULT 3B
  82. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 >= 5         Then Result = RESULT 23
  83. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 3B
  84. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 3B
  85. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 3B
  86. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 3B
  87. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                                    Then Result = RESULT 3B
  88. ElseIf choix = Non                                   and score of Table3 >= 8                                            Then Result = RESULT 3B
  89. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 =< 4         and score of Table4 =< 3         Then Result = RESULT 3A
  90. ElseIf choix = Non                                                                      and score of Table4 =< 7         Then Result = RESULT 3A
  91. ElseIf choix = Non                                   and score of Table3  < 4                                            Then Result = RESULT 3A
  92. ElseIf choix = Non                                   and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 3A
  93. ElseIf choix = Non                                   and score of Table3 =  0                                            Then Result = RESULT 3A
  94.  
  95. End If
  96. End sub
  97.  
  98.  
  99.  
  100. ###########################  Table1 B  #####################################
  101. Sub Table1 B()
  102. If choix = oui  Then go to table B1
  103. ElseIf choix = non Then go to table B2
  104. End If
  105. End sub
  106.  
  107.  
  108. ###########################  Table1 B1 #####################################
  109. Sub Table1 B1()
  110. If choix = oui  Then go to table B1A
  111. ElseIf choix = non Then go to table B1B
  112. End If
  113. End sub
  114.  
  115. ###########################  Table1 B1A #####################################
  116. Sub Table1 B1A()
  117. If choix = Non     and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 2B
  118. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 2B
  119. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 Like"[3-35]" Then Result = RESULT 2B
  120. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 >= 5         Then Result = RESULT 2B
  121. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 2B
  122. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 2B
  123. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 2B
  124. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 2B
  125. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                                    Then Result = RESULT 2B
  126. ElseIf choix = Non                                   and score of Table3 >= 8                                            Then Result = RESULT 2B
  127. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 =< 4         and score of Table4 =< 3         Then Result = RESULT 2A
  128. ElseIf choix = Non                                                                      and score of Table4 =< 7         Then Result = RESULT 2A
  129. ElseIf choix = Non                                   and score of Table3  < 4                                            Then Result = RESULT 2A
  130. ElseIf choix = Non                                   and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 2A
  131. ElseIf choix = Non                                   and score of Table3 =  0                                            Then Result = RESULT 2A
  132.  
  133. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 3B
  134. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 3B
  135. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 Like"[3-35]" Then Result = RESULT 3B
  136. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 >= 5         Then Result = RESULT 33
  137. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 3B
  138. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 3B
  139. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 3B
  140. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 3B
  141. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                                    Then Result = RESULT 3B
  142. ElseIf choix = Oui                                   and score of Table3 >= 8                                            Then Result = RESULT 3B
  143. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 =< 4         and score of Table4 =< 3         Then Result = RESULT 3A
  144. ElseIf choix = Oui                                                                      and score of Table4 =< 7         Then Result = RESULT 3A
  145. ElseIf choix = Oui                                   and score of Table3  < 4                                            Then Result = RESULT 3A
  146. ElseIf choix = Oui                                   and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 3A
  147. ElseIf choix = Oui                                   and score of Table3 =  0                                            Then Result = RESULT 3A
  148. End If
  149. End sub
  150.  
  151.  
  152.  
  153.  
  154. ###########################  Table1 B1B #####################################
  155. Sub Table1 B1B()
  156. If choix = Oui     and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 4B
  157. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 4B
  158. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 Like"[3-35]" Then Result = RESULT 4B
  159. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 >= 5         Then Result = RESULT 43
  160. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 4B
  161. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 4B
  162. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 4B
  163. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 4B
  164. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                                    Then Result = RESULT 4B
  165. ElseIf choix = Oui                                   and score of Table3 >= 8                                            Then Result = RESULT 4B
  166. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 =< 4         and score of Table4 =< 3         Then Result = RESULT 4A
  167. ElseIf choix = Oui                                                                      and score of Table4 =< 7         Then Result = RESULT 4A
  168. ElseIf choix = Oui                                   and score of Table3  < 4                                            Then Result = RESULT 4A
  169. ElseIf choix = Oui                                   and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 4A
  170. ElseIf choix = Oui                                   and score of Table3 =  0                                            Then Result = RESULT 4A
  171. ElseIf choix = Non Then go to Table B1BB
  172. End If
  173. End sub
  174.  
  175.  
  176.  
  177. ###########################  Table1 B1BB #####################################
  178. Sub Table1 B1BB()
  179. If choix = Oui     and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 4B
  180. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 4B
  181. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 Like"[3-35]" Then Result = RESULT 4B
  182. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 >= 5         Then Result = RESULT 43
  183. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 4B
  184. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 4B
  185. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 4B
  186. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 4B
  187. ElseIf choix = Oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                                    Then Result = RESULT 4B
  188. ElseIf choix = Oui                                   and score of Table3 >= 8                                            Then Result = RESULT 4B
  189. ElseIf choix = Oui and  score of Table2 Like"[1-3]"  and score of Table3 =< 4         and score of Table4 =< 3         Then Result = RESULT 4A
  190. ElseIf choix = Oui                                                                      and score of Table4 =< 7         Then Result = RESULT 4A
  191. ElseIf choix = Oui                                   and score of Table3  < 4                                            Then Result = RESULT 4A
  192. ElseIf choix = Oui                                   and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 4A
  193. ElseIf choix = Oui                                   and score of Table3 =  0                                            Then Result = RESULT 4A
  194.  
  195. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 5B
  196. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 5B
  197. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 Like"[3-35]" Then Result = RESULT 5B
  198. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 >= 5         Then Result = RESULT 53
  199. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 5B
  200. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 5B
  201. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 5B
  202. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 5B
  203. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                                    Then Result = RESULT 5B
  204. ElseIf choix = Non                                   and score of Table3 >= 8                                            Then Result = RESULT 5B
  205. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 =< 4         and score of Table4 =< 3         Then Result = RESULT 5A
  206. ElseIf choix = Non                                                                      and score of Table4 =< 7         Then Result = RESULT 5A
  207. ElseIf choix = Non                                   and score of Table3  < 4                                            Then Result = RESULT 5A
  208. ElseIf choix = Non                                   and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 5A
  209. ElseIf choix = Non                                   and score of Table3 =  0                                            Then Result = RESULT 5A
  210.  
  211. End If
  212. End sub
  213.  
  214.  
  215.  
  216.  
  217. ###########################  Table1 B2 #####################################
  218. Sub Table1 B2()
  219. If choix = Non     and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 5B
  220. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 5B
  221. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 Like"[3-35]" Then Result = RESULT 5B
  222. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 >= 5         Then Result = RESULT 53
  223. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 5B
  224. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 5B
  225. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 5B
  226. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 5B
  227. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                                    Then Result = RESULT 5B
  228. ElseIf choix = Non                                   and score of Table3 >= 8                                            Then Result = RESULT 5B
  229. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 =< 4         and score of Table4 =< 3         Then Result = RESULT 5A
  230. ElseIf choix = Non                                                                      and score of Table4 =< 7         Then Result = RESULT 5A
  231. ElseIf choix = Non                                   and score of Table3  < 4                                            Then Result = RESULT 5A
  232. ElseIf choix = Non                                   and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 5A
  233. ElseIf choix = Non                                   and score of Table3 =  0                                            Then Result = RESULT 5A
  234.  
  235. ElseIf choix = Oui Then go to Table B2B
  236.  
  237. End If
  238. End sub
  239.  
  240.  
  241.  
  242.  
  243. ###########################  Table1 B2B #####################################
  244. Sub Table1 B2B()
  245. If choix = oui     and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 2B
  246. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 2B
  247. ElseIf choix = oui and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 Like"[3-35]" Then Result = RESULT 2B
  248. ElseIf choix = oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 >= 5         Then Result = RESULT 2B
  249. ElseIf choix = oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 2B
  250. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 2B
  251. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 2B
  252. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 2B
  253. ElseIf choix = oui and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                                    Then Result = RESULT 2B
  254. ElseIf choix = oui                                   and score of Table3 >= 8                                            Then Result = RESULT 2B
  255. ElseIf choix = oui and  score of Table2 Like"[1-3]"  and score of Table3 =< 4         and score of Table4 =< 3         Then Result = RESULT 2A
  256. ElseIf choix = oui                                                                      and score of Table4 =< 7         Then Result = RESULT 2A
  257. ElseIf choix = oui                                   and score of Table3  < 4                                            Then Result = RESULT 2A
  258. ElseIf choix = oui                                   and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 2A
  259. ElseIf choix = oui                                   and score of Table3 =  0                                            Then Result = RESULT 2A
  260.  
  261. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 3B
  262. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 >= 5         Then Result = RESULT 3B
  263. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 >= 8         and score of Table4 Like"[3-35]" Then Result = RESULT 3B
  264. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 >= 5         Then Result = RESULT 23
  265. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]" and score of Table4 Like"[3-35]" Then Result = RESULT 3B
  266. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 >= 8         and score of Table4 Like"[2-35]" Then Result = RESULT 3B
  267. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[6-32]" and score of Table4 Like"[2-35]" Then Result = RESULT 3B
  268. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 Like"[2-32]" and score of Table4 >= 7         Then Result = RESULT 3B
  269. ElseIf choix = Non and  score of Table2 >= 3       and score of Table3 Like"[4-32]"                                    Then Result = RESULT 3B
  270. ElseIf choix = Non                                   and score of Table3 >= 8                                            Then Result = RESULT 3B
  271. ElseIf choix = Non and  score of Table2 Like"[1-3]"  and score of Table3 =< 4         and score of Table4 =< 3         Then Result = RESULT 3A
  272. ElseIf choix = Non                                                                      and score of Table4 =< 7         Then Result = RESULT 3A
  273. ElseIf choix = Non                                   and score of Table3  < 4                                            Then Result = RESULT 3A
  274. ElseIf choix = Non                                   and score of Table3 =  0         and score of Table4 =  0         Then Result = RESULT 3A
  275. ElseIf choix = Non                                   and score of Table3 =  0                                            Then Result = RESULT 3A
  276.  
  277. End If
  278. End sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!