Advertisement
Guest User

if case

a guest
Jul 2nd, 2018
208
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 195.72 KB | None | 0 0
  1. If primoR = 0 Then
  2. If CheckBox10.Checked Then
  3. If secondoR = 1 Then
  4. If CheckBox1.Checked Then
  5. If terzoR = 2 Then
  6. If CheckBox2.Checked Then
  7. TextBox1.BackColor = Color.Green
  8. End If
  9. ElseIf terzoR = 3 Then
  10. If CheckBox3.Checked Then
  11. TextBox1.BackColor = Color.Green
  12. End If
  13. ElseIf terzoR = 4 Then
  14. If CheckBox4.Checked Then
  15. TextBox1.BackColor = Color.Green
  16. End If
  17. ElseIf terzoR = 5 Then
  18. If CheckBox5.Checked Then
  19. TextBox1.BackColor = Color.Green
  20. End If
  21. ElseIf terzoR = 6 Then
  22. If CheckBox6.Checked Then
  23. TextBox1.BackColor = Color.Green
  24. End If
  25. ElseIf terzoR = 7 Then
  26. If CheckBox7.Checked Then
  27. TextBox1.BackColor = Color.Green
  28. End If
  29. ElseIf terzoR = 8 Then
  30. If CheckBox8.Checked Then
  31. TextBox1.BackColor = Color.Green
  32. End If
  33. ElseIf terzoR = 9 Then
  34. If CheckBox9.Checked Then
  35. TextBox1.BackColor = Color.Green
  36. End If
  37. ElseIf terzoR = 1 Then
  38. If CheckBox1.Checked Then
  39. TextBox1.BackColor = Color.Green
  40. End If
  41. ElseIf terzoR = 0 Then
  42. If CheckBox10.Checked Then
  43. TextBox1.BackColor = Color.Green
  44. End If
  45. End If
  46. End If
  47. ElseIf secondoR = 2 Then
  48. If CheckBox2.Checked Then
  49. If terzoR = 1 Then
  50. If CheckBox1.Checked Then
  51. TextBox1.BackColor = Color.Green
  52. End If
  53. ElseIf terzoR = 2 Then
  54. If CheckBox2.Checked Then
  55. TextBox1.BackColor = Color.Green
  56. End If
  57. ElseIf terzoR = 3 Then
  58. If CheckBox3.Checked Then
  59. TextBox1.BackColor = Color.Green
  60. End If
  61. ElseIf terzoR = 4 Then
  62. If CheckBox4.Checked Then
  63. TextBox1.BackColor = Color.Green
  64. End If
  65. ElseIf terzoR = 5 Then
  66. If CheckBox5.Checked Then
  67. TextBox1.BackColor = Color.Green
  68. End If
  69. ElseIf terzoR = 6 Then
  70. If CheckBox6.Checked Then
  71. TextBox1.BackColor = Color.Green
  72.  
  73. End If
  74. ElseIf terzoR = 7 Then
  75. If CheckBox7.Checked Then
  76. TextBox1.BackColor = Color.Green
  77. End If
  78. ElseIf terzoR = 8 Then
  79. If CheckBox8.Checked Then
  80. TextBox1.BackColor = Color.Green
  81. End If
  82. ElseIf terzoR = 9 Then
  83. If CheckBox9.Checked Then
  84. TextBox1.BackColor = Color.Green
  85. End If
  86. ElseIf terzoR = 0 Then
  87. If CheckBox10.Checked Then
  88. TextBox1.BackColor = Color.Green
  89. End If
  90. End If
  91. End If
  92. ElseIf secondoR = 3 Then
  93. If CheckBox3.Checked Then
  94. If terzoR = 0 Then
  95. If CheckBox10.Checked Then
  96. TextBox1.BackColor = Color.Green
  97. End If
  98.  
  99. ElseIf terzoR = 1 Then
  100. If CheckBox1.Checked Then
  101. TextBox1.BackColor = Color.Green
  102. End If
  103. ElseIf terzoR = 2 Then
  104. If CheckBox2.Checked Then
  105. TextBox1.BackColor = Color.Green
  106. End If
  107. ElseIf terzoR = 3 Then
  108. If CheckBox3.Checked Then
  109. TextBox1.BackColor = Color.Green
  110. End If
  111. ElseIf terzoR = 4 Then
  112. If CheckBox4.Checked Then
  113. TextBox1.BackColor = Color.Green
  114. End If
  115. ElseIf terzoR = 5 Then
  116. If CheckBox5.Checked Then
  117. TextBox1.BackColor = Color.Green
  118. End If
  119. ElseIf terzoR = 6 Then
  120. If CheckBox6.Checked Then
  121. TextBox1.BackColor = Color.Green
  122. End If
  123. ElseIf terzoR = 7 Then
  124. If CheckBox7.Checked Then
  125. TextBox1.BackColor = Color.Green
  126. End If
  127. ElseIf terzoR = 8 Then
  128. If CheckBox8.Checked Then
  129. TextBox1.BackColor = Color.Green
  130. End If
  131. ElseIf terzoR = 9 Then
  132. If CheckBox9.Checked Then
  133. TextBox1.BackColor = Color.Green
  134. End If
  135. End If
  136. End If
  137. ElseIf secondoR = 4 Then
  138. If CheckBox4.Checked Then
  139. If terzoR = 0 Then
  140. If CheckBox10.Checked Then
  141. TextBox1.BackColor = Color.Green
  142. End If
  143.  
  144. ElseIf terzoR = 1 Then
  145. If CheckBox1.Checked Then
  146. TextBox1.BackColor = Color.Green
  147. End If
  148. ElseIf terzoR = 2 Then
  149. If CheckBox2.Checked Then
  150. TextBox1.BackColor = Color.Green
  151. End If
  152. ElseIf terzoR = 3 Then
  153. If CheckBox3.Checked Then
  154. TextBox1.BackColor = Color.Green
  155. End If
  156. ElseIf terzoR = 4 Then
  157. If CheckBox4.Checked Then
  158. TextBox1.BackColor = Color.Green
  159. End If
  160. ElseIf terzoR = 5 Then
  161. If CheckBox5.Checked Then
  162. TextBox1.BackColor = Color.Green
  163. End If
  164. ElseIf terzoR = 6 Then
  165. If CheckBox6.Checked Then
  166. TextBox1.BackColor = Color.Green
  167. End If
  168. ElseIf terzoR = 7 Then
  169. If CheckBox7.Checked Then
  170. TextBox1.BackColor = Color.Green
  171. End If
  172. ElseIf terzoR = 8 Then
  173. If CheckBox8.Checked Then
  174. TextBox1.BackColor = Color.Green
  175. End If
  176. ElseIf terzoR = 9 Then
  177. If CheckBox9.Checked Then
  178. TextBox1.BackColor = Color.Green
  179. End If
  180. End If
  181. End If
  182. ElseIf secondoR = 5 Then
  183. If CheckBox5.Checked Then
  184. If terzoR = 0 Then
  185. If CheckBox10.Checked Then
  186. TextBox1.BackColor = Color.Green
  187. End If
  188.  
  189. ElseIf terzoR = 1 Then
  190. If CheckBox1.Checked Then
  191. TextBox1.BackColor = Color.Green
  192. End If
  193. ElseIf terzoR = 2 Then
  194. If CheckBox2.Checked Then
  195. TextBox1.BackColor = Color.Green
  196. End If
  197. ElseIf terzoR = 3 Then
  198. If CheckBox3.Checked Then
  199. TextBox1.BackColor = Color.Green
  200. End If
  201. ElseIf terzoR = 4 Then
  202. If CheckBox4.Checked Then
  203. TextBox1.BackColor = Color.Green
  204. End If
  205. ElseIf terzoR = 5 Then
  206. If CheckBox5.Checked Then
  207. TextBox1.BackColor = Color.Green
  208. End If
  209. ElseIf terzoR = 6 Then
  210. If CheckBox6.Checked Then
  211. TextBox1.BackColor = Color.Green
  212. End If
  213. ElseIf terzoR = 7 Then
  214. If CheckBox7.Checked Then
  215. TextBox1.BackColor = Color.Green
  216. End If
  217. ElseIf terzoR = 8 Then
  218. If CheckBox8.Checked Then
  219. TextBox1.BackColor = Color.Green
  220. End If
  221. ElseIf terzoR = 9 Then
  222. If CheckBox9.Checked Then
  223. TextBox1.BackColor = Color.Green
  224. End If
  225. End If
  226. End If
  227. ElseIf secondoR = 6 Then
  228. If CheckBox6.Checked Then
  229. If terzoR = 0 Then
  230. If CheckBox10.Checked Then
  231. TextBox1.BackColor = Color.Green
  232. End If
  233.  
  234. ElseIf terzoR = 1 Then
  235. If CheckBox1.Checked Then
  236. TextBox1.BackColor = Color.Green
  237. End If
  238. ElseIf terzoR = 2 Then
  239. If CheckBox2.Checked Then
  240. TextBox1.BackColor = Color.Green
  241. End If
  242. ElseIf terzoR = 3 Then
  243. If CheckBox3.Checked Then
  244. TextBox1.BackColor = Color.Green
  245. End If
  246. ElseIf terzoR = 4 Then
  247. If CheckBox4.Checked Then
  248. TextBox1.BackColor = Color.Green
  249. End If
  250. ElseIf terzoR = 5 Then
  251. If CheckBox5.Checked Then
  252. TextBox1.BackColor = Color.Green
  253. End If
  254. ElseIf terzoR = 6 Then
  255. If CheckBox6.Checked Then
  256. TextBox1.BackColor = Color.Green
  257. End If
  258. ElseIf terzoR = 7 Then
  259. If CheckBox7.Checked Then
  260. TextBox1.BackColor = Color.Green
  261. End If
  262. ElseIf terzoR = 8 Then
  263. If CheckBox8.Checked Then
  264. TextBox1.BackColor = Color.Green
  265. End If
  266. ElseIf terzoR = 9 Then
  267. If CheckBox9.Checked Then
  268. TextBox1.BackColor = Color.Green
  269. End If
  270. End If
  271. End If
  272. ElseIf secondoR = 7 Then
  273. If CheckBox7.Checked Then
  274. If terzoR = 0 Then
  275. If CheckBox10.Checked Then
  276. TextBox1.BackColor = Color.Green
  277. End If
  278.  
  279. ElseIf terzoR = 1 Then
  280. If CheckBox1.Checked Then
  281. TextBox1.BackColor = Color.Green
  282. End If
  283. ElseIf terzoR = 2 Then
  284. If CheckBox2.Checked Then
  285. TextBox1.BackColor = Color.Green
  286. End If
  287. ElseIf terzoR = 3 Then
  288. If CheckBox3.Checked Then
  289. TextBox1.BackColor = Color.Green
  290. End If
  291. ElseIf terzoR = 4 Then
  292. If CheckBox4.Checked Then
  293. TextBox1.BackColor = Color.Green
  294. End If
  295. ElseIf terzoR = 5 Then
  296. If CheckBox5.Checked Then
  297. TextBox1.BackColor = Color.Green
  298. End If
  299. ElseIf terzoR = 6 Then
  300. If CheckBox6.Checked Then
  301. TextBox1.BackColor = Color.Green
  302. End If
  303. ElseIf terzoR = 7 Then
  304. If CheckBox7.Checked Then
  305. TextBox1.BackColor = Color.Green
  306. End If
  307. ElseIf terzoR = 8 Then
  308. If CheckBox8.Checked Then
  309. TextBox1.BackColor = Color.Green
  310. End If
  311. ElseIf terzoR = 9 Then
  312. If CheckBox9.Checked Then
  313. TextBox1.BackColor = Color.Green
  314. End If
  315. End If
  316. End If
  317. ElseIf secondoR = 8 Then
  318. If CheckBox8.Checked Then
  319. If terzoR = 0 Then
  320. If CheckBox10.Checked Then
  321. TextBox1.BackColor = Color.Green
  322. End If
  323.  
  324. ElseIf terzoR = 1 Then
  325. If CheckBox1.Checked Then
  326. TextBox1.BackColor = Color.Green
  327. End If
  328. ElseIf terzoR = 2 Then
  329. If CheckBox2.Checked Then
  330. TextBox1.BackColor = Color.Green
  331. End If
  332. ElseIf terzoR = 3 Then
  333. If CheckBox3.Checked Then
  334. TextBox1.BackColor = Color.Green
  335. End If
  336. ElseIf terzoR = 4 Then
  337. If CheckBox4.Checked Then
  338. TextBox1.BackColor = Color.Green
  339. End If
  340. ElseIf terzoR = 5 Then
  341. If CheckBox5.Checked Then
  342. TextBox1.BackColor = Color.Green
  343. End If
  344. ElseIf terzoR = 6 Then
  345. If CheckBox6.Checked Then
  346. TextBox1.BackColor = Color.Green
  347. End If
  348. ElseIf terzoR = 7 Then
  349. If CheckBox7.Checked Then
  350. TextBox1.BackColor = Color.Green
  351. End If
  352. ElseIf terzoR = 8 Then
  353. If CheckBox8.Checked Then
  354. TextBox1.BackColor = Color.Green
  355. End If
  356. ElseIf terzoR = 9 Then
  357. If CheckBox9.Checked Then
  358. TextBox1.BackColor = Color.Green
  359. End If
  360. End If
  361. End If
  362. ElseIf secondoR = 9 Then
  363. If CheckBox9.Checked Then
  364. If terzoR = 0 Then
  365. If CheckBox10.Checked Then
  366. TextBox1.BackColor = Color.Green
  367. End If
  368.  
  369. ElseIf terzoR = 1 Then
  370. If CheckBox1.Checked Then
  371. TextBox1.BackColor = Color.Green
  372. End If
  373. ElseIf terzoR = 2 Then
  374. If CheckBox2.Checked Then
  375. TextBox1.BackColor = Color.Green
  376. End If
  377. ElseIf terzoR = 3 Then
  378. If CheckBox3.Checked Then
  379. TextBox1.BackColor = Color.Green
  380. End If
  381. ElseIf terzoR = 4 Then
  382. If CheckBox4.Checked Then
  383. TextBox1.BackColor = Color.Green
  384. End If
  385. ElseIf terzoR = 5 Then
  386. If CheckBox5.Checked Then
  387. TextBox1.BackColor = Color.Green
  388. End If
  389. ElseIf terzoR = 6 Then
  390. If CheckBox6.Checked Then
  391. TextBox1.BackColor = Color.Green
  392. End If
  393. ElseIf terzoR = 7 Then
  394. If CheckBox7.Checked Then
  395. TextBox1.BackColor = Color.Green
  396. End If
  397. ElseIf terzoR = 8 Then
  398. If CheckBox8.Checked Then
  399. TextBox1.BackColor = Color.Green
  400. End If
  401. ElseIf terzoR = 9 Then
  402. If CheckBox9.Checked Then
  403. TextBox1.BackColor = Color.Green
  404. End If
  405. End If
  406. End If
  407. Else
  408. TextBox1.BackColor = Color.Black
  409. End If
  410. Else
  411. TextBox1.BackColor = Color.Black
  412. End If
  413. ElseIf primoR = 1 Then
  414. If CheckBox1.Checked Then
  415. If secondoR = 1 Then
  416. If CheckBox1.Checked Then
  417. If terzoR = 2 Then
  418. If CheckBox2.Checked Then
  419. TextBox1.BackColor = Color.Green
  420. End If
  421. ElseIf terzoR = 3 Then
  422. If CheckBox3.Checked Then
  423. TextBox1.BackColor = Color.Green
  424. End If
  425. ElseIf terzoR = 4 Then
  426. If CheckBox4.Checked Then
  427. TextBox1.BackColor = Color.Green
  428. End If
  429. ElseIf terzoR = 5 Then
  430. If CheckBox5.Checked Then
  431. TextBox1.BackColor = Color.Green
  432. End If
  433. ElseIf terzoR = 6 Then
  434. If CheckBox6.Checked Then
  435. TextBox1.BackColor = Color.Green
  436. End If
  437. ElseIf terzoR = 7 Then
  438. If CheckBox7.Checked Then
  439. TextBox1.BackColor = Color.Green
  440. End If
  441. ElseIf terzoR = 8 Then
  442. If CheckBox8.Checked Then
  443. TextBox1.BackColor = Color.Green
  444. End If
  445. ElseIf terzoR = 9 Then
  446. If CheckBox9.Checked Then
  447. TextBox1.BackColor = Color.Green
  448. End If
  449. ElseIf terzoR = 1 Then
  450. If CheckBox1.Checked Then
  451. TextBox1.BackColor = Color.Green
  452. End If
  453. ElseIf terzoR = 0 Then
  454. If CheckBox10.Checked Then
  455. TextBox1.BackColor = Color.Green
  456. End If
  457. End If
  458. End If
  459. ElseIf secondoR = 2 Then
  460. If CheckBox2.Checked Then
  461. If terzoR = 1 Then
  462. If CheckBox1.Checked Then
  463. TextBox1.BackColor = Color.Green
  464. End If
  465. ElseIf terzoR = 2 Then
  466. If CheckBox2.Checked Then
  467. TextBox1.BackColor = Color.Green
  468. End If
  469. ElseIf terzoR = 3 Then
  470. If CheckBox3.Checked Then
  471. TextBox1.BackColor = Color.Green
  472. End If
  473. ElseIf terzoR = 4 Then
  474. If CheckBox4.Checked Then
  475. TextBox1.BackColor = Color.Green
  476. End If
  477. ElseIf terzoR = 5 Then
  478. If CheckBox5.Checked Then
  479. TextBox1.BackColor = Color.Green
  480. End If
  481. ElseIf terzoR = 6 Then
  482. If CheckBox6.Checked Then
  483. TextBox1.BackColor = Color.Green
  484.  
  485. End If
  486. ElseIf terzoR = 7 Then
  487. If CheckBox7.Checked Then
  488. TextBox1.BackColor = Color.Green
  489. End If
  490. ElseIf terzoR = 8 Then
  491. If CheckBox8.Checked Then
  492. TextBox1.BackColor = Color.Green
  493. End If
  494. ElseIf terzoR = 9 Then
  495. If CheckBox9.Checked Then
  496. TextBox1.BackColor = Color.Green
  497. End If
  498. ElseIf terzoR = 0 Then
  499. If CheckBox10.Checked Then
  500. TextBox1.BackColor = Color.Green
  501. End If
  502. End If
  503. End If
  504. ElseIf secondoR = 3 Then
  505. If CheckBox3.Checked Then
  506. If terzoR = 0 Then
  507. If CheckBox10.Checked Then
  508. TextBox1.BackColor = Color.Green
  509. End If
  510.  
  511. ElseIf terzoR = 1 Then
  512. If CheckBox1.Checked Then
  513. TextBox1.BackColor = Color.Green
  514. End If
  515. ElseIf terzoR = 2 Then
  516. If CheckBox2.Checked Then
  517. TextBox1.BackColor = Color.Green
  518. End If
  519. ElseIf terzoR = 3 Then
  520. If CheckBox3.Checked Then
  521. TextBox1.BackColor = Color.Green
  522. End If
  523. ElseIf terzoR = 4 Then
  524. If CheckBox4.Checked Then
  525. TextBox1.BackColor = Color.Green
  526. End If
  527. ElseIf terzoR = 5 Then
  528. If CheckBox5.Checked Then
  529. TextBox1.BackColor = Color.Green
  530. End If
  531. ElseIf terzoR = 6 Then
  532. If CheckBox6.Checked Then
  533. TextBox1.BackColor = Color.Green
  534. End If
  535. ElseIf terzoR = 7 Then
  536. If CheckBox7.Checked Then
  537. TextBox1.BackColor = Color.Green
  538. End If
  539. ElseIf terzoR = 8 Then
  540. If CheckBox8.Checked Then
  541. TextBox1.BackColor = Color.Green
  542. End If
  543. ElseIf terzoR = 9 Then
  544. If CheckBox9.Checked Then
  545. TextBox1.BackColor = Color.Green
  546. End If
  547. End If
  548. End If
  549. ElseIf secondoR = 4 Then
  550. If CheckBox4.Checked Then
  551. If terzoR = 0 Then
  552. If CheckBox10.Checked Then
  553. TextBox1.BackColor = Color.Green
  554. End If
  555.  
  556. ElseIf terzoR = 1 Then
  557. If CheckBox1.Checked Then
  558. TextBox1.BackColor = Color.Green
  559. End If
  560. ElseIf terzoR = 2 Then
  561. If CheckBox2.Checked Then
  562. TextBox1.BackColor = Color.Green
  563. End If
  564. ElseIf terzoR = 3 Then
  565. If CheckBox3.Checked Then
  566. TextBox1.BackColor = Color.Green
  567. End If
  568. ElseIf terzoR = 4 Then
  569. If CheckBox4.Checked Then
  570. TextBox1.BackColor = Color.Green
  571. End If
  572. ElseIf terzoR = 5 Then
  573. If CheckBox5.Checked Then
  574. TextBox1.BackColor = Color.Green
  575. End If
  576. ElseIf terzoR = 6 Then
  577. If CheckBox6.Checked Then
  578. TextBox1.BackColor = Color.Green
  579. End If
  580. ElseIf terzoR = 7 Then
  581. If CheckBox7.Checked Then
  582. TextBox1.BackColor = Color.Green
  583. End If
  584. ElseIf terzoR = 8 Then
  585. If CheckBox8.Checked Then
  586. TextBox1.BackColor = Color.Green
  587. End If
  588. ElseIf terzoR = 9 Then
  589. If CheckBox9.Checked Then
  590. TextBox1.BackColor = Color.Green
  591. End If
  592. End If
  593. End If
  594. ElseIf secondoR = 5 Then
  595. If CheckBox5.Checked Then
  596. If terzoR = 0 Then
  597. If CheckBox10.Checked Then
  598. TextBox1.BackColor = Color.Green
  599. End If
  600.  
  601. ElseIf terzoR = 1 Then
  602. If CheckBox1.Checked Then
  603. TextBox1.BackColor = Color.Green
  604. End If
  605. ElseIf terzoR = 2 Then
  606. If CheckBox2.Checked Then
  607. TextBox1.BackColor = Color.Green
  608. End If
  609. ElseIf terzoR = 3 Then
  610. If CheckBox3.Checked Then
  611. TextBox1.BackColor = Color.Green
  612. End If
  613. ElseIf terzoR = 4 Then
  614. If CheckBox4.Checked Then
  615. TextBox1.BackColor = Color.Green
  616. End If
  617. ElseIf terzoR = 5 Then
  618. If CheckBox5.Checked Then
  619. TextBox1.BackColor = Color.Green
  620. End If
  621. ElseIf terzoR = 6 Then
  622. If CheckBox6.Checked Then
  623. TextBox1.BackColor = Color.Green
  624. End If
  625. ElseIf terzoR = 7 Then
  626. If CheckBox7.Checked Then
  627. TextBox1.BackColor = Color.Green
  628. End If
  629. ElseIf terzoR = 8 Then
  630. If CheckBox8.Checked Then
  631. TextBox1.BackColor = Color.Green
  632. End If
  633. ElseIf terzoR = 9 Then
  634. If CheckBox9.Checked Then
  635. TextBox1.BackColor = Color.Green
  636. End If
  637. End If
  638. End If
  639. ElseIf secondoR = 6 Then
  640. If CheckBox6.Checked Then
  641. If terzoR = 0 Then
  642. If CheckBox10.Checked Then
  643. TextBox1.BackColor = Color.Green
  644. End If
  645.  
  646. ElseIf terzoR = 1 Then
  647. If CheckBox1.Checked Then
  648. TextBox1.BackColor = Color.Green
  649. End If
  650. ElseIf terzoR = 2 Then
  651. If CheckBox2.Checked Then
  652. TextBox1.BackColor = Color.Green
  653. End If
  654. ElseIf terzoR = 3 Then
  655. If CheckBox3.Checked Then
  656. TextBox1.BackColor = Color.Green
  657. End If
  658. ElseIf terzoR = 4 Then
  659. If CheckBox4.Checked Then
  660. TextBox1.BackColor = Color.Green
  661. End If
  662. ElseIf terzoR = 5 Then
  663. If CheckBox5.Checked Then
  664. TextBox1.BackColor = Color.Green
  665. End If
  666. ElseIf terzoR = 6 Then
  667. If CheckBox6.Checked Then
  668. TextBox1.BackColor = Color.Green
  669. End If
  670. ElseIf terzoR = 7 Then
  671. If CheckBox7.Checked Then
  672. TextBox1.BackColor = Color.Green
  673. End If
  674. ElseIf terzoR = 8 Then
  675. If CheckBox8.Checked Then
  676. TextBox1.BackColor = Color.Green
  677. End If
  678. ElseIf terzoR = 9 Then
  679. If CheckBox9.Checked Then
  680. TextBox1.BackColor = Color.Green
  681. End If
  682. End If
  683. End If
  684. ElseIf secondoR = 7 Then
  685. If CheckBox7.Checked Then
  686. If terzoR = 0 Then
  687. If CheckBox10.Checked Then
  688. TextBox1.BackColor = Color.Green
  689. End If
  690.  
  691. ElseIf terzoR = 1 Then
  692. If CheckBox1.Checked Then
  693. TextBox1.BackColor = Color.Green
  694. End If
  695. ElseIf terzoR = 2 Then
  696. If CheckBox2.Checked Then
  697. TextBox1.BackColor = Color.Green
  698. End If
  699. ElseIf terzoR = 3 Then
  700. If CheckBox3.Checked Then
  701. TextBox1.BackColor = Color.Green
  702. End If
  703. ElseIf terzoR = 4 Then
  704. If CheckBox4.Checked Then
  705. TextBox1.BackColor = Color.Green
  706. End If
  707. ElseIf terzoR = 5 Then
  708. If CheckBox5.Checked Then
  709. TextBox1.BackColor = Color.Green
  710. End If
  711. ElseIf terzoR = 6 Then
  712. If CheckBox6.Checked Then
  713. TextBox1.BackColor = Color.Green
  714. End If
  715. ElseIf terzoR = 7 Then
  716. If CheckBox7.Checked Then
  717. TextBox1.BackColor = Color.Green
  718. End If
  719. ElseIf terzoR = 8 Then
  720. If CheckBox8.Checked Then
  721. TextBox1.BackColor = Color.Green
  722. End If
  723. ElseIf terzoR = 9 Then
  724. If CheckBox9.Checked Then
  725. TextBox1.BackColor = Color.Green
  726. End If
  727. End If
  728. End If
  729. ElseIf secondoR = 8 Then
  730. If CheckBox8.Checked Then
  731. If terzoR = 0 Then
  732. If CheckBox10.Checked Then
  733. TextBox1.BackColor = Color.Green
  734. End If
  735.  
  736. ElseIf terzoR = 1 Then
  737. If CheckBox1.Checked Then
  738. TextBox1.BackColor = Color.Green
  739. End If
  740. ElseIf terzoR = 2 Then
  741. If CheckBox2.Checked Then
  742. TextBox1.BackColor = Color.Green
  743. End If
  744. ElseIf terzoR = 3 Then
  745. If CheckBox3.Checked Then
  746. TextBox1.BackColor = Color.Green
  747. End If
  748. ElseIf terzoR = 4 Then
  749. If CheckBox4.Checked Then
  750. TextBox1.BackColor = Color.Green
  751. End If
  752. ElseIf terzoR = 5 Then
  753. If CheckBox5.Checked Then
  754. TextBox1.BackColor = Color.Green
  755. End If
  756. ElseIf terzoR = 6 Then
  757. If CheckBox6.Checked Then
  758. TextBox1.BackColor = Color.Green
  759. End If
  760. ElseIf terzoR = 7 Then
  761. If CheckBox7.Checked Then
  762. TextBox1.BackColor = Color.Green
  763. End If
  764. ElseIf terzoR = 8 Then
  765. If CheckBox8.Checked Then
  766. TextBox1.BackColor = Color.Green
  767. End If
  768. ElseIf terzoR = 9 Then
  769. If CheckBox9.Checked Then
  770. TextBox1.BackColor = Color.Green
  771. End If
  772. End If
  773. End If
  774. ElseIf secondoR = 9 Then
  775. If CheckBox9.Checked Then
  776. If terzoR = 0 Then
  777. If CheckBox10.Checked Then
  778. TextBox1.BackColor = Color.Green
  779. End If
  780.  
  781. ElseIf terzoR = 1 Then
  782. If CheckBox1.Checked Then
  783. TextBox1.BackColor = Color.Green
  784. End If
  785. ElseIf terzoR = 2 Then
  786. If CheckBox2.Checked Then
  787. TextBox1.BackColor = Color.Green
  788. End If
  789. ElseIf terzoR = 3 Then
  790. If CheckBox3.Checked Then
  791. TextBox1.BackColor = Color.Green
  792. End If
  793. ElseIf terzoR = 4 Then
  794. If CheckBox4.Checked Then
  795. TextBox1.BackColor = Color.Green
  796. End If
  797. ElseIf terzoR = 5 Then
  798. If CheckBox5.Checked Then
  799. TextBox1.BackColor = Color.Green
  800. End If
  801. ElseIf terzoR = 6 Then
  802. If CheckBox6.Checked Then
  803. TextBox1.BackColor = Color.Green
  804. End If
  805. ElseIf terzoR = 7 Then
  806. If CheckBox7.Checked Then
  807. TextBox1.BackColor = Color.Green
  808. End If
  809. ElseIf terzoR = 8 Then
  810. If CheckBox8.Checked Then
  811. TextBox1.BackColor = Color.Green
  812. End If
  813. ElseIf terzoR = 9 Then
  814. If CheckBox9.Checked Then
  815. TextBox1.BackColor = Color.Green
  816. End If
  817. End If
  818. End If
  819. Else
  820. TextBox1.BackColor = Color.Black
  821. End If
  822. Else
  823. TextBox1.BackColor = Color.Black
  824. End If
  825. ElseIf primoR = 2 Then
  826. If CheckBox2.Checked Then
  827. If secondoR = 1 Then
  828. If CheckBox1.Checked Then
  829. If terzoR = 2 Then
  830. If CheckBox2.Checked Then
  831. TextBox1.BackColor = Color.Green
  832. End If
  833. ElseIf terzoR = 3 Then
  834. If CheckBox3.Checked Then
  835. TextBox1.BackColor = Color.Green
  836. End If
  837. ElseIf terzoR = 4 Then
  838. If CheckBox4.Checked Then
  839. TextBox1.BackColor = Color.Green
  840. End If
  841. ElseIf terzoR = 5 Then
  842. If CheckBox5.Checked Then
  843. TextBox1.BackColor = Color.Green
  844. End If
  845. ElseIf terzoR = 6 Then
  846. If CheckBox6.Checked Then
  847. TextBox1.BackColor = Color.Green
  848. End If
  849. ElseIf terzoR = 7 Then
  850. If CheckBox7.Checked Then
  851. TextBox1.BackColor = Color.Green
  852. End If
  853. ElseIf terzoR = 8 Then
  854. If CheckBox8.Checked Then
  855. TextBox1.BackColor = Color.Green
  856. End If
  857. ElseIf terzoR = 9 Then
  858. If CheckBox9.Checked Then
  859. TextBox1.BackColor = Color.Green
  860. End If
  861. ElseIf terzoR = 1 Then
  862. If CheckBox1.Checked Then
  863. TextBox1.BackColor = Color.Green
  864. End If
  865. ElseIf terzoR = 0 Then
  866. If CheckBox10.Checked Then
  867. TextBox1.BackColor = Color.Green
  868. End If
  869. End If
  870. End If
  871. ElseIf secondoR = 2 Then
  872. If CheckBox2.Checked Then
  873. If terzoR = 1 Then
  874. If CheckBox1.Checked Then
  875. TextBox1.BackColor = Color.Green
  876. End If
  877. ElseIf terzoR = 2 Then
  878. If CheckBox2.Checked Then
  879. TextBox1.BackColor = Color.Green
  880. End If
  881. ElseIf terzoR = 3 Then
  882. If CheckBox3.Checked Then
  883. TextBox1.BackColor = Color.Green
  884. End If
  885. ElseIf terzoR = 4 Then
  886. If CheckBox4.Checked Then
  887. TextBox1.BackColor = Color.Green
  888. End If
  889. ElseIf terzoR = 5 Then
  890. If CheckBox5.Checked Then
  891. TextBox1.BackColor = Color.Green
  892. End If
  893. ElseIf terzoR = 6 Then
  894. If CheckBox6.Checked Then
  895. TextBox1.BackColor = Color.Green
  896.  
  897. End If
  898. ElseIf terzoR = 7 Then
  899. If CheckBox7.Checked Then
  900. TextBox1.BackColor = Color.Green
  901. End If
  902. ElseIf terzoR = 8 Then
  903. If CheckBox8.Checked Then
  904. TextBox1.BackColor = Color.Green
  905. End If
  906. ElseIf terzoR = 9 Then
  907. If CheckBox9.Checked Then
  908. TextBox1.BackColor = Color.Green
  909. End If
  910. ElseIf terzoR = 0 Then
  911. If CheckBox10.Checked Then
  912. TextBox1.BackColor = Color.Green
  913. End If
  914. End If
  915. End If
  916. ElseIf secondoR = 3 Then
  917. If CheckBox3.Checked Then
  918. If terzoR = 0 Then
  919. If CheckBox10.Checked Then
  920. TextBox1.BackColor = Color.Green
  921. End If
  922.  
  923. ElseIf terzoR = 1 Then
  924. If CheckBox1.Checked Then
  925. TextBox1.BackColor = Color.Green
  926. End If
  927. ElseIf terzoR = 2 Then
  928. If CheckBox2.Checked Then
  929. TextBox1.BackColor = Color.Green
  930. End If
  931. ElseIf terzoR = 3 Then
  932. If CheckBox3.Checked Then
  933. TextBox1.BackColor = Color.Green
  934. End If
  935. ElseIf terzoR = 4 Then
  936. If CheckBox4.Checked Then
  937. TextBox1.BackColor = Color.Green
  938. End If
  939. ElseIf terzoR = 5 Then
  940. If CheckBox5.Checked Then
  941. TextBox1.BackColor = Color.Green
  942. End If
  943. ElseIf terzoR = 6 Then
  944. If CheckBox6.Checked Then
  945. TextBox1.BackColor = Color.Green
  946. End If
  947. ElseIf terzoR = 7 Then
  948. If CheckBox7.Checked Then
  949. TextBox1.BackColor = Color.Green
  950. End If
  951. ElseIf terzoR = 8 Then
  952. If CheckBox8.Checked Then
  953. TextBox1.BackColor = Color.Green
  954. End If
  955. ElseIf terzoR = 9 Then
  956. If CheckBox9.Checked Then
  957. TextBox1.BackColor = Color.Green
  958. End If
  959. End If
  960. End If
  961. ElseIf secondoR = 4 Then
  962. If CheckBox4.Checked Then
  963. If terzoR = 0 Then
  964. If CheckBox10.Checked Then
  965. TextBox1.BackColor = Color.Green
  966. End If
  967.  
  968. ElseIf terzoR = 1 Then
  969. If CheckBox1.Checked Then
  970. TextBox1.BackColor = Color.Green
  971. End If
  972. ElseIf terzoR = 2 Then
  973. If CheckBox2.Checked Then
  974. TextBox1.BackColor = Color.Green
  975. End If
  976. ElseIf terzoR = 3 Then
  977. If CheckBox3.Checked Then
  978. TextBox1.BackColor = Color.Green
  979. End If
  980. ElseIf terzoR = 4 Then
  981. If CheckBox4.Checked Then
  982. TextBox1.BackColor = Color.Green
  983. End If
  984. ElseIf terzoR = 5 Then
  985. If CheckBox5.Checked Then
  986. TextBox1.BackColor = Color.Green
  987. End If
  988. ElseIf terzoR = 6 Then
  989. If CheckBox6.Checked Then
  990. TextBox1.BackColor = Color.Green
  991. End If
  992. ElseIf terzoR = 7 Then
  993. If CheckBox7.Checked Then
  994. TextBox1.BackColor = Color.Green
  995. End If
  996. ElseIf terzoR = 8 Then
  997. If CheckBox8.Checked Then
  998. TextBox1.BackColor = Color.Green
  999. End If
  1000. ElseIf terzoR = 9 Then
  1001. If CheckBox9.Checked Then
  1002. TextBox1.BackColor = Color.Green
  1003. End If
  1004. End If
  1005. End If
  1006. ElseIf secondoR = 5 Then
  1007. If CheckBox5.Checked Then
  1008. If terzoR = 0 Then
  1009. If CheckBox10.Checked Then
  1010. TextBox1.BackColor = Color.Green
  1011. End If
  1012.  
  1013. ElseIf terzoR = 1 Then
  1014. If CheckBox1.Checked Then
  1015. TextBox1.BackColor = Color.Green
  1016. End If
  1017. ElseIf terzoR = 2 Then
  1018. If CheckBox2.Checked Then
  1019. TextBox1.BackColor = Color.Green
  1020. End If
  1021. ElseIf terzoR = 3 Then
  1022. If CheckBox3.Checked Then
  1023. TextBox1.BackColor = Color.Green
  1024. End If
  1025. ElseIf terzoR = 4 Then
  1026. If CheckBox4.Checked Then
  1027. TextBox1.BackColor = Color.Green
  1028. End If
  1029. ElseIf terzoR = 5 Then
  1030. If CheckBox5.Checked Then
  1031. TextBox1.BackColor = Color.Green
  1032. End If
  1033. ElseIf terzoR = 6 Then
  1034. If CheckBox6.Checked Then
  1035. TextBox1.BackColor = Color.Green
  1036. End If
  1037. ElseIf terzoR = 7 Then
  1038. If CheckBox7.Checked Then
  1039. TextBox1.BackColor = Color.Green
  1040. End If
  1041. ElseIf terzoR = 8 Then
  1042. If CheckBox8.Checked Then
  1043. TextBox1.BackColor = Color.Green
  1044. End If
  1045. ElseIf terzoR = 9 Then
  1046. If CheckBox9.Checked Then
  1047. TextBox1.BackColor = Color.Green
  1048. End If
  1049. End If
  1050. End If
  1051. ElseIf secondoR = 6 Then
  1052. If CheckBox6.Checked Then
  1053. If terzoR = 0 Then
  1054. If CheckBox10.Checked Then
  1055. TextBox1.BackColor = Color.Green
  1056. End If
  1057.  
  1058. ElseIf terzoR = 1 Then
  1059. If CheckBox1.Checked Then
  1060. TextBox1.BackColor = Color.Green
  1061. End If
  1062. ElseIf terzoR = 2 Then
  1063. If CheckBox2.Checked Then
  1064. TextBox1.BackColor = Color.Green
  1065. End If
  1066. ElseIf terzoR = 3 Then
  1067. If CheckBox3.Checked Then
  1068. TextBox1.BackColor = Color.Green
  1069. End If
  1070. ElseIf terzoR = 4 Then
  1071. If CheckBox4.Checked Then
  1072. TextBox1.BackColor = Color.Green
  1073. End If
  1074. ElseIf terzoR = 5 Then
  1075. If CheckBox5.Checked Then
  1076. TextBox1.BackColor = Color.Green
  1077. End If
  1078. ElseIf terzoR = 6 Then
  1079. If CheckBox6.Checked Then
  1080. TextBox1.BackColor = Color.Green
  1081. End If
  1082. ElseIf terzoR = 7 Then
  1083. If CheckBox7.Checked Then
  1084. TextBox1.BackColor = Color.Green
  1085. End If
  1086. ElseIf terzoR = 8 Then
  1087. If CheckBox8.Checked Then
  1088. TextBox1.BackColor = Color.Green
  1089. End If
  1090. ElseIf terzoR = 9 Then
  1091. If CheckBox9.Checked Then
  1092. TextBox1.BackColor = Color.Green
  1093. End If
  1094. End If
  1095. End If
  1096. ElseIf secondoR = 7 Then
  1097. If CheckBox7.Checked Then
  1098. If terzoR = 0 Then
  1099. If CheckBox10.Checked Then
  1100. TextBox1.BackColor = Color.Green
  1101. End If
  1102.  
  1103. ElseIf terzoR = 1 Then
  1104. If CheckBox1.Checked Then
  1105. TextBox1.BackColor = Color.Green
  1106. End If
  1107. ElseIf terzoR = 2 Then
  1108. If CheckBox2.Checked Then
  1109. TextBox1.BackColor = Color.Green
  1110. End If
  1111. ElseIf terzoR = 3 Then
  1112. If CheckBox3.Checked Then
  1113. TextBox1.BackColor = Color.Green
  1114. End If
  1115. ElseIf terzoR = 4 Then
  1116. If CheckBox4.Checked Then
  1117. TextBox1.BackColor = Color.Green
  1118. End If
  1119. ElseIf terzoR = 5 Then
  1120. If CheckBox5.Checked Then
  1121. TextBox1.BackColor = Color.Green
  1122. End If
  1123. ElseIf terzoR = 6 Then
  1124. If CheckBox6.Checked Then
  1125. TextBox1.BackColor = Color.Green
  1126. End If
  1127. ElseIf terzoR = 7 Then
  1128. If CheckBox7.Checked Then
  1129. TextBox1.BackColor = Color.Green
  1130. End If
  1131. ElseIf terzoR = 8 Then
  1132. If CheckBox8.Checked Then
  1133. TextBox1.BackColor = Color.Green
  1134. End If
  1135. ElseIf terzoR = 9 Then
  1136. If CheckBox9.Checked Then
  1137. TextBox1.BackColor = Color.Green
  1138. End If
  1139. End If
  1140. End If
  1141. ElseIf secondoR = 8 Then
  1142. If CheckBox8.Checked Then
  1143. If terzoR = 0 Then
  1144. If CheckBox10.Checked Then
  1145. TextBox1.BackColor = Color.Green
  1146. End If
  1147.  
  1148. ElseIf terzoR = 1 Then
  1149. If CheckBox1.Checked Then
  1150. TextBox1.BackColor = Color.Green
  1151. End If
  1152. ElseIf terzoR = 2 Then
  1153. If CheckBox2.Checked Then
  1154. TextBox1.BackColor = Color.Green
  1155. End If
  1156. ElseIf terzoR = 3 Then
  1157. If CheckBox3.Checked Then
  1158. TextBox1.BackColor = Color.Green
  1159. End If
  1160. ElseIf terzoR = 4 Then
  1161. If CheckBox4.Checked Then
  1162. TextBox1.BackColor = Color.Green
  1163. End If
  1164. ElseIf terzoR = 5 Then
  1165. If CheckBox5.Checked Then
  1166. TextBox1.BackColor = Color.Green
  1167. End If
  1168. ElseIf terzoR = 6 Then
  1169. If CheckBox6.Checked Then
  1170. TextBox1.BackColor = Color.Green
  1171. End If
  1172. ElseIf terzoR = 7 Then
  1173. If CheckBox7.Checked Then
  1174. TextBox1.BackColor = Color.Green
  1175. End If
  1176. ElseIf terzoR = 8 Then
  1177. If CheckBox8.Checked Then
  1178. TextBox1.BackColor = Color.Green
  1179. End If
  1180. ElseIf terzoR = 9 Then
  1181. If CheckBox9.Checked Then
  1182. TextBox1.BackColor = Color.Green
  1183. End If
  1184. End If
  1185. End If
  1186. ElseIf secondoR = 9 Then
  1187. If CheckBox9.Checked Then
  1188. If terzoR = 0 Then
  1189. If CheckBox10.Checked Then
  1190. TextBox1.BackColor = Color.Green
  1191. End If
  1192.  
  1193. ElseIf terzoR = 1 Then
  1194. If CheckBox1.Checked Then
  1195. TextBox1.BackColor = Color.Green
  1196. End If
  1197. ElseIf terzoR = 2 Then
  1198. If CheckBox2.Checked Then
  1199. TextBox1.BackColor = Color.Green
  1200. End If
  1201. ElseIf terzoR = 3 Then
  1202. If CheckBox3.Checked Then
  1203. TextBox1.BackColor = Color.Green
  1204. End If
  1205. ElseIf terzoR = 4 Then
  1206. If CheckBox4.Checked Then
  1207. TextBox1.BackColor = Color.Green
  1208. End If
  1209. ElseIf terzoR = 5 Then
  1210. If CheckBox5.Checked Then
  1211. TextBox1.BackColor = Color.Green
  1212. End If
  1213. ElseIf terzoR = 6 Then
  1214. If CheckBox6.Checked Then
  1215. TextBox1.BackColor = Color.Green
  1216. End If
  1217. ElseIf terzoR = 7 Then
  1218. If CheckBox7.Checked Then
  1219. TextBox1.BackColor = Color.Green
  1220. End If
  1221. ElseIf terzoR = 8 Then
  1222. If CheckBox8.Checked Then
  1223. TextBox1.BackColor = Color.Green
  1224. End If
  1225. ElseIf terzoR = 9 Then
  1226. If CheckBox9.Checked Then
  1227. TextBox1.BackColor = Color.Green
  1228. End If
  1229. End If
  1230. End If
  1231. Else
  1232. TextBox1.BackColor = Color.Black
  1233. End If
  1234. Else
  1235. TextBox1.BackColor = Color.Black
  1236. End If
  1237. ElseIf primoR = 3 Then
  1238. If CheckBox3.Checked Then
  1239. If secondoR = 1 Then
  1240. If CheckBox1.Checked Then
  1241. If terzoR = 2 Then
  1242. If CheckBox2.Checked Then
  1243. TextBox1.BackColor = Color.Green
  1244. End If
  1245. ElseIf terzoR = 3 Then
  1246. If CheckBox3.Checked Then
  1247. TextBox1.BackColor = Color.Green
  1248. End If
  1249. ElseIf terzoR = 4 Then
  1250. If CheckBox4.Checked Then
  1251. TextBox1.BackColor = Color.Green
  1252. End If
  1253. ElseIf terzoR = 5 Then
  1254. If CheckBox5.Checked Then
  1255. TextBox1.BackColor = Color.Green
  1256. End If
  1257. ElseIf terzoR = 6 Then
  1258. If CheckBox6.Checked Then
  1259. TextBox1.BackColor = Color.Green
  1260. End If
  1261. ElseIf terzoR = 7 Then
  1262. If CheckBox7.Checked Then
  1263. TextBox1.BackColor = Color.Green
  1264. End If
  1265. ElseIf terzoR = 8 Then
  1266. If CheckBox8.Checked Then
  1267. TextBox1.BackColor = Color.Green
  1268. End If
  1269. ElseIf terzoR = 9 Then
  1270. If CheckBox9.Checked Then
  1271. TextBox1.BackColor = Color.Green
  1272. End If
  1273. ElseIf terzoR = 1 Then
  1274. If CheckBox1.Checked Then
  1275. TextBox1.BackColor = Color.Green
  1276. End If
  1277. ElseIf terzoR = 0 Then
  1278. If CheckBox10.Checked Then
  1279. TextBox1.BackColor = Color.Green
  1280. End If
  1281. End If
  1282. End If
  1283. ElseIf secondoR = 2 Then
  1284. If CheckBox2.Checked Then
  1285. If terzoR = 1 Then
  1286. If CheckBox1.Checked Then
  1287. TextBox1.BackColor = Color.Green
  1288. End If
  1289. ElseIf terzoR = 2 Then
  1290. If CheckBox2.Checked Then
  1291. TextBox1.BackColor = Color.Green
  1292. End If
  1293. ElseIf terzoR = 3 Then
  1294. If CheckBox3.Checked Then
  1295. TextBox1.BackColor = Color.Green
  1296. End If
  1297. ElseIf terzoR = 4 Then
  1298. If CheckBox4.Checked Then
  1299. TextBox1.BackColor = Color.Green
  1300. End If
  1301. ElseIf terzoR = 5 Then
  1302. If CheckBox5.Checked Then
  1303. TextBox1.BackColor = Color.Green
  1304. End If
  1305. ElseIf terzoR = 6 Then
  1306. If CheckBox6.Checked Then
  1307. TextBox1.BackColor = Color.Green
  1308.  
  1309. End If
  1310. ElseIf terzoR = 7 Then
  1311. If CheckBox7.Checked Then
  1312. TextBox1.BackColor = Color.Green
  1313. End If
  1314. ElseIf terzoR = 8 Then
  1315. If CheckBox8.Checked Then
  1316. TextBox1.BackColor = Color.Green
  1317. End If
  1318. ElseIf terzoR = 9 Then
  1319. If CheckBox9.Checked Then
  1320. TextBox1.BackColor = Color.Green
  1321. End If
  1322. ElseIf terzoR = 0 Then
  1323. If CheckBox10.Checked Then
  1324. TextBox1.BackColor = Color.Green
  1325. End If
  1326. End If
  1327. End If
  1328. ElseIf secondoR = 3 Then
  1329. If CheckBox3.Checked Then
  1330. If terzoR = 0 Then
  1331. If CheckBox10.Checked Then
  1332. TextBox1.BackColor = Color.Green
  1333. End If
  1334.  
  1335. ElseIf terzoR = 1 Then
  1336. If CheckBox1.Checked Then
  1337. TextBox1.BackColor = Color.Green
  1338. End If
  1339. ElseIf terzoR = 2 Then
  1340. If CheckBox2.Checked Then
  1341. TextBox1.BackColor = Color.Green
  1342. End If
  1343. ElseIf terzoR = 3 Then
  1344. If CheckBox3.Checked Then
  1345. TextBox1.BackColor = Color.Green
  1346. End If
  1347. ElseIf terzoR = 4 Then
  1348. If CheckBox4.Checked Then
  1349. TextBox1.BackColor = Color.Green
  1350. End If
  1351. ElseIf terzoR = 5 Then
  1352. If CheckBox5.Checked Then
  1353. TextBox1.BackColor = Color.Green
  1354. End If
  1355. ElseIf terzoR = 6 Then
  1356. If CheckBox6.Checked Then
  1357. TextBox1.BackColor = Color.Green
  1358. End If
  1359. ElseIf terzoR = 7 Then
  1360. If CheckBox7.Checked Then
  1361. TextBox1.BackColor = Color.Green
  1362. End If
  1363. ElseIf terzoR = 8 Then
  1364. If CheckBox8.Checked Then
  1365. TextBox1.BackColor = Color.Green
  1366. End If
  1367. ElseIf terzoR = 9 Then
  1368. If CheckBox9.Checked Then
  1369. TextBox1.BackColor = Color.Green
  1370. End If
  1371. End If
  1372. End If
  1373. ElseIf secondoR = 4 Then
  1374. If CheckBox4.Checked Then
  1375. If terzoR = 0 Then
  1376. If CheckBox10.Checked Then
  1377. TextBox1.BackColor = Color.Green
  1378. End If
  1379.  
  1380. ElseIf terzoR = 1 Then
  1381. If CheckBox1.Checked Then
  1382. TextBox1.BackColor = Color.Green
  1383. End If
  1384. ElseIf terzoR = 2 Then
  1385. If CheckBox2.Checked Then
  1386. TextBox1.BackColor = Color.Green
  1387. End If
  1388. ElseIf terzoR = 3 Then
  1389. If CheckBox3.Checked Then
  1390. TextBox1.BackColor = Color.Green
  1391. End If
  1392. ElseIf terzoR = 4 Then
  1393. If CheckBox4.Checked Then
  1394. TextBox1.BackColor = Color.Green
  1395. End If
  1396. ElseIf terzoR = 5 Then
  1397. If CheckBox5.Checked Then
  1398. TextBox1.BackColor = Color.Green
  1399. End If
  1400. ElseIf terzoR = 6 Then
  1401. If CheckBox6.Checked Then
  1402. TextBox1.BackColor = Color.Green
  1403. End If
  1404. ElseIf terzoR = 7 Then
  1405. If CheckBox7.Checked Then
  1406. TextBox1.BackColor = Color.Green
  1407. End If
  1408. ElseIf terzoR = 8 Then
  1409. If CheckBox8.Checked Then
  1410. TextBox1.BackColor = Color.Green
  1411. End If
  1412. ElseIf terzoR = 9 Then
  1413. If CheckBox9.Checked Then
  1414. TextBox1.BackColor = Color.Green
  1415. End If
  1416. End If
  1417. End If
  1418. ElseIf secondoR = 5 Then
  1419. If CheckBox5.Checked Then
  1420. If terzoR = 0 Then
  1421. If CheckBox10.Checked Then
  1422. TextBox1.BackColor = Color.Green
  1423. End If
  1424.  
  1425. ElseIf terzoR = 1 Then
  1426. If CheckBox1.Checked Then
  1427. TextBox1.BackColor = Color.Green
  1428. End If
  1429. ElseIf terzoR = 2 Then
  1430. If CheckBox2.Checked Then
  1431. TextBox1.BackColor = Color.Green
  1432. End If
  1433. ElseIf terzoR = 3 Then
  1434. If CheckBox3.Checked Then
  1435. TextBox1.BackColor = Color.Green
  1436. End If
  1437. ElseIf terzoR = 4 Then
  1438. If CheckBox4.Checked Then
  1439. TextBox1.BackColor = Color.Green
  1440. End If
  1441. ElseIf terzoR = 5 Then
  1442. If CheckBox5.Checked Then
  1443. TextBox1.BackColor = Color.Green
  1444. End If
  1445. ElseIf terzoR = 6 Then
  1446. If CheckBox6.Checked Then
  1447. TextBox1.BackColor = Color.Green
  1448. End If
  1449. ElseIf terzoR = 7 Then
  1450. If CheckBox7.Checked Then
  1451. TextBox1.BackColor = Color.Green
  1452. End If
  1453. ElseIf terzoR = 8 Then
  1454. If CheckBox8.Checked Then
  1455. TextBox1.BackColor = Color.Green
  1456. End If
  1457. ElseIf terzoR = 9 Then
  1458. If CheckBox9.Checked Then
  1459. TextBox1.BackColor = Color.Green
  1460. End If
  1461. End If
  1462. End If
  1463. ElseIf secondoR = 6 Then
  1464. If CheckBox6.Checked Then
  1465. If terzoR = 0 Then
  1466. If CheckBox10.Checked Then
  1467. TextBox1.BackColor = Color.Green
  1468. End If
  1469.  
  1470. ElseIf terzoR = 1 Then
  1471. If CheckBox1.Checked Then
  1472. TextBox1.BackColor = Color.Green
  1473. End If
  1474. ElseIf terzoR = 2 Then
  1475. If CheckBox2.Checked Then
  1476. TextBox1.BackColor = Color.Green
  1477. End If
  1478. ElseIf terzoR = 3 Then
  1479. If CheckBox3.Checked Then
  1480. TextBox1.BackColor = Color.Green
  1481. End If
  1482. ElseIf terzoR = 4 Then
  1483. If CheckBox4.Checked Then
  1484. TextBox1.BackColor = Color.Green
  1485. End If
  1486. ElseIf terzoR = 5 Then
  1487. If CheckBox5.Checked Then
  1488. TextBox1.BackColor = Color.Green
  1489. End If
  1490. ElseIf terzoR = 6 Then
  1491. If CheckBox6.Checked Then
  1492. TextBox1.BackColor = Color.Green
  1493. End If
  1494. ElseIf terzoR = 7 Then
  1495. If CheckBox7.Checked Then
  1496. TextBox1.BackColor = Color.Green
  1497. End If
  1498. ElseIf terzoR = 8 Then
  1499. If CheckBox8.Checked Then
  1500. TextBox1.BackColor = Color.Green
  1501. End If
  1502. ElseIf terzoR = 9 Then
  1503. If CheckBox9.Checked Then
  1504. TextBox1.BackColor = Color.Green
  1505. End If
  1506. End If
  1507. End If
  1508. ElseIf secondoR = 7 Then
  1509. If CheckBox7.Checked Then
  1510. If terzoR = 0 Then
  1511. If CheckBox10.Checked Then
  1512. TextBox1.BackColor = Color.Green
  1513. End If
  1514.  
  1515. ElseIf terzoR = 1 Then
  1516. If CheckBox1.Checked Then
  1517. TextBox1.BackColor = Color.Green
  1518. End If
  1519. ElseIf terzoR = 2 Then
  1520. If CheckBox2.Checked Then
  1521. TextBox1.BackColor = Color.Green
  1522. End If
  1523. ElseIf terzoR = 3 Then
  1524. If CheckBox3.Checked Then
  1525. TextBox1.BackColor = Color.Green
  1526. End If
  1527. ElseIf terzoR = 4 Then
  1528. If CheckBox4.Checked Then
  1529. TextBox1.BackColor = Color.Green
  1530. End If
  1531. ElseIf terzoR = 5 Then
  1532. If CheckBox5.Checked Then
  1533. TextBox1.BackColor = Color.Green
  1534. End If
  1535. ElseIf terzoR = 6 Then
  1536. If CheckBox6.Checked Then
  1537. TextBox1.BackColor = Color.Green
  1538. End If
  1539. ElseIf terzoR = 7 Then
  1540. If CheckBox7.Checked Then
  1541. TextBox1.BackColor = Color.Green
  1542. End If
  1543. ElseIf terzoR = 8 Then
  1544. If CheckBox8.Checked Then
  1545. TextBox1.BackColor = Color.Green
  1546. End If
  1547. ElseIf terzoR = 9 Then
  1548. If CheckBox9.Checked Then
  1549. TextBox1.BackColor = Color.Green
  1550. End If
  1551. End If
  1552. End If
  1553. ElseIf secondoR = 8 Then
  1554. If CheckBox8.Checked Then
  1555. If terzoR = 0 Then
  1556. If CheckBox10.Checked Then
  1557. TextBox1.BackColor = Color.Green
  1558. End If
  1559.  
  1560. ElseIf terzoR = 1 Then
  1561. If CheckBox1.Checked Then
  1562. TextBox1.BackColor = Color.Green
  1563. End If
  1564. ElseIf terzoR = 2 Then
  1565. If CheckBox2.Checked Then
  1566. TextBox1.BackColor = Color.Green
  1567. End If
  1568. ElseIf terzoR = 3 Then
  1569. If CheckBox3.Checked Then
  1570. TextBox1.BackColor = Color.Green
  1571. End If
  1572. ElseIf terzoR = 4 Then
  1573. If CheckBox4.Checked Then
  1574. TextBox1.BackColor = Color.Green
  1575. End If
  1576. ElseIf terzoR = 5 Then
  1577. If CheckBox5.Checked Then
  1578. TextBox1.BackColor = Color.Green
  1579. End If
  1580. ElseIf terzoR = 6 Then
  1581. If CheckBox6.Checked Then
  1582. TextBox1.BackColor = Color.Green
  1583. End If
  1584. ElseIf terzoR = 7 Then
  1585. If CheckBox7.Checked Then
  1586. TextBox1.BackColor = Color.Green
  1587. End If
  1588. ElseIf terzoR = 8 Then
  1589. If CheckBox8.Checked Then
  1590. TextBox1.BackColor = Color.Green
  1591. End If
  1592. ElseIf terzoR = 9 Then
  1593. If CheckBox9.Checked Then
  1594. TextBox1.BackColor = Color.Green
  1595. End If
  1596. End If
  1597. End If
  1598. ElseIf secondoR = 9 Then
  1599. If CheckBox9.Checked Then
  1600. If terzoR = 0 Then
  1601. If CheckBox10.Checked Then
  1602. TextBox1.BackColor = Color.Green
  1603. End If
  1604.  
  1605. ElseIf terzoR = 1 Then
  1606. If CheckBox1.Checked Then
  1607. TextBox1.BackColor = Color.Green
  1608. End If
  1609. ElseIf terzoR = 2 Then
  1610. If CheckBox2.Checked Then
  1611. TextBox1.BackColor = Color.Green
  1612. End If
  1613. ElseIf terzoR = 3 Then
  1614. If CheckBox3.Checked Then
  1615. TextBox1.BackColor = Color.Green
  1616. End If
  1617. ElseIf terzoR = 4 Then
  1618. If CheckBox4.Checked Then
  1619. TextBox1.BackColor = Color.Green
  1620. End If
  1621. ElseIf terzoR = 5 Then
  1622. If CheckBox5.Checked Then
  1623. TextBox1.BackColor = Color.Green
  1624. End If
  1625. ElseIf terzoR = 6 Then
  1626. If CheckBox6.Checked Then
  1627. TextBox1.BackColor = Color.Green
  1628. End If
  1629. ElseIf terzoR = 7 Then
  1630. If CheckBox7.Checked Then
  1631. TextBox1.BackColor = Color.Green
  1632. End If
  1633. ElseIf terzoR = 8 Then
  1634. If CheckBox8.Checked Then
  1635. TextBox1.BackColor = Color.Green
  1636. End If
  1637. ElseIf terzoR = 9 Then
  1638. If CheckBox9.Checked Then
  1639. TextBox1.BackColor = Color.Green
  1640. End If
  1641. End If
  1642. End If
  1643. Else
  1644. TextBox1.BackColor = Color.Black
  1645. End If
  1646. Else
  1647. TextBox1.BackColor = Color.Black
  1648. End If
  1649. ElseIf primoR = 4 Then
  1650. If CheckBox4.Checked Then
  1651. If secondoR = 1 Then
  1652. If CheckBox1.Checked Then
  1653. If terzoR = 2 Then
  1654. If CheckBox2.Checked Then
  1655. TextBox1.BackColor = Color.Green
  1656. End If
  1657. ElseIf terzoR = 3 Then
  1658. If CheckBox3.Checked Then
  1659. TextBox1.BackColor = Color.Green
  1660. End If
  1661. ElseIf terzoR = 4 Then
  1662. If CheckBox4.Checked Then
  1663. TextBox1.BackColor = Color.Green
  1664. End If
  1665. ElseIf terzoR = 5 Then
  1666. If CheckBox5.Checked Then
  1667. TextBox1.BackColor = Color.Green
  1668. End If
  1669. ElseIf terzoR = 6 Then
  1670. If CheckBox6.Checked Then
  1671. TextBox1.BackColor = Color.Green
  1672. End If
  1673. ElseIf terzoR = 7 Then
  1674. If CheckBox7.Checked Then
  1675. TextBox1.BackColor = Color.Green
  1676. End If
  1677. ElseIf terzoR = 8 Then
  1678. If CheckBox8.Checked Then
  1679. TextBox1.BackColor = Color.Green
  1680. End If
  1681. ElseIf terzoR = 9 Then
  1682. If CheckBox9.Checked Then
  1683. TextBox1.BackColor = Color.Green
  1684. End If
  1685. ElseIf terzoR = 1 Then
  1686. If CheckBox1.Checked Then
  1687. TextBox1.BackColor = Color.Green
  1688. End If
  1689. ElseIf terzoR = 0 Then
  1690. If CheckBox10.Checked Then
  1691. TextBox1.BackColor = Color.Green
  1692. End If
  1693. End If
  1694. End If
  1695. ElseIf secondoR = 2 Then
  1696. If CheckBox2.Checked Then
  1697. If terzoR = 1 Then
  1698. If CheckBox1.Checked Then
  1699. TextBox1.BackColor = Color.Green
  1700. End If
  1701. ElseIf terzoR = 2 Then
  1702. If CheckBox2.Checked Then
  1703. TextBox1.BackColor = Color.Green
  1704. End If
  1705. ElseIf terzoR = 3 Then
  1706. If CheckBox3.Checked Then
  1707. TextBox1.BackColor = Color.Green
  1708. End If
  1709. ElseIf terzoR = 4 Then
  1710. If CheckBox4.Checked Then
  1711. TextBox1.BackColor = Color.Green
  1712. End If
  1713. ElseIf terzoR = 5 Then
  1714. If CheckBox5.Checked Then
  1715. TextBox1.BackColor = Color.Green
  1716. End If
  1717. ElseIf terzoR = 6 Then
  1718. If CheckBox6.Checked Then
  1719. TextBox1.BackColor = Color.Green
  1720.  
  1721. End If
  1722. ElseIf terzoR = 7 Then
  1723. If CheckBox7.Checked Then
  1724. TextBox1.BackColor = Color.Green
  1725. End If
  1726. ElseIf terzoR = 8 Then
  1727. If CheckBox8.Checked Then
  1728. TextBox1.BackColor = Color.Green
  1729. End If
  1730. ElseIf terzoR = 9 Then
  1731. If CheckBox9.Checked Then
  1732. TextBox1.BackColor = Color.Green
  1733. End If
  1734. ElseIf terzoR = 0 Then
  1735. If CheckBox10.Checked Then
  1736. TextBox1.BackColor = Color.Green
  1737. End If
  1738. End If
  1739. End If
  1740. ElseIf secondoR = 3 Then
  1741. If CheckBox3.Checked Then
  1742. If terzoR = 0 Then
  1743. If CheckBox10.Checked Then
  1744. TextBox1.BackColor = Color.Green
  1745. End If
  1746.  
  1747. ElseIf terzoR = 1 Then
  1748. If CheckBox1.Checked Then
  1749. TextBox1.BackColor = Color.Green
  1750. End If
  1751. ElseIf terzoR = 2 Then
  1752. If CheckBox2.Checked Then
  1753. TextBox1.BackColor = Color.Green
  1754. End If
  1755. ElseIf terzoR = 3 Then
  1756. If CheckBox3.Checked Then
  1757. TextBox1.BackColor = Color.Green
  1758. End If
  1759. ElseIf terzoR = 4 Then
  1760. If CheckBox4.Checked Then
  1761. TextBox1.BackColor = Color.Green
  1762. End If
  1763. ElseIf terzoR = 5 Then
  1764. If CheckBox5.Checked Then
  1765. TextBox1.BackColor = Color.Green
  1766. End If
  1767. ElseIf terzoR = 6 Then
  1768. If CheckBox6.Checked Then
  1769. TextBox1.BackColor = Color.Green
  1770. End If
  1771. ElseIf terzoR = 7 Then
  1772. If CheckBox7.Checked Then
  1773. TextBox1.BackColor = Color.Green
  1774. End If
  1775. ElseIf terzoR = 8 Then
  1776. If CheckBox8.Checked Then
  1777. TextBox1.BackColor = Color.Green
  1778. End If
  1779. ElseIf terzoR = 9 Then
  1780. If CheckBox9.Checked Then
  1781. TextBox1.BackColor = Color.Green
  1782. End If
  1783. End If
  1784. End If
  1785. ElseIf secondoR = 4 Then
  1786. If CheckBox4.Checked Then
  1787. If terzoR = 0 Then
  1788. If CheckBox10.Checked Then
  1789. TextBox1.BackColor = Color.Green
  1790. End If
  1791.  
  1792. ElseIf terzoR = 1 Then
  1793. If CheckBox1.Checked Then
  1794. TextBox1.BackColor = Color.Green
  1795. End If
  1796. ElseIf terzoR = 2 Then
  1797. If CheckBox2.Checked Then
  1798. TextBox1.BackColor = Color.Green
  1799. End If
  1800. ElseIf terzoR = 3 Then
  1801. If CheckBox3.Checked Then
  1802. TextBox1.BackColor = Color.Green
  1803. End If
  1804. ElseIf terzoR = 4 Then
  1805. If CheckBox4.Checked Then
  1806. TextBox1.BackColor = Color.Green
  1807. End If
  1808. ElseIf terzoR = 5 Then
  1809. If CheckBox5.Checked Then
  1810. TextBox1.BackColor = Color.Green
  1811. End If
  1812. ElseIf terzoR = 6 Then
  1813. If CheckBox6.Checked Then
  1814. TextBox1.BackColor = Color.Green
  1815. End If
  1816. ElseIf terzoR = 7 Then
  1817. If CheckBox7.Checked Then
  1818. TextBox1.BackColor = Color.Green
  1819. End If
  1820. ElseIf terzoR = 8 Then
  1821. If CheckBox8.Checked Then
  1822. TextBox1.BackColor = Color.Green
  1823. End If
  1824. ElseIf terzoR = 9 Then
  1825. If CheckBox9.Checked Then
  1826. TextBox1.BackColor = Color.Green
  1827. End If
  1828. End If
  1829. End If
  1830. ElseIf secondoR = 5 Then
  1831. If CheckBox5.Checked Then
  1832. If terzoR = 0 Then
  1833. If CheckBox10.Checked Then
  1834. TextBox1.BackColor = Color.Green
  1835. End If
  1836.  
  1837. ElseIf terzoR = 1 Then
  1838. If CheckBox1.Checked Then
  1839. TextBox1.BackColor = Color.Green
  1840. End If
  1841. ElseIf terzoR = 2 Then
  1842. If CheckBox2.Checked Then
  1843. TextBox1.BackColor = Color.Green
  1844. End If
  1845. ElseIf terzoR = 3 Then
  1846. If CheckBox3.Checked Then
  1847. TextBox1.BackColor = Color.Green
  1848. End If
  1849. ElseIf terzoR = 4 Then
  1850. If CheckBox4.Checked Then
  1851. TextBox1.BackColor = Color.Green
  1852. End If
  1853. ElseIf terzoR = 5 Then
  1854. If CheckBox5.Checked Then
  1855. TextBox1.BackColor = Color.Green
  1856. End If
  1857. ElseIf terzoR = 6 Then
  1858. If CheckBox6.Checked Then
  1859. TextBox1.BackColor = Color.Green
  1860. End If
  1861. ElseIf terzoR = 7 Then
  1862. If CheckBox7.Checked Then
  1863. TextBox1.BackColor = Color.Green
  1864. End If
  1865. ElseIf terzoR = 8 Then
  1866. If CheckBox8.Checked Then
  1867. TextBox1.BackColor = Color.Green
  1868. End If
  1869. ElseIf terzoR = 9 Then
  1870. If CheckBox9.Checked Then
  1871. TextBox1.BackColor = Color.Green
  1872. End If
  1873. End If
  1874. End If
  1875. ElseIf secondoR = 6 Then
  1876. If CheckBox6.Checked Then
  1877. If terzoR = 0 Then
  1878. If CheckBox10.Checked Then
  1879. TextBox1.BackColor = Color.Green
  1880. End If
  1881.  
  1882. ElseIf terzoR = 1 Then
  1883. If CheckBox1.Checked Then
  1884. TextBox1.BackColor = Color.Green
  1885. End If
  1886. ElseIf terzoR = 2 Then
  1887. If CheckBox2.Checked Then
  1888. TextBox1.BackColor = Color.Green
  1889. End If
  1890. ElseIf terzoR = 3 Then
  1891. If CheckBox3.Checked Then
  1892. TextBox1.BackColor = Color.Green
  1893. End If
  1894. ElseIf terzoR = 4 Then
  1895. If CheckBox4.Checked Then
  1896. TextBox1.BackColor = Color.Green
  1897. End If
  1898. ElseIf terzoR = 5 Then
  1899. If CheckBox5.Checked Then
  1900. TextBox1.BackColor = Color.Green
  1901. End If
  1902. ElseIf terzoR = 6 Then
  1903. If CheckBox6.Checked Then
  1904. TextBox1.BackColor = Color.Green
  1905. End If
  1906. ElseIf terzoR = 7 Then
  1907. If CheckBox7.Checked Then
  1908. TextBox1.BackColor = Color.Green
  1909. End If
  1910. ElseIf terzoR = 8 Then
  1911. If CheckBox8.Checked Then
  1912. TextBox1.BackColor = Color.Green
  1913. End If
  1914. ElseIf terzoR = 9 Then
  1915. If CheckBox9.Checked Then
  1916. TextBox1.BackColor = Color.Green
  1917. End If
  1918. End If
  1919. End If
  1920. ElseIf secondoR = 7 Then
  1921. If CheckBox7.Checked Then
  1922. If terzoR = 0 Then
  1923. If CheckBox10.Checked Then
  1924. TextBox1.BackColor = Color.Green
  1925. End If
  1926.  
  1927. ElseIf terzoR = 1 Then
  1928. If CheckBox1.Checked Then
  1929. TextBox1.BackColor = Color.Green
  1930. End If
  1931. ElseIf terzoR = 2 Then
  1932. If CheckBox2.Checked Then
  1933. TextBox1.BackColor = Color.Green
  1934. End If
  1935. ElseIf terzoR = 3 Then
  1936. If CheckBox3.Checked Then
  1937. TextBox1.BackColor = Color.Green
  1938. End If
  1939. ElseIf terzoR = 4 Then
  1940. If CheckBox4.Checked Then
  1941. TextBox1.BackColor = Color.Green
  1942. End If
  1943. ElseIf terzoR = 5 Then
  1944. If CheckBox5.Checked Then
  1945. TextBox1.BackColor = Color.Green
  1946. End If
  1947. ElseIf terzoR = 6 Then
  1948. If CheckBox6.Checked Then
  1949. TextBox1.BackColor = Color.Green
  1950. End If
  1951. ElseIf terzoR = 7 Then
  1952. If CheckBox7.Checked Then
  1953. TextBox1.BackColor = Color.Green
  1954. End If
  1955. ElseIf terzoR = 8 Then
  1956. If CheckBox8.Checked Then
  1957. TextBox1.BackColor = Color.Green
  1958. End If
  1959. ElseIf terzoR = 9 Then
  1960. If CheckBox9.Checked Then
  1961. TextBox1.BackColor = Color.Green
  1962. End If
  1963. End If
  1964. End If
  1965. ElseIf secondoR = 8 Then
  1966. If CheckBox8.Checked Then
  1967. If terzoR = 0 Then
  1968. If CheckBox10.Checked Then
  1969. TextBox1.BackColor = Color.Green
  1970. End If
  1971.  
  1972. ElseIf terzoR = 1 Then
  1973. If CheckBox1.Checked Then
  1974. TextBox1.BackColor = Color.Green
  1975. End If
  1976. ElseIf terzoR = 2 Then
  1977. If CheckBox2.Checked Then
  1978. TextBox1.BackColor = Color.Green
  1979. End If
  1980. ElseIf terzoR = 3 Then
  1981. If CheckBox3.Checked Then
  1982. TextBox1.BackColor = Color.Green
  1983. End If
  1984. ElseIf terzoR = 4 Then
  1985. If CheckBox4.Checked Then
  1986. TextBox1.BackColor = Color.Green
  1987. End If
  1988. ElseIf terzoR = 5 Then
  1989. If CheckBox5.Checked Then
  1990. TextBox1.BackColor = Color.Green
  1991. End If
  1992. ElseIf terzoR = 6 Then
  1993. If CheckBox6.Checked Then
  1994. TextBox1.BackColor = Color.Green
  1995. End If
  1996. ElseIf terzoR = 7 Then
  1997. If CheckBox7.Checked Then
  1998. TextBox1.BackColor = Color.Green
  1999. End If
  2000. ElseIf terzoR = 8 Then
  2001. If CheckBox8.Checked Then
  2002. TextBox1.BackColor = Color.Green
  2003. End If
  2004. ElseIf terzoR = 9 Then
  2005. If CheckBox9.Checked Then
  2006. TextBox1.BackColor = Color.Green
  2007. End If
  2008. End If
  2009. End If
  2010. ElseIf secondoR = 9 Then
  2011. If CheckBox9.Checked Then
  2012. If terzoR = 0 Then
  2013. If CheckBox10.Checked Then
  2014. TextBox1.BackColor = Color.Green
  2015. End If
  2016.  
  2017. ElseIf terzoR = 1 Then
  2018. If CheckBox1.Checked Then
  2019. TextBox1.BackColor = Color.Green
  2020. End If
  2021. ElseIf terzoR = 2 Then
  2022. If CheckBox2.Checked Then
  2023. TextBox1.BackColor = Color.Green
  2024. End If
  2025. ElseIf terzoR = 3 Then
  2026. If CheckBox3.Checked Then
  2027. TextBox1.BackColor = Color.Green
  2028. End If
  2029. ElseIf terzoR = 4 Then
  2030. If CheckBox4.Checked Then
  2031. TextBox1.BackColor = Color.Green
  2032. End If
  2033. ElseIf terzoR = 5 Then
  2034. If CheckBox5.Checked Then
  2035. TextBox1.BackColor = Color.Green
  2036. End If
  2037. ElseIf terzoR = 6 Then
  2038. If CheckBox6.Checked Then
  2039. TextBox1.BackColor = Color.Green
  2040. End If
  2041. ElseIf terzoR = 7 Then
  2042. If CheckBox7.Checked Then
  2043. TextBox1.BackColor = Color.Green
  2044. End If
  2045. ElseIf terzoR = 8 Then
  2046. If CheckBox8.Checked Then
  2047. TextBox1.BackColor = Color.Green
  2048. End If
  2049. ElseIf terzoR = 9 Then
  2050. If CheckBox9.Checked Then
  2051. TextBox1.BackColor = Color.Green
  2052. End If
  2053. End If
  2054. End If
  2055. Else
  2056. TextBox1.BackColor = Color.Black
  2057. End If
  2058. Else
  2059. TextBox1.BackColor = Color.Black
  2060. End If
  2061. ElseIf primoR = 5 Then
  2062. If CheckBox5.Checked Then
  2063. If secondoR = 1 Then
  2064. If CheckBox1.Checked Then
  2065. If terzoR = 2 Then
  2066. If CheckBox2.Checked Then
  2067. TextBox1.BackColor = Color.Green
  2068. End If
  2069. ElseIf terzoR = 3 Then
  2070. If CheckBox3.Checked Then
  2071. TextBox1.BackColor = Color.Green
  2072. End If
  2073. ElseIf terzoR = 4 Then
  2074. If CheckBox4.Checked Then
  2075. TextBox1.BackColor = Color.Green
  2076. End If
  2077. ElseIf terzoR = 5 Then
  2078. If CheckBox5.Checked Then
  2079. TextBox1.BackColor = Color.Green
  2080. End If
  2081. ElseIf terzoR = 6 Then
  2082. If CheckBox6.Checked Then
  2083. TextBox1.BackColor = Color.Green
  2084. End If
  2085. ElseIf terzoR = 7 Then
  2086. If CheckBox7.Checked Then
  2087. TextBox1.BackColor = Color.Green
  2088. End If
  2089. ElseIf terzoR = 8 Then
  2090. If CheckBox8.Checked Then
  2091. TextBox1.BackColor = Color.Green
  2092. End If
  2093. ElseIf terzoR = 9 Then
  2094. If CheckBox9.Checked Then
  2095. TextBox1.BackColor = Color.Green
  2096. End If
  2097. ElseIf terzoR = 1 Then
  2098. If CheckBox1.Checked Then
  2099. TextBox1.BackColor = Color.Green
  2100. End If
  2101. ElseIf terzoR = 0 Then
  2102. If CheckBox10.Checked Then
  2103. TextBox1.BackColor = Color.Green
  2104. End If
  2105. End If
  2106. End If
  2107. ElseIf secondoR = 2 Then
  2108. If CheckBox2.Checked Then
  2109. If terzoR = 1 Then
  2110. If CheckBox1.Checked Then
  2111. TextBox1.BackColor = Color.Green
  2112. End If
  2113. ElseIf terzoR = 2 Then
  2114. If CheckBox2.Checked Then
  2115. TextBox1.BackColor = Color.Green
  2116. End If
  2117. ElseIf terzoR = 3 Then
  2118. If CheckBox3.Checked Then
  2119. TextBox1.BackColor = Color.Green
  2120. End If
  2121. ElseIf terzoR = 4 Then
  2122. If CheckBox4.Checked Then
  2123. TextBox1.BackColor = Color.Green
  2124. End If
  2125. ElseIf terzoR = 5 Then
  2126. If CheckBox5.Checked Then
  2127. TextBox1.BackColor = Color.Green
  2128. End If
  2129. ElseIf terzoR = 6 Then
  2130. If CheckBox6.Checked Then
  2131. TextBox1.BackColor = Color.Green
  2132.  
  2133. End If
  2134. ElseIf terzoR = 7 Then
  2135. If CheckBox7.Checked Then
  2136. TextBox1.BackColor = Color.Green
  2137. End If
  2138. ElseIf terzoR = 8 Then
  2139. If CheckBox8.Checked Then
  2140. TextBox1.BackColor = Color.Green
  2141. End If
  2142. ElseIf terzoR = 9 Then
  2143. If CheckBox9.Checked Then
  2144. TextBox1.BackColor = Color.Green
  2145. End If
  2146. ElseIf terzoR = 0 Then
  2147. If CheckBox10.Checked Then
  2148. TextBox1.BackColor = Color.Green
  2149. End If
  2150. End If
  2151. End If
  2152. ElseIf secondoR = 3 Then
  2153. If CheckBox3.Checked Then
  2154. If terzoR = 0 Then
  2155. If CheckBox10.Checked Then
  2156. TextBox1.BackColor = Color.Green
  2157. End If
  2158.  
  2159. ElseIf terzoR = 1 Then
  2160. If CheckBox1.Checked Then
  2161. TextBox1.BackColor = Color.Green
  2162. End If
  2163. ElseIf terzoR = 2 Then
  2164. If CheckBox2.Checked Then
  2165. TextBox1.BackColor = Color.Green
  2166. End If
  2167. ElseIf terzoR = 3 Then
  2168. If CheckBox3.Checked Then
  2169. TextBox1.BackColor = Color.Green
  2170. End If
  2171. ElseIf terzoR = 4 Then
  2172. If CheckBox4.Checked Then
  2173. TextBox1.BackColor = Color.Green
  2174. End If
  2175. ElseIf terzoR = 5 Then
  2176. If CheckBox5.Checked Then
  2177. TextBox1.BackColor = Color.Green
  2178. End If
  2179. ElseIf terzoR = 6 Then
  2180. If CheckBox6.Checked Then
  2181. TextBox1.BackColor = Color.Green
  2182. End If
  2183. ElseIf terzoR = 7 Then
  2184. If CheckBox7.Checked Then
  2185. TextBox1.BackColor = Color.Green
  2186. End If
  2187. ElseIf terzoR = 8 Then
  2188. If CheckBox8.Checked Then
  2189. TextBox1.BackColor = Color.Green
  2190. End If
  2191. ElseIf terzoR = 9 Then
  2192. If CheckBox9.Checked Then
  2193. TextBox1.BackColor = Color.Green
  2194. End If
  2195. End If
  2196. End If
  2197. ElseIf secondoR = 4 Then
  2198. If CheckBox4.Checked Then
  2199. If terzoR = 0 Then
  2200. If CheckBox10.Checked Then
  2201. TextBox1.BackColor = Color.Green
  2202. End If
  2203.  
  2204. ElseIf terzoR = 1 Then
  2205. If CheckBox1.Checked Then
  2206. TextBox1.BackColor = Color.Green
  2207. End If
  2208. ElseIf terzoR = 2 Then
  2209. If CheckBox2.Checked Then
  2210. TextBox1.BackColor = Color.Green
  2211. End If
  2212. ElseIf terzoR = 3 Then
  2213. If CheckBox3.Checked Then
  2214. TextBox1.BackColor = Color.Green
  2215. End If
  2216. ElseIf terzoR = 4 Then
  2217. If CheckBox4.Checked Then
  2218. TextBox1.BackColor = Color.Green
  2219. End If
  2220. ElseIf terzoR = 5 Then
  2221. If CheckBox5.Checked Then
  2222. TextBox1.BackColor = Color.Green
  2223. End If
  2224. ElseIf terzoR = 6 Then
  2225. If CheckBox6.Checked Then
  2226. TextBox1.BackColor = Color.Green
  2227. End If
  2228. ElseIf terzoR = 7 Then
  2229. If CheckBox7.Checked Then
  2230. TextBox1.BackColor = Color.Green
  2231. End If
  2232. ElseIf terzoR = 8 Then
  2233. If CheckBox8.Checked Then
  2234. TextBox1.BackColor = Color.Green
  2235. End If
  2236. ElseIf terzoR = 9 Then
  2237. If CheckBox9.Checked Then
  2238. TextBox1.BackColor = Color.Green
  2239. End If
  2240. End If
  2241. End If
  2242. ElseIf secondoR = 5 Then
  2243. If CheckBox5.Checked Then
  2244. If terzoR = 0 Then
  2245. If CheckBox10.Checked Then
  2246. TextBox1.BackColor = Color.Green
  2247. End If
  2248.  
  2249. ElseIf terzoR = 1 Then
  2250. If CheckBox1.Checked Then
  2251. TextBox1.BackColor = Color.Green
  2252. End If
  2253. ElseIf terzoR = 2 Then
  2254. If CheckBox2.Checked Then
  2255. TextBox1.BackColor = Color.Green
  2256. End If
  2257. ElseIf terzoR = 3 Then
  2258. If CheckBox3.Checked Then
  2259. TextBox1.BackColor = Color.Green
  2260. End If
  2261. ElseIf terzoR = 4 Then
  2262. If CheckBox4.Checked Then
  2263. TextBox1.BackColor = Color.Green
  2264. End If
  2265. ElseIf terzoR = 5 Then
  2266. If CheckBox5.Checked Then
  2267. TextBox1.BackColor = Color.Green
  2268. End If
  2269. ElseIf terzoR = 6 Then
  2270. If CheckBox6.Checked Then
  2271. TextBox1.BackColor = Color.Green
  2272. End If
  2273. ElseIf terzoR = 7 Then
  2274. If CheckBox7.Checked Then
  2275. TextBox1.BackColor = Color.Green
  2276. End If
  2277. ElseIf terzoR = 8 Then
  2278. If CheckBox8.Checked Then
  2279. TextBox1.BackColor = Color.Green
  2280. End If
  2281. ElseIf terzoR = 9 Then
  2282. If CheckBox9.Checked Then
  2283. TextBox1.BackColor = Color.Green
  2284. End If
  2285. End If
  2286. End If
  2287. ElseIf secondoR = 6 Then
  2288. If CheckBox6.Checked Then
  2289. If terzoR = 0 Then
  2290. If CheckBox10.Checked Then
  2291. TextBox1.BackColor = Color.Green
  2292. End If
  2293.  
  2294. ElseIf terzoR = 1 Then
  2295. If CheckBox1.Checked Then
  2296. TextBox1.BackColor = Color.Green
  2297. End If
  2298. ElseIf terzoR = 2 Then
  2299. If CheckBox2.Checked Then
  2300. TextBox1.BackColor = Color.Green
  2301. End If
  2302. ElseIf terzoR = 3 Then
  2303. If CheckBox3.Checked Then
  2304. TextBox1.BackColor = Color.Green
  2305. End If
  2306. ElseIf terzoR = 4 Then
  2307. If CheckBox4.Checked Then
  2308. TextBox1.BackColor = Color.Green
  2309. End If
  2310. ElseIf terzoR = 5 Then
  2311. If CheckBox5.Checked Then
  2312. TextBox1.BackColor = Color.Green
  2313. End If
  2314. ElseIf terzoR = 6 Then
  2315. If CheckBox6.Checked Then
  2316. TextBox1.BackColor = Color.Green
  2317. End If
  2318. ElseIf terzoR = 7 Then
  2319. If CheckBox7.Checked Then
  2320. TextBox1.BackColor = Color.Green
  2321. End If
  2322. ElseIf terzoR = 8 Then
  2323. If CheckBox8.Checked Then
  2324. TextBox1.BackColor = Color.Green
  2325. End If
  2326. ElseIf terzoR = 9 Then
  2327. If CheckBox9.Checked Then
  2328. TextBox1.BackColor = Color.Green
  2329. End If
  2330. End If
  2331. End If
  2332. ElseIf secondoR = 7 Then
  2333. If CheckBox7.Checked Then
  2334. If terzoR = 0 Then
  2335. If CheckBox10.Checked Then
  2336. TextBox1.BackColor = Color.Green
  2337. End If
  2338.  
  2339. ElseIf terzoR = 1 Then
  2340. If CheckBox1.Checked Then
  2341. TextBox1.BackColor = Color.Green
  2342. End If
  2343. ElseIf terzoR = 2 Then
  2344. If CheckBox2.Checked Then
  2345. TextBox1.BackColor = Color.Green
  2346. End If
  2347. ElseIf terzoR = 3 Then
  2348. If CheckBox3.Checked Then
  2349. TextBox1.BackColor = Color.Green
  2350. End If
  2351. ElseIf terzoR = 4 Then
  2352. If CheckBox4.Checked Then
  2353. TextBox1.BackColor = Color.Green
  2354. End If
  2355. ElseIf terzoR = 5 Then
  2356. If CheckBox5.Checked Then
  2357. TextBox1.BackColor = Color.Green
  2358. End If
  2359. ElseIf terzoR = 6 Then
  2360. If CheckBox6.Checked Then
  2361. TextBox1.BackColor = Color.Green
  2362. End If
  2363. ElseIf terzoR = 7 Then
  2364. If CheckBox7.Checked Then
  2365. TextBox1.BackColor = Color.Green
  2366. End If
  2367. ElseIf terzoR = 8 Then
  2368. If CheckBox8.Checked Then
  2369. TextBox1.BackColor = Color.Green
  2370. End If
  2371. ElseIf terzoR = 9 Then
  2372. If CheckBox9.Checked Then
  2373. TextBox1.BackColor = Color.Green
  2374. End If
  2375. End If
  2376. End If
  2377. ElseIf secondoR = 8 Then
  2378. If CheckBox8.Checked Then
  2379. If terzoR = 0 Then
  2380. If CheckBox10.Checked Then
  2381. TextBox1.BackColor = Color.Green
  2382. End If
  2383.  
  2384. ElseIf terzoR = 1 Then
  2385. If CheckBox1.Checked Then
  2386. TextBox1.BackColor = Color.Green
  2387. End If
  2388. ElseIf terzoR = 2 Then
  2389. If CheckBox2.Checked Then
  2390. TextBox1.BackColor = Color.Green
  2391. End If
  2392. ElseIf terzoR = 3 Then
  2393. If CheckBox3.Checked Then
  2394. TextBox1.BackColor = Color.Green
  2395. End If
  2396. ElseIf terzoR = 4 Then
  2397. If CheckBox4.Checked Then
  2398. TextBox1.BackColor = Color.Green
  2399. End If
  2400. ElseIf terzoR = 5 Then
  2401. If CheckBox5.Checked Then
  2402. TextBox1.BackColor = Color.Green
  2403. End If
  2404. ElseIf terzoR = 6 Then
  2405. If CheckBox6.Checked Then
  2406. TextBox1.BackColor = Color.Green
  2407. End If
  2408. ElseIf terzoR = 7 Then
  2409. If CheckBox7.Checked Then
  2410. TextBox1.BackColor = Color.Green
  2411. End If
  2412. ElseIf terzoR = 8 Then
  2413. If CheckBox8.Checked Then
  2414. TextBox1.BackColor = Color.Green
  2415. End If
  2416. ElseIf terzoR = 9 Then
  2417. If CheckBox9.Checked Then
  2418. TextBox1.BackColor = Color.Green
  2419. End If
  2420. End If
  2421. End If
  2422. ElseIf secondoR = 9 Then
  2423. If CheckBox9.Checked Then
  2424. If terzoR = 0 Then
  2425. If CheckBox10.Checked Then
  2426. TextBox1.BackColor = Color.Green
  2427. End If
  2428.  
  2429. ElseIf terzoR = 1 Then
  2430. If CheckBox1.Checked Then
  2431. TextBox1.BackColor = Color.Green
  2432. End If
  2433. ElseIf terzoR = 2 Then
  2434. If CheckBox2.Checked Then
  2435. TextBox1.BackColor = Color.Green
  2436. End If
  2437. ElseIf terzoR = 3 Then
  2438. If CheckBox3.Checked Then
  2439. TextBox1.BackColor = Color.Green
  2440. End If
  2441. ElseIf terzoR = 4 Then
  2442. If CheckBox4.Checked Then
  2443. TextBox1.BackColor = Color.Green
  2444. End If
  2445. ElseIf terzoR = 5 Then
  2446. If CheckBox5.Checked Then
  2447. TextBox1.BackColor = Color.Green
  2448. End If
  2449. ElseIf terzoR = 6 Then
  2450. If CheckBox6.Checked Then
  2451. TextBox1.BackColor = Color.Green
  2452. End If
  2453. ElseIf terzoR = 7 Then
  2454. If CheckBox7.Checked Then
  2455. TextBox1.BackColor = Color.Green
  2456. End If
  2457. ElseIf terzoR = 8 Then
  2458. If CheckBox8.Checked Then
  2459. TextBox1.BackColor = Color.Green
  2460. End If
  2461. ElseIf terzoR = 9 Then
  2462. If CheckBox9.Checked Then
  2463. TextBox1.BackColor = Color.Green
  2464. End If
  2465. End If
  2466. End If
  2467. Else
  2468. TextBox1.BackColor = Color.Black
  2469. End If
  2470. Else
  2471. TextBox1.BackColor = Color.Black
  2472. End If
  2473. ElseIf primoR = 6 Then
  2474. If CheckBox6.Checked Then
  2475. If secondoR = 1 Then
  2476. If CheckBox1.Checked Then
  2477. If terzoR = 2 Then
  2478. If CheckBox2.Checked Then
  2479. TextBox1.BackColor = Color.Green
  2480. End If
  2481. ElseIf terzoR = 3 Then
  2482. If CheckBox3.Checked Then
  2483. TextBox1.BackColor = Color.Green
  2484. End If
  2485. ElseIf terzoR = 4 Then
  2486. If CheckBox4.Checked Then
  2487. TextBox1.BackColor = Color.Green
  2488. End If
  2489. ElseIf terzoR = 5 Then
  2490. If CheckBox5.Checked Then
  2491. TextBox1.BackColor = Color.Green
  2492. End If
  2493. ElseIf terzoR = 6 Then
  2494. If CheckBox6.Checked Then
  2495. TextBox1.BackColor = Color.Green
  2496. End If
  2497. ElseIf terzoR = 7 Then
  2498. If CheckBox7.Checked Then
  2499. TextBox1.BackColor = Color.Green
  2500. End If
  2501. ElseIf terzoR = 8 Then
  2502. If CheckBox8.Checked Then
  2503. TextBox1.BackColor = Color.Green
  2504. End If
  2505. ElseIf terzoR = 9 Then
  2506. If CheckBox9.Checked Then
  2507. TextBox1.BackColor = Color.Green
  2508. End If
  2509. ElseIf terzoR = 1 Then
  2510. If CheckBox1.Checked Then
  2511. TextBox1.BackColor = Color.Green
  2512. End If
  2513. ElseIf terzoR = 0 Then
  2514. If CheckBox10.Checked Then
  2515. TextBox1.BackColor = Color.Green
  2516. End If
  2517. End If
  2518. End If
  2519. ElseIf secondoR = 2 Then
  2520. If CheckBox2.Checked Then
  2521. If terzoR = 1 Then
  2522. If CheckBox1.Checked Then
  2523. TextBox1.BackColor = Color.Green
  2524. End If
  2525. ElseIf terzoR = 2 Then
  2526. If CheckBox2.Checked Then
  2527. TextBox1.BackColor = Color.Green
  2528. End If
  2529. ElseIf terzoR = 3 Then
  2530. If CheckBox3.Checked Then
  2531. TextBox1.BackColor = Color.Green
  2532. End If
  2533. ElseIf terzoR = 4 Then
  2534. If CheckBox4.Checked Then
  2535. TextBox1.BackColor = Color.Green
  2536. End If
  2537. ElseIf terzoR = 5 Then
  2538. If CheckBox5.Checked Then
  2539. TextBox1.BackColor = Color.Green
  2540. End If
  2541. ElseIf terzoR = 6 Then
  2542. If CheckBox6.Checked Then
  2543. TextBox1.BackColor = Color.Green
  2544.  
  2545. End If
  2546. ElseIf terzoR = 7 Then
  2547. If CheckBox7.Checked Then
  2548. TextBox1.BackColor = Color.Green
  2549. End If
  2550. ElseIf terzoR = 8 Then
  2551. If CheckBox8.Checked Then
  2552. TextBox1.BackColor = Color.Green
  2553. End If
  2554. ElseIf terzoR = 9 Then
  2555. If CheckBox9.Checked Then
  2556. TextBox1.BackColor = Color.Green
  2557. End If
  2558. ElseIf terzoR = 0 Then
  2559. If CheckBox10.Checked Then
  2560. TextBox1.BackColor = Color.Green
  2561. End If
  2562. End If
  2563. End If
  2564. ElseIf secondoR = 3 Then
  2565. If CheckBox3.Checked Then
  2566. If terzoR = 0 Then
  2567. If CheckBox10.Checked Then
  2568. TextBox1.BackColor = Color.Green
  2569. End If
  2570.  
  2571. ElseIf terzoR = 1 Then
  2572. If CheckBox1.Checked Then
  2573. TextBox1.BackColor = Color.Green
  2574. End If
  2575. ElseIf terzoR = 2 Then
  2576. If CheckBox2.Checked Then
  2577. TextBox1.BackColor = Color.Green
  2578. End If
  2579. ElseIf terzoR = 3 Then
  2580. If CheckBox3.Checked Then
  2581. TextBox1.BackColor = Color.Green
  2582. End If
  2583. ElseIf terzoR = 4 Then
  2584. If CheckBox4.Checked Then
  2585. TextBox1.BackColor = Color.Green
  2586. End If
  2587. ElseIf terzoR = 5 Then
  2588. If CheckBox5.Checked Then
  2589. TextBox1.BackColor = Color.Green
  2590. End If
  2591. ElseIf terzoR = 6 Then
  2592. If CheckBox6.Checked Then
  2593. TextBox1.BackColor = Color.Green
  2594. End If
  2595. ElseIf terzoR = 7 Then
  2596. If CheckBox7.Checked Then
  2597. TextBox1.BackColor = Color.Green
  2598. End If
  2599. ElseIf terzoR = 8 Then
  2600. If CheckBox8.Checked Then
  2601. TextBox1.BackColor = Color.Green
  2602. End If
  2603. ElseIf terzoR = 9 Then
  2604. If CheckBox9.Checked Then
  2605. TextBox1.BackColor = Color.Green
  2606. End If
  2607. End If
  2608. End If
  2609. ElseIf secondoR = 4 Then
  2610. If CheckBox4.Checked Then
  2611. If terzoR = 0 Then
  2612. If CheckBox10.Checked Then
  2613. TextBox1.BackColor = Color.Green
  2614. End If
  2615.  
  2616. ElseIf terzoR = 1 Then
  2617. If CheckBox1.Checked Then
  2618. TextBox1.BackColor = Color.Green
  2619. End If
  2620. ElseIf terzoR = 2 Then
  2621. If CheckBox2.Checked Then
  2622. TextBox1.BackColor = Color.Green
  2623. End If
  2624. ElseIf terzoR = 3 Then
  2625. If CheckBox3.Checked Then
  2626. TextBox1.BackColor = Color.Green
  2627. End If
  2628. ElseIf terzoR = 4 Then
  2629. If CheckBox4.Checked Then
  2630. TextBox1.BackColor = Color.Green
  2631. End If
  2632. ElseIf terzoR = 5 Then
  2633. If CheckBox5.Checked Then
  2634. TextBox1.BackColor = Color.Green
  2635. End If
  2636. ElseIf terzoR = 6 Then
  2637. If CheckBox6.Checked Then
  2638. TextBox1.BackColor = Color.Green
  2639. End If
  2640. ElseIf terzoR = 7 Then
  2641. If CheckBox7.Checked Then
  2642. TextBox1.BackColor = Color.Green
  2643. End If
  2644. ElseIf terzoR = 8 Then
  2645. If CheckBox8.Checked Then
  2646. TextBox1.BackColor = Color.Green
  2647. End If
  2648. ElseIf terzoR = 9 Then
  2649. If CheckBox9.Checked Then
  2650. TextBox1.BackColor = Color.Green
  2651. End If
  2652. End If
  2653. End If
  2654. ElseIf secondoR = 5 Then
  2655. If CheckBox5.Checked Then
  2656. If terzoR = 0 Then
  2657. If CheckBox10.Checked Then
  2658. TextBox1.BackColor = Color.Green
  2659. End If
  2660.  
  2661. ElseIf terzoR = 1 Then
  2662. If CheckBox1.Checked Then
  2663. TextBox1.BackColor = Color.Green
  2664. End If
  2665. ElseIf terzoR = 2 Then
  2666. If CheckBox2.Checked Then
  2667. TextBox1.BackColor = Color.Green
  2668. End If
  2669. ElseIf terzoR = 3 Then
  2670. If CheckBox3.Checked Then
  2671. TextBox1.BackColor = Color.Green
  2672. End If
  2673. ElseIf terzoR = 4 Then
  2674. If CheckBox4.Checked Then
  2675. TextBox1.BackColor = Color.Green
  2676. End If
  2677. ElseIf terzoR = 5 Then
  2678. If CheckBox5.Checked Then
  2679. TextBox1.BackColor = Color.Green
  2680. End If
  2681. ElseIf terzoR = 6 Then
  2682. If CheckBox6.Checked Then
  2683. TextBox1.BackColor = Color.Green
  2684. End If
  2685. ElseIf terzoR = 7 Then
  2686. If CheckBox7.Checked Then
  2687. TextBox1.BackColor = Color.Green
  2688. End If
  2689. ElseIf terzoR = 8 Then
  2690. If CheckBox8.Checked Then
  2691. TextBox1.BackColor = Color.Green
  2692. End If
  2693. ElseIf terzoR = 9 Then
  2694. If CheckBox9.Checked Then
  2695. TextBox1.BackColor = Color.Green
  2696. End If
  2697. End If
  2698. End If
  2699. ElseIf secondoR = 6 Then
  2700. If CheckBox6.Checked Then
  2701. If terzoR = 0 Then
  2702. If CheckBox10.Checked Then
  2703. TextBox1.BackColor = Color.Green
  2704. End If
  2705.  
  2706. ElseIf terzoR = 1 Then
  2707. If CheckBox1.Checked Then
  2708. TextBox1.BackColor = Color.Green
  2709. End If
  2710. ElseIf terzoR = 2 Then
  2711. If CheckBox2.Checked Then
  2712. TextBox1.BackColor = Color.Green
  2713. End If
  2714. ElseIf terzoR = 3 Then
  2715. If CheckBox3.Checked Then
  2716. TextBox1.BackColor = Color.Green
  2717. End If
  2718. ElseIf terzoR = 4 Then
  2719. If CheckBox4.Checked Then
  2720. TextBox1.BackColor = Color.Green
  2721. End If
  2722. ElseIf terzoR = 5 Then
  2723. If CheckBox5.Checked Then
  2724. TextBox1.BackColor = Color.Green
  2725. End If
  2726. ElseIf terzoR = 6 Then
  2727. If CheckBox6.Checked Then
  2728. TextBox1.BackColor = Color.Green
  2729. End If
  2730. ElseIf terzoR = 7 Then
  2731. If CheckBox7.Checked Then
  2732. TextBox1.BackColor = Color.Green
  2733. End If
  2734. ElseIf terzoR = 8 Then
  2735. If CheckBox8.Checked Then
  2736. TextBox1.BackColor = Color.Green
  2737. End If
  2738. ElseIf terzoR = 9 Then
  2739. If CheckBox9.Checked Then
  2740. TextBox1.BackColor = Color.Green
  2741. End If
  2742. End If
  2743. End If
  2744. ElseIf secondoR = 7 Then
  2745. If CheckBox7.Checked Then
  2746. If terzoR = 0 Then
  2747. If CheckBox10.Checked Then
  2748. TextBox1.BackColor = Color.Green
  2749. End If
  2750.  
  2751. ElseIf terzoR = 1 Then
  2752. If CheckBox1.Checked Then
  2753. TextBox1.BackColor = Color.Green
  2754. End If
  2755. ElseIf terzoR = 2 Then
  2756. If CheckBox2.Checked Then
  2757. TextBox1.BackColor = Color.Green
  2758. End If
  2759. ElseIf terzoR = 3 Then
  2760. If CheckBox3.Checked Then
  2761. TextBox1.BackColor = Color.Green
  2762. End If
  2763. ElseIf terzoR = 4 Then
  2764. If CheckBox4.Checked Then
  2765. TextBox1.BackColor = Color.Green
  2766. End If
  2767. ElseIf terzoR = 5 Then
  2768. If CheckBox5.Checked Then
  2769. TextBox1.BackColor = Color.Green
  2770. End If
  2771. ElseIf terzoR = 6 Then
  2772. If CheckBox6.Checked Then
  2773. TextBox1.BackColor = Color.Green
  2774. End If
  2775. ElseIf terzoR = 7 Then
  2776. If CheckBox7.Checked Then
  2777. TextBox1.BackColor = Color.Green
  2778. End If
  2779. ElseIf terzoR = 8 Then
  2780. If CheckBox8.Checked Then
  2781. TextBox1.BackColor = Color.Green
  2782. End If
  2783. ElseIf terzoR = 9 Then
  2784. If CheckBox9.Checked Then
  2785. TextBox1.BackColor = Color.Green
  2786. End If
  2787. End If
  2788. End If
  2789. ElseIf secondoR = 8 Then
  2790. If CheckBox8.Checked Then
  2791. If terzoR = 0 Then
  2792. If CheckBox10.Checked Then
  2793. TextBox1.BackColor = Color.Green
  2794. End If
  2795.  
  2796. ElseIf terzoR = 1 Then
  2797. If CheckBox1.Checked Then
  2798. TextBox1.BackColor = Color.Green
  2799. End If
  2800. ElseIf terzoR = 2 Then
  2801. If CheckBox2.Checked Then
  2802. TextBox1.BackColor = Color.Green
  2803. End If
  2804. ElseIf terzoR = 3 Then
  2805. If CheckBox3.Checked Then
  2806. TextBox1.BackColor = Color.Green
  2807. End If
  2808. ElseIf terzoR = 4 Then
  2809. If CheckBox4.Checked Then
  2810. TextBox1.BackColor = Color.Green
  2811. End If
  2812. ElseIf terzoR = 5 Then
  2813. If CheckBox5.Checked Then
  2814. TextBox1.BackColor = Color.Green
  2815. End If
  2816. ElseIf terzoR = 6 Then
  2817. If CheckBox6.Checked Then
  2818. TextBox1.BackColor = Color.Green
  2819. End If
  2820. ElseIf terzoR = 7 Then
  2821. If CheckBox7.Checked Then
  2822. TextBox1.BackColor = Color.Green
  2823. End If
  2824. ElseIf terzoR = 8 Then
  2825. If CheckBox8.Checked Then
  2826. TextBox1.BackColor = Color.Green
  2827. End If
  2828. ElseIf terzoR = 9 Then
  2829. If CheckBox9.Checked Then
  2830. TextBox1.BackColor = Color.Green
  2831. End If
  2832. End If
  2833. End If
  2834. ElseIf secondoR = 9 Then
  2835. If CheckBox9.Checked Then
  2836. If terzoR = 0 Then
  2837. If CheckBox10.Checked Then
  2838. TextBox1.BackColor = Color.Green
  2839. End If
  2840.  
  2841. ElseIf terzoR = 1 Then
  2842. If CheckBox1.Checked Then
  2843. TextBox1.BackColor = Color.Green
  2844. End If
  2845. ElseIf terzoR = 2 Then
  2846. If CheckBox2.Checked Then
  2847. TextBox1.BackColor = Color.Green
  2848. End If
  2849. ElseIf terzoR = 3 Then
  2850. If CheckBox3.Checked Then
  2851. TextBox1.BackColor = Color.Green
  2852. End If
  2853. ElseIf terzoR = 4 Then
  2854. If CheckBox4.Checked Then
  2855. TextBox1.BackColor = Color.Green
  2856. End If
  2857. ElseIf terzoR = 5 Then
  2858. If CheckBox5.Checked Then
  2859. TextBox1.BackColor = Color.Green
  2860. End If
  2861. ElseIf terzoR = 6 Then
  2862. If CheckBox6.Checked Then
  2863. TextBox1.BackColor = Color.Green
  2864. End If
  2865. ElseIf terzoR = 7 Then
  2866. If CheckBox7.Checked Then
  2867. TextBox1.BackColor = Color.Green
  2868. End If
  2869. ElseIf terzoR = 8 Then
  2870. If CheckBox8.Checked Then
  2871. TextBox1.BackColor = Color.Green
  2872. End If
  2873. ElseIf terzoR = 9 Then
  2874. If CheckBox9.Checked Then
  2875. TextBox1.BackColor = Color.Green
  2876. End If
  2877. End If
  2878. End If
  2879. Else
  2880. TextBox1.BackColor = Color.Black
  2881. End If
  2882. Else
  2883. TextBox1.BackColor = Color.Black
  2884. End If
  2885. ElseIf primoR = 7 Then
  2886. If CheckBox7.Checked Then
  2887. If secondoR = 1 Then
  2888. If CheckBox1.Checked Then
  2889. If terzoR = 2 Then
  2890. If CheckBox2.Checked Then
  2891. TextBox1.BackColor = Color.Green
  2892. End If
  2893. ElseIf terzoR = 3 Then
  2894. If CheckBox3.Checked Then
  2895. TextBox1.BackColor = Color.Green
  2896. End If
  2897. ElseIf terzoR = 4 Then
  2898. If CheckBox4.Checked Then
  2899. TextBox1.BackColor = Color.Green
  2900. End If
  2901. ElseIf terzoR = 5 Then
  2902. If CheckBox5.Checked Then
  2903. TextBox1.BackColor = Color.Green
  2904. End If
  2905. ElseIf terzoR = 6 Then
  2906. If CheckBox6.Checked Then
  2907. TextBox1.BackColor = Color.Green
  2908. End If
  2909. ElseIf terzoR = 7 Then
  2910. If CheckBox7.Checked Then
  2911. TextBox1.BackColor = Color.Green
  2912. End If
  2913. ElseIf terzoR = 8 Then
  2914. If CheckBox8.Checked Then
  2915. TextBox1.BackColor = Color.Green
  2916. End If
  2917. ElseIf terzoR = 9 Then
  2918. If CheckBox9.Checked Then
  2919. TextBox1.BackColor = Color.Green
  2920. End If
  2921. ElseIf terzoR = 1 Then
  2922. If CheckBox1.Checked Then
  2923. TextBox1.BackColor = Color.Green
  2924. End If
  2925. ElseIf terzoR = 0 Then
  2926. If CheckBox10.Checked Then
  2927. TextBox1.BackColor = Color.Green
  2928. End If
  2929. End If
  2930. End If
  2931. ElseIf secondoR = 2 Then
  2932. If CheckBox2.Checked Then
  2933. If terzoR = 1 Then
  2934. If CheckBox1.Checked Then
  2935. TextBox1.BackColor = Color.Green
  2936. End If
  2937. ElseIf terzoR = 2 Then
  2938. If CheckBox2.Checked Then
  2939. TextBox1.BackColor = Color.Green
  2940. End If
  2941. ElseIf terzoR = 3 Then
  2942. If CheckBox3.Checked Then
  2943. TextBox1.BackColor = Color.Green
  2944. End If
  2945. ElseIf terzoR = 4 Then
  2946. If CheckBox4.Checked Then
  2947. TextBox1.BackColor = Color.Green
  2948. End If
  2949. ElseIf terzoR = 5 Then
  2950. If CheckBox5.Checked Then
  2951. TextBox1.BackColor = Color.Green
  2952. End If
  2953. ElseIf terzoR = 6 Then
  2954. If CheckBox6.Checked Then
  2955. TextBox1.BackColor = Color.Green
  2956.  
  2957. End If
  2958. ElseIf terzoR = 7 Then
  2959. If CheckBox7.Checked Then
  2960. TextBox1.BackColor = Color.Green
  2961. End If
  2962. ElseIf terzoR = 8 Then
  2963. If CheckBox8.Checked Then
  2964. TextBox1.BackColor = Color.Green
  2965. End If
  2966. ElseIf terzoR = 9 Then
  2967. If CheckBox9.Checked Then
  2968. TextBox1.BackColor = Color.Green
  2969. End If
  2970. ElseIf terzoR = 0 Then
  2971. If CheckBox10.Checked Then
  2972. TextBox1.BackColor = Color.Green
  2973. End If
  2974. End If
  2975. End If
  2976. ElseIf secondoR = 3 Then
  2977. If CheckBox3.Checked Then
  2978. If terzoR = 0 Then
  2979. If CheckBox10.Checked Then
  2980. TextBox1.BackColor = Color.Green
  2981. End If
  2982.  
  2983. ElseIf terzoR = 1 Then
  2984. If CheckBox1.Checked Then
  2985. TextBox1.BackColor = Color.Green
  2986. End If
  2987. ElseIf terzoR = 2 Then
  2988. If CheckBox2.Checked Then
  2989. TextBox1.BackColor = Color.Green
  2990. End If
  2991. ElseIf terzoR = 3 Then
  2992. If CheckBox3.Checked Then
  2993. TextBox1.BackColor = Color.Green
  2994. End If
  2995. ElseIf terzoR = 4 Then
  2996. If CheckBox4.Checked Then
  2997. TextBox1.BackColor = Color.Green
  2998. End If
  2999. ElseIf terzoR = 5 Then
  3000. If CheckBox5.Checked Then
  3001. TextBox1.BackColor = Color.Green
  3002. End If
  3003. ElseIf terzoR = 6 Then
  3004. If CheckBox6.Checked Then
  3005. TextBox1.BackColor = Color.Green
  3006. End If
  3007. ElseIf terzoR = 7 Then
  3008. If CheckBox7.Checked Then
  3009. TextBox1.BackColor = Color.Green
  3010. End If
  3011. ElseIf terzoR = 8 Then
  3012. If CheckBox8.Checked Then
  3013. TextBox1.BackColor = Color.Green
  3014. End If
  3015. ElseIf terzoR = 9 Then
  3016. If CheckBox9.Checked Then
  3017. TextBox1.BackColor = Color.Green
  3018. End If
  3019. End If
  3020. End If
  3021. ElseIf secondoR = 4 Then
  3022. If CheckBox4.Checked Then
  3023. If terzoR = 0 Then
  3024. If CheckBox10.Checked Then
  3025. TextBox1.BackColor = Color.Green
  3026. End If
  3027.  
  3028. ElseIf terzoR = 1 Then
  3029. If CheckBox1.Checked Then
  3030. TextBox1.BackColor = Color.Green
  3031. End If
  3032. ElseIf terzoR = 2 Then
  3033. If CheckBox2.Checked Then
  3034. TextBox1.BackColor = Color.Green
  3035. End If
  3036. ElseIf terzoR = 3 Then
  3037. If CheckBox3.Checked Then
  3038. TextBox1.BackColor = Color.Green
  3039. End If
  3040. ElseIf terzoR = 4 Then
  3041. If CheckBox4.Checked Then
  3042. TextBox1.BackColor = Color.Green
  3043. End If
  3044. ElseIf terzoR = 5 Then
  3045. If CheckBox5.Checked Then
  3046. TextBox1.BackColor = Color.Green
  3047. End If
  3048. ElseIf terzoR = 6 Then
  3049. If CheckBox6.Checked Then
  3050. TextBox1.BackColor = Color.Green
  3051. End If
  3052. ElseIf terzoR = 7 Then
  3053. If CheckBox7.Checked Then
  3054. TextBox1.BackColor = Color.Green
  3055. End If
  3056. ElseIf terzoR = 8 Then
  3057. If CheckBox8.Checked Then
  3058. TextBox1.BackColor = Color.Green
  3059. End If
  3060. ElseIf terzoR = 9 Then
  3061. If CheckBox9.Checked Then
  3062. TextBox1.BackColor = Color.Green
  3063. End If
  3064. End If
  3065. End If
  3066. ElseIf secondoR = 5 Then
  3067. If CheckBox5.Checked Then
  3068. If terzoR = 0 Then
  3069. If CheckBox10.Checked Then
  3070. TextBox1.BackColor = Color.Green
  3071. End If
  3072.  
  3073. ElseIf terzoR = 1 Then
  3074. If CheckBox1.Checked Then
  3075. TextBox1.BackColor = Color.Green
  3076. End If
  3077. ElseIf terzoR = 2 Then
  3078. If CheckBox2.Checked Then
  3079. TextBox1.BackColor = Color.Green
  3080. End If
  3081. ElseIf terzoR = 3 Then
  3082. If CheckBox3.Checked Then
  3083. TextBox1.BackColor = Color.Green
  3084. End If
  3085. ElseIf terzoR = 4 Then
  3086. If CheckBox4.Checked Then
  3087. TextBox1.BackColor = Color.Green
  3088. End If
  3089. ElseIf terzoR = 5 Then
  3090. If CheckBox5.Checked Then
  3091. TextBox1.BackColor = Color.Green
  3092. End If
  3093. ElseIf terzoR = 6 Then
  3094. If CheckBox6.Checked Then
  3095. TextBox1.BackColor = Color.Green
  3096. End If
  3097. ElseIf terzoR = 7 Then
  3098. If CheckBox7.Checked Then
  3099. TextBox1.BackColor = Color.Green
  3100. End If
  3101. ElseIf terzoR = 8 Then
  3102. If CheckBox8.Checked Then
  3103. TextBox1.BackColor = Color.Green
  3104. End If
  3105. ElseIf terzoR = 9 Then
  3106. If CheckBox9.Checked Then
  3107. TextBox1.BackColor = Color.Green
  3108. End If
  3109. End If
  3110. End If
  3111. ElseIf secondoR = 6 Then
  3112. If CheckBox6.Checked Then
  3113. If terzoR = 0 Then
  3114. If CheckBox10.Checked Then
  3115. TextBox1.BackColor = Color.Green
  3116. End If
  3117.  
  3118. ElseIf terzoR = 1 Then
  3119. If CheckBox1.Checked Then
  3120. TextBox1.BackColor = Color.Green
  3121. End If
  3122. ElseIf terzoR = 2 Then
  3123. If CheckBox2.Checked Then
  3124. TextBox1.BackColor = Color.Green
  3125. End If
  3126. ElseIf terzoR = 3 Then
  3127. If CheckBox3.Checked Then
  3128. TextBox1.BackColor = Color.Green
  3129. End If
  3130. ElseIf terzoR = 4 Then
  3131. If CheckBox4.Checked Then
  3132. TextBox1.BackColor = Color.Green
  3133. End If
  3134. ElseIf terzoR = 5 Then
  3135. If CheckBox5.Checked Then
  3136. TextBox1.BackColor = Color.Green
  3137. End If
  3138. ElseIf terzoR = 6 Then
  3139. If CheckBox6.Checked Then
  3140. TextBox1.BackColor = Color.Green
  3141. End If
  3142. ElseIf terzoR = 7 Then
  3143. If CheckBox7.Checked Then
  3144. TextBox1.BackColor = Color.Green
  3145. End If
  3146. ElseIf terzoR = 8 Then
  3147. If CheckBox8.Checked Then
  3148. TextBox1.BackColor = Color.Green
  3149. End If
  3150. ElseIf terzoR = 9 Then
  3151. If CheckBox9.Checked Then
  3152. TextBox1.BackColor = Color.Green
  3153. End If
  3154. End If
  3155. End If
  3156. ElseIf secondoR = 7 Then
  3157. If CheckBox7.Checked Then
  3158. If terzoR = 0 Then
  3159. If CheckBox10.Checked Then
  3160. TextBox1.BackColor = Color.Green
  3161. End If
  3162.  
  3163. ElseIf terzoR = 1 Then
  3164. If CheckBox1.Checked Then
  3165. TextBox1.BackColor = Color.Green
  3166. End If
  3167. ElseIf terzoR = 2 Then
  3168. If CheckBox2.Checked Then
  3169. TextBox1.BackColor = Color.Green
  3170. End If
  3171. ElseIf terzoR = 3 Then
  3172. If CheckBox3.Checked Then
  3173. TextBox1.BackColor = Color.Green
  3174. End If
  3175. ElseIf terzoR = 4 Then
  3176. If CheckBox4.Checked Then
  3177. TextBox1.BackColor = Color.Green
  3178. End If
  3179. ElseIf terzoR = 5 Then
  3180. If CheckBox5.Checked Then
  3181. TextBox1.BackColor = Color.Green
  3182. End If
  3183. ElseIf terzoR = 6 Then
  3184. If CheckBox6.Checked Then
  3185. TextBox1.BackColor = Color.Green
  3186. End If
  3187. ElseIf terzoR = 7 Then
  3188. If CheckBox7.Checked Then
  3189. TextBox1.BackColor = Color.Green
  3190. End If
  3191. ElseIf terzoR = 8 Then
  3192. If CheckBox8.Checked Then
  3193. TextBox1.BackColor = Color.Green
  3194. End If
  3195. ElseIf terzoR = 9 Then
  3196. If CheckBox9.Checked Then
  3197. TextBox1.BackColor = Color.Green
  3198. End If
  3199. End If
  3200. End If
  3201. ElseIf secondoR = 8 Then
  3202. If CheckBox8.Checked Then
  3203. If terzoR = 0 Then
  3204. If CheckBox10.Checked Then
  3205. TextBox1.BackColor = Color.Green
  3206. End If
  3207.  
  3208. ElseIf terzoR = 1 Then
  3209. If CheckBox1.Checked Then
  3210. TextBox1.BackColor = Color.Green
  3211. End If
  3212. ElseIf terzoR = 2 Then
  3213. If CheckBox2.Checked Then
  3214. TextBox1.BackColor = Color.Green
  3215. End If
  3216. ElseIf terzoR = 3 Then
  3217. If CheckBox3.Checked Then
  3218. TextBox1.BackColor = Color.Green
  3219. End If
  3220. ElseIf terzoR = 4 Then
  3221. If CheckBox4.Checked Then
  3222. TextBox1.BackColor = Color.Green
  3223. End If
  3224. ElseIf terzoR = 5 Then
  3225. If CheckBox5.Checked Then
  3226. TextBox1.BackColor = Color.Green
  3227. End If
  3228. ElseIf terzoR = 6 Then
  3229. If CheckBox6.Checked Then
  3230. TextBox1.BackColor = Color.Green
  3231. End If
  3232. ElseIf terzoR = 7 Then
  3233. If CheckBox7.Checked Then
  3234. TextBox1.BackColor = Color.Green
  3235. End If
  3236. ElseIf terzoR = 8 Then
  3237. If CheckBox8.Checked Then
  3238. TextBox1.BackColor = Color.Green
  3239. End If
  3240. ElseIf terzoR = 9 Then
  3241. If CheckBox9.Checked Then
  3242. TextBox1.BackColor = Color.Green
  3243. End If
  3244. End If
  3245. End If
  3246. ElseIf secondoR = 9 Then
  3247. If CheckBox9.Checked Then
  3248. If terzoR = 0 Then
  3249. If CheckBox10.Checked Then
  3250. TextBox1.BackColor = Color.Green
  3251. End If
  3252.  
  3253. ElseIf terzoR = 1 Then
  3254. If CheckBox1.Checked Then
  3255. TextBox1.BackColor = Color.Green
  3256. End If
  3257. ElseIf terzoR = 2 Then
  3258. If CheckBox2.Checked Then
  3259. TextBox1.BackColor = Color.Green
  3260. End If
  3261. ElseIf terzoR = 3 Then
  3262. If CheckBox3.Checked Then
  3263. TextBox1.BackColor = Color.Green
  3264. End If
  3265. ElseIf terzoR = 4 Then
  3266. If CheckBox4.Checked Then
  3267. TextBox1.BackColor = Color.Green
  3268. End If
  3269. ElseIf terzoR = 5 Then
  3270. If CheckBox5.Checked Then
  3271. TextBox1.BackColor = Color.Green
  3272. End If
  3273. ElseIf terzoR = 6 Then
  3274. If CheckBox6.Checked Then
  3275. TextBox1.BackColor = Color.Green
  3276. End If
  3277. ElseIf terzoR = 7 Then
  3278. If CheckBox7.Checked Then
  3279. TextBox1.BackColor = Color.Green
  3280. End If
  3281. ElseIf terzoR = 8 Then
  3282. If CheckBox8.Checked Then
  3283. TextBox1.BackColor = Color.Green
  3284. End If
  3285. ElseIf terzoR = 9 Then
  3286. If CheckBox9.Checked Then
  3287. TextBox1.BackColor = Color.Green
  3288. End If
  3289. End If
  3290. End If
  3291. Else
  3292. TextBox1.BackColor = Color.Black
  3293. End If
  3294. Else
  3295. TextBox1.BackColor = Color.Black
  3296. End If
  3297. ElseIf primoR = 8 Then
  3298. If CheckBox8.Checked Then
  3299. If secondoR = 1 Then
  3300. If CheckBox1.Checked Then
  3301. If terzoR = 2 Then
  3302. If CheckBox2.Checked Then
  3303. TextBox1.BackColor = Color.Green
  3304. End If
  3305. ElseIf terzoR = 3 Then
  3306. If CheckBox3.Checked Then
  3307. TextBox1.BackColor = Color.Green
  3308. End If
  3309. ElseIf terzoR = 4 Then
  3310. If CheckBox4.Checked Then
  3311. TextBox1.BackColor = Color.Green
  3312. End If
  3313. ElseIf terzoR = 5 Then
  3314. If CheckBox5.Checked Then
  3315. TextBox1.BackColor = Color.Green
  3316. End If
  3317. ElseIf terzoR = 6 Then
  3318. If CheckBox6.Checked Then
  3319. TextBox1.BackColor = Color.Green
  3320. End If
  3321. ElseIf terzoR = 7 Then
  3322. If CheckBox7.Checked Then
  3323. TextBox1.BackColor = Color.Green
  3324. End If
  3325. ElseIf terzoR = 8 Then
  3326. If CheckBox8.Checked Then
  3327. TextBox1.BackColor = Color.Green
  3328. End If
  3329. ElseIf terzoR = 9 Then
  3330. If CheckBox9.Checked Then
  3331. TextBox1.BackColor = Color.Green
  3332. End If
  3333. ElseIf terzoR = 1 Then
  3334. If CheckBox1.Checked Then
  3335. TextBox1.BackColor = Color.Green
  3336. End If
  3337. ElseIf terzoR = 0 Then
  3338. If CheckBox10.Checked Then
  3339. TextBox1.BackColor = Color.Green
  3340. End If
  3341. End If
  3342. End If
  3343. ElseIf secondoR = 2 Then
  3344. If CheckBox2.Checked Then
  3345. If terzoR = 1 Then
  3346. If CheckBox1.Checked Then
  3347. TextBox1.BackColor = Color.Green
  3348. End If
  3349. ElseIf terzoR = 2 Then
  3350. If CheckBox2.Checked Then
  3351. TextBox1.BackColor = Color.Green
  3352. End If
  3353. ElseIf terzoR = 3 Then
  3354. If CheckBox3.Checked Then
  3355. TextBox1.BackColor = Color.Green
  3356. End If
  3357. ElseIf terzoR = 4 Then
  3358. If CheckBox4.Checked Then
  3359. TextBox1.BackColor = Color.Green
  3360. End If
  3361. ElseIf terzoR = 5 Then
  3362. If CheckBox5.Checked Then
  3363. TextBox1.BackColor = Color.Green
  3364. End If
  3365. ElseIf terzoR = 6 Then
  3366. If CheckBox6.Checked Then
  3367. TextBox1.BackColor = Color.Green
  3368.  
  3369. End If
  3370. ElseIf terzoR = 7 Then
  3371. If CheckBox7.Checked Then
  3372. TextBox1.BackColor = Color.Green
  3373. End If
  3374. ElseIf terzoR = 8 Then
  3375. If CheckBox8.Checked Then
  3376. TextBox1.BackColor = Color.Green
  3377. End If
  3378. ElseIf terzoR = 9 Then
  3379. If CheckBox9.Checked Then
  3380. TextBox1.BackColor = Color.Green
  3381. End If
  3382. ElseIf terzoR = 0 Then
  3383. If CheckBox10.Checked Then
  3384. TextBox1.BackColor = Color.Green
  3385. End If
  3386. End If
  3387. End If
  3388. ElseIf secondoR = 3 Then
  3389. If CheckBox3.Checked Then
  3390. If terzoR = 0 Then
  3391. If CheckBox10.Checked Then
  3392. TextBox1.BackColor = Color.Green
  3393. End If
  3394.  
  3395. ElseIf terzoR = 1 Then
  3396. If CheckBox1.Checked Then
  3397. TextBox1.BackColor = Color.Green
  3398. End If
  3399. ElseIf terzoR = 2 Then
  3400. If CheckBox2.Checked Then
  3401. TextBox1.BackColor = Color.Green
  3402. End If
  3403. ElseIf terzoR = 3 Then
  3404. If CheckBox3.Checked Then
  3405. TextBox1.BackColor = Color.Green
  3406. End If
  3407. ElseIf terzoR = 4 Then
  3408. If CheckBox4.Checked Then
  3409. TextBox1.BackColor = Color.Green
  3410. End If
  3411. ElseIf terzoR = 5 Then
  3412. If CheckBox5.Checked Then
  3413. TextBox1.BackColor = Color.Green
  3414. End If
  3415. ElseIf terzoR = 6 Then
  3416. If CheckBox6.Checked Then
  3417. TextBox1.BackColor = Color.Green
  3418. End If
  3419. ElseIf terzoR = 7 Then
  3420. If CheckBox7.Checked Then
  3421. TextBox1.BackColor = Color.Green
  3422. End If
  3423. ElseIf terzoR = 8 Then
  3424. If CheckBox8.Checked Then
  3425. TextBox1.BackColor = Color.Green
  3426. End If
  3427. ElseIf terzoR = 9 Then
  3428. If CheckBox9.Checked Then
  3429. TextBox1.BackColor = Color.Green
  3430. End If
  3431. End If
  3432. End If
  3433. ElseIf secondoR = 4 Then
  3434. If CheckBox4.Checked Then
  3435. If terzoR = 0 Then
  3436. If CheckBox10.Checked Then
  3437. TextBox1.BackColor = Color.Green
  3438. End If
  3439.  
  3440. ElseIf terzoR = 1 Then
  3441. If CheckBox1.Checked Then
  3442. TextBox1.BackColor = Color.Green
  3443. End If
  3444. ElseIf terzoR = 2 Then
  3445. If CheckBox2.Checked Then
  3446. TextBox1.BackColor = Color.Green
  3447. End If
  3448. ElseIf terzoR = 3 Then
  3449. If CheckBox3.Checked Then
  3450. TextBox1.BackColor = Color.Green
  3451. End If
  3452. ElseIf terzoR = 4 Then
  3453. If CheckBox4.Checked Then
  3454. TextBox1.BackColor = Color.Green
  3455. End If
  3456. ElseIf terzoR = 5 Then
  3457. If CheckBox5.Checked Then
  3458. TextBox1.BackColor = Color.Green
  3459. End If
  3460. ElseIf terzoR = 6 Then
  3461. If CheckBox6.Checked Then
  3462. TextBox1.BackColor = Color.Green
  3463. End If
  3464. ElseIf terzoR = 7 Then
  3465. If CheckBox7.Checked Then
  3466. TextBox1.BackColor = Color.Green
  3467. End If
  3468. ElseIf terzoR = 8 Then
  3469. If CheckBox8.Checked Then
  3470. TextBox1.BackColor = Color.Green
  3471. End If
  3472. ElseIf terzoR = 9 Then
  3473. If CheckBox9.Checked Then
  3474. TextBox1.BackColor = Color.Green
  3475. End If
  3476. End If
  3477. End If
  3478. ElseIf secondoR = 5 Then
  3479. If CheckBox5.Checked Then
  3480. If terzoR = 0 Then
  3481. If CheckBox10.Checked Then
  3482. TextBox1.BackColor = Color.Green
  3483. End If
  3484.  
  3485. ElseIf terzoR = 1 Then
  3486. If CheckBox1.Checked Then
  3487. TextBox1.BackColor = Color.Green
  3488. End If
  3489. ElseIf terzoR = 2 Then
  3490. If CheckBox2.Checked Then
  3491. TextBox1.BackColor = Color.Green
  3492. End If
  3493. ElseIf terzoR = 3 Then
  3494. If CheckBox3.Checked Then
  3495. TextBox1.BackColor = Color.Green
  3496. End If
  3497. ElseIf terzoR = 4 Then
  3498. If CheckBox4.Checked Then
  3499. TextBox1.BackColor = Color.Green
  3500. End If
  3501. ElseIf terzoR = 5 Then
  3502. If CheckBox5.Checked Then
  3503. TextBox1.BackColor = Color.Green
  3504. End If
  3505. ElseIf terzoR = 6 Then
  3506. If CheckBox6.Checked Then
  3507. TextBox1.BackColor = Color.Green
  3508. End If
  3509. ElseIf terzoR = 7 Then
  3510. If CheckBox7.Checked Then
  3511. TextBox1.BackColor = Color.Green
  3512. End If
  3513. ElseIf terzoR = 8 Then
  3514. If CheckBox8.Checked Then
  3515. TextBox1.BackColor = Color.Green
  3516. End If
  3517. ElseIf terzoR = 9 Then
  3518. If CheckBox9.Checked Then
  3519. TextBox1.BackColor = Color.Green
  3520. End If
  3521. End If
  3522. End If
  3523. ElseIf secondoR = 6 Then
  3524. If CheckBox6.Checked Then
  3525. If terzoR = 0 Then
  3526. If CheckBox10.Checked Then
  3527. TextBox1.BackColor = Color.Green
  3528. End If
  3529.  
  3530. ElseIf terzoR = 1 Then
  3531. If CheckBox1.Checked Then
  3532. TextBox1.BackColor = Color.Green
  3533. End If
  3534. ElseIf terzoR = 2 Then
  3535. If CheckBox2.Checked Then
  3536. TextBox1.BackColor = Color.Green
  3537. End If
  3538. ElseIf terzoR = 3 Then
  3539. If CheckBox3.Checked Then
  3540. TextBox1.BackColor = Color.Green
  3541. End If
  3542. ElseIf terzoR = 4 Then
  3543. If CheckBox4.Checked Then
  3544. TextBox1.BackColor = Color.Green
  3545. End If
  3546. ElseIf terzoR = 5 Then
  3547. If CheckBox5.Checked Then
  3548. TextBox1.BackColor = Color.Green
  3549. End If
  3550. ElseIf terzoR = 6 Then
  3551. If CheckBox6.Checked Then
  3552. TextBox1.BackColor = Color.Green
  3553. End If
  3554. ElseIf terzoR = 7 Then
  3555. If CheckBox7.Checked Then
  3556. TextBox1.BackColor = Color.Green
  3557. End If
  3558. ElseIf terzoR = 8 Then
  3559. If CheckBox8.Checked Then
  3560. TextBox1.BackColor = Color.Green
  3561. End If
  3562. ElseIf terzoR = 9 Then
  3563. If CheckBox9.Checked Then
  3564. TextBox1.BackColor = Color.Green
  3565. End If
  3566. End If
  3567. End If
  3568. ElseIf secondoR = 7 Then
  3569. If CheckBox7.Checked Then
  3570. If terzoR = 0 Then
  3571. If CheckBox10.Checked Then
  3572. TextBox1.BackColor = Color.Green
  3573. End If
  3574.  
  3575. ElseIf terzoR = 1 Then
  3576. If CheckBox1.Checked Then
  3577. TextBox1.BackColor = Color.Green
  3578. End If
  3579. ElseIf terzoR = 2 Then
  3580. If CheckBox2.Checked Then
  3581. TextBox1.BackColor = Color.Green
  3582. End If
  3583. ElseIf terzoR = 3 Then
  3584. If CheckBox3.Checked Then
  3585. TextBox1.BackColor = Color.Green
  3586. End If
  3587. ElseIf terzoR = 4 Then
  3588. If CheckBox4.Checked Then
  3589. TextBox1.BackColor = Color.Green
  3590. End If
  3591. ElseIf terzoR = 5 Then
  3592. If CheckBox5.Checked Then
  3593. TextBox1.BackColor = Color.Green
  3594. End If
  3595. ElseIf terzoR = 6 Then
  3596. If CheckBox6.Checked Then
  3597. TextBox1.BackColor = Color.Green
  3598. End If
  3599. ElseIf terzoR = 7 Then
  3600. If CheckBox7.Checked Then
  3601. TextBox1.BackColor = Color.Green
  3602. End If
  3603. ElseIf terzoR = 8 Then
  3604. If CheckBox8.Checked Then
  3605. TextBox1.BackColor = Color.Green
  3606. End If
  3607. ElseIf terzoR = 9 Then
  3608. If CheckBox9.Checked Then
  3609. TextBox1.BackColor = Color.Green
  3610. End If
  3611. End If
  3612. End If
  3613. ElseIf secondoR = 8 Then
  3614. If CheckBox8.Checked Then
  3615. If terzoR = 0 Then
  3616. If CheckBox10.Checked Then
  3617. TextBox1.BackColor = Color.Green
  3618. End If
  3619.  
  3620. ElseIf terzoR = 1 Then
  3621. If CheckBox1.Checked Then
  3622. TextBox1.BackColor = Color.Green
  3623. End If
  3624. ElseIf terzoR = 2 Then
  3625. If CheckBox2.Checked Then
  3626. TextBox1.BackColor = Color.Green
  3627. End If
  3628. ElseIf terzoR = 3 Then
  3629. If CheckBox3.Checked Then
  3630. TextBox1.BackColor = Color.Green
  3631. End If
  3632. ElseIf terzoR = 4 Then
  3633. If CheckBox4.Checked Then
  3634. TextBox1.BackColor = Color.Green
  3635. End If
  3636. ElseIf terzoR = 5 Then
  3637. If CheckBox5.Checked Then
  3638. TextBox1.BackColor = Color.Green
  3639. End If
  3640. ElseIf terzoR = 6 Then
  3641. If CheckBox6.Checked Then
  3642. TextBox1.BackColor = Color.Green
  3643. End If
  3644. ElseIf terzoR = 7 Then
  3645. If CheckBox7.Checked Then
  3646. TextBox1.BackColor = Color.Green
  3647. End If
  3648. ElseIf terzoR = 8 Then
  3649. If CheckBox8.Checked Then
  3650. TextBox1.BackColor = Color.Green
  3651. End If
  3652. ElseIf terzoR = 9 Then
  3653. If CheckBox9.Checked Then
  3654. TextBox1.BackColor = Color.Green
  3655. End If
  3656. End If
  3657. End If
  3658. ElseIf secondoR = 9 Then
  3659. If CheckBox9.Checked Then
  3660. If terzoR = 0 Then
  3661. If CheckBox10.Checked Then
  3662. TextBox1.BackColor = Color.Green
  3663. End If
  3664.  
  3665. ElseIf terzoR = 1 Then
  3666. If CheckBox1.Checked Then
  3667. TextBox1.BackColor = Color.Green
  3668. End If
  3669. ElseIf terzoR = 2 Then
  3670. If CheckBox2.Checked Then
  3671. TextBox1.BackColor = Color.Green
  3672. End If
  3673. ElseIf terzoR = 3 Then
  3674. If CheckBox3.Checked Then
  3675. TextBox1.BackColor = Color.Green
  3676. End If
  3677. ElseIf terzoR = 4 Then
  3678. If CheckBox4.Checked Then
  3679. TextBox1.BackColor = Color.Green
  3680. End If
  3681. ElseIf terzoR = 5 Then
  3682. If CheckBox5.Checked Then
  3683. TextBox1.BackColor = Color.Green
  3684. End If
  3685. ElseIf terzoR = 6 Then
  3686. If CheckBox6.Checked Then
  3687. TextBox1.BackColor = Color.Green
  3688. End If
  3689. ElseIf terzoR = 7 Then
  3690. If CheckBox7.Checked Then
  3691. TextBox1.BackColor = Color.Green
  3692. End If
  3693. ElseIf terzoR = 8 Then
  3694. If CheckBox8.Checked Then
  3695. TextBox1.BackColor = Color.Green
  3696. End If
  3697. ElseIf terzoR = 9 Then
  3698. If CheckBox9.Checked Then
  3699. TextBox1.BackColor = Color.Green
  3700. End If
  3701. End If
  3702. End If
  3703. Else
  3704. TextBox1.BackColor = Color.Black
  3705. End If
  3706. Else
  3707. TextBox1.BackColor = Color.Black
  3708. End If
  3709. ElseIf primoR = 9 Then
  3710. If CheckBox9.Checked Then
  3711. If secondoR = 1 Then
  3712. If CheckBox1.Checked Then
  3713. If terzoR = 2 Then
  3714. If CheckBox2.Checked Then
  3715. TextBox1.BackColor = Color.Green
  3716. End If
  3717. ElseIf terzoR = 3 Then
  3718. If CheckBox3.Checked Then
  3719. TextBox1.BackColor = Color.Green
  3720. End If
  3721. ElseIf terzoR = 4 Then
  3722. If CheckBox4.Checked Then
  3723. TextBox1.BackColor = Color.Green
  3724. End If
  3725. ElseIf terzoR = 5 Then
  3726. If CheckBox5.Checked Then
  3727. TextBox1.BackColor = Color.Green
  3728. End If
  3729. ElseIf terzoR = 6 Then
  3730. If CheckBox6.Checked Then
  3731. TextBox1.BackColor = Color.Green
  3732. End If
  3733. ElseIf terzoR = 7 Then
  3734. If CheckBox7.Checked Then
  3735. TextBox1.BackColor = Color.Green
  3736. End If
  3737. ElseIf terzoR = 8 Then
  3738. If CheckBox8.Checked Then
  3739. TextBox1.BackColor = Color.Green
  3740. End If
  3741. ElseIf terzoR = 9 Then
  3742. If CheckBox9.Checked Then
  3743. TextBox1.BackColor = Color.Green
  3744. End If
  3745. ElseIf terzoR = 1 Then
  3746. If CheckBox1.Checked Then
  3747. TextBox1.BackColor = Color.Green
  3748. End If
  3749. ElseIf terzoR = 0 Then
  3750. If CheckBox10.Checked Then
  3751. TextBox1.BackColor = Color.Green
  3752. End If
  3753. End If
  3754. End If
  3755. ElseIf secondoR = 2 Then
  3756. If CheckBox2.Checked Then
  3757. If terzoR = 1 Then
  3758. If CheckBox1.Checked Then
  3759. TextBox1.BackColor = Color.Green
  3760. End If
  3761. ElseIf terzoR = 2 Then
  3762. If CheckBox2.Checked Then
  3763. TextBox1.BackColor = Color.Green
  3764. End If
  3765. ElseIf terzoR = 3 Then
  3766. If CheckBox3.Checked Then
  3767. TextBox1.BackColor = Color.Green
  3768. End If
  3769. ElseIf terzoR = 4 Then
  3770. If CheckBox4.Checked Then
  3771. TextBox1.BackColor = Color.Green
  3772. End If
  3773. ElseIf terzoR = 5 Then
  3774. If CheckBox5.Checked Then
  3775. TextBox1.BackColor = Color.Green
  3776. End If
  3777. ElseIf terzoR = 6 Then
  3778. If CheckBox6.Checked Then
  3779. TextBox1.BackColor = Color.Green
  3780.  
  3781. End If
  3782. ElseIf terzoR = 7 Then
  3783. If CheckBox7.Checked Then
  3784. TextBox1.BackColor = Color.Green
  3785. End If
  3786. ElseIf terzoR = 8 Then
  3787. If CheckBox8.Checked Then
  3788. TextBox1.BackColor = Color.Green
  3789. End If
  3790. ElseIf terzoR = 9 Then
  3791. If CheckBox9.Checked Then
  3792. TextBox1.BackColor = Color.Green
  3793. End If
  3794. ElseIf terzoR = 0 Then
  3795. If CheckBox10.Checked Then
  3796. TextBox1.BackColor = Color.Green
  3797. End If
  3798. End If
  3799. End If
  3800. ElseIf secondoR = 3 Then
  3801. If CheckBox3.Checked Then
  3802. If terzoR = 0 Then
  3803. If CheckBox10.Checked Then
  3804. TextBox1.BackColor = Color.Green
  3805. End If
  3806.  
  3807. ElseIf terzoR = 1 Then
  3808. If CheckBox1.Checked Then
  3809. TextBox1.BackColor = Color.Green
  3810. End If
  3811. ElseIf terzoR = 2 Then
  3812. If CheckBox2.Checked Then
  3813. TextBox1.BackColor = Color.Green
  3814. End If
  3815. ElseIf terzoR = 3 Then
  3816. If CheckBox3.Checked Then
  3817. TextBox1.BackColor = Color.Green
  3818. End If
  3819. ElseIf terzoR = 4 Then
  3820. If CheckBox4.Checked Then
  3821. TextBox1.BackColor = Color.Green
  3822. End If
  3823. ElseIf terzoR = 5 Then
  3824. If CheckBox5.Checked Then
  3825. TextBox1.BackColor = Color.Green
  3826. End If
  3827. ElseIf terzoR = 6 Then
  3828. If CheckBox6.Checked Then
  3829. TextBox1.BackColor = Color.Green
  3830. End If
  3831. ElseIf terzoR = 7 Then
  3832. If CheckBox7.Checked Then
  3833. TextBox1.BackColor = Color.Green
  3834. End If
  3835. ElseIf terzoR = 8 Then
  3836. If CheckBox8.Checked Then
  3837. TextBox1.BackColor = Color.Green
  3838. End If
  3839. ElseIf terzoR = 9 Then
  3840. If CheckBox9.Checked Then
  3841. TextBox1.BackColor = Color.Green
  3842. End If
  3843. End If
  3844. End If
  3845. ElseIf secondoR = 4 Then
  3846. If CheckBox4.Checked Then
  3847. If terzoR = 0 Then
  3848. If CheckBox10.Checked Then
  3849. TextBox1.BackColor = Color.Green
  3850. End If
  3851.  
  3852. ElseIf terzoR = 1 Then
  3853. If CheckBox1.Checked Then
  3854. TextBox1.BackColor = Color.Green
  3855. End If
  3856. ElseIf terzoR = 2 Then
  3857. If CheckBox2.Checked Then
  3858. TextBox1.BackColor = Color.Green
  3859. End If
  3860. ElseIf terzoR = 3 Then
  3861. If CheckBox3.Checked Then
  3862. TextBox1.BackColor = Color.Green
  3863. End If
  3864. ElseIf terzoR = 4 Then
  3865. If CheckBox4.Checked Then
  3866. TextBox1.BackColor = Color.Green
  3867. End If
  3868. ElseIf terzoR = 5 Then
  3869. If CheckBox5.Checked Then
  3870. TextBox1.BackColor = Color.Green
  3871. End If
  3872. ElseIf terzoR = 6 Then
  3873. If CheckBox6.Checked Then
  3874. TextBox1.BackColor = Color.Green
  3875. End If
  3876. ElseIf terzoR = 7 Then
  3877. If CheckBox7.Checked Then
  3878. TextBox1.BackColor = Color.Green
  3879. End If
  3880. ElseIf terzoR = 8 Then
  3881. If CheckBox8.Checked Then
  3882. TextBox1.BackColor = Color.Green
  3883. End If
  3884. ElseIf terzoR = 9 Then
  3885. If CheckBox9.Checked Then
  3886. TextBox1.BackColor = Color.Green
  3887. End If
  3888. End If
  3889. End If
  3890. ElseIf secondoR = 5 Then
  3891. If CheckBox5.Checked Then
  3892. If terzoR = 0 Then
  3893. If CheckBox10.Checked Then
  3894. TextBox1.BackColor = Color.Green
  3895. End If
  3896.  
  3897. ElseIf terzoR = 1 Then
  3898. If CheckBox1.Checked Then
  3899. TextBox1.BackColor = Color.Green
  3900. End If
  3901. ElseIf terzoR = 2 Then
  3902. If CheckBox2.Checked Then
  3903. TextBox1.BackColor = Color.Green
  3904. End If
  3905. ElseIf terzoR = 3 Then
  3906. If CheckBox3.Checked Then
  3907. TextBox1.BackColor = Color.Green
  3908. End If
  3909. ElseIf terzoR = 4 Then
  3910. If CheckBox4.Checked Then
  3911. TextBox1.BackColor = Color.Green
  3912. End If
  3913. ElseIf terzoR = 5 Then
  3914. If CheckBox5.Checked Then
  3915. TextBox1.BackColor = Color.Green
  3916. End If
  3917. ElseIf terzoR = 6 Then
  3918. If CheckBox6.Checked Then
  3919. TextBox1.BackColor = Color.Green
  3920. End If
  3921. ElseIf terzoR = 7 Then
  3922. If CheckBox7.Checked Then
  3923. TextBox1.BackColor = Color.Green
  3924. End If
  3925. ElseIf terzoR = 8 Then
  3926. If CheckBox8.Checked Then
  3927. TextBox1.BackColor = Color.Green
  3928. End If
  3929. ElseIf terzoR = 9 Then
  3930. If CheckBox9.Checked Then
  3931. TextBox1.BackColor = Color.Green
  3932. End If
  3933. End If
  3934. End If
  3935. ElseIf secondoR = 6 Then
  3936. If CheckBox6.Checked Then
  3937. If terzoR = 0 Then
  3938. If CheckBox10.Checked Then
  3939. TextBox1.BackColor = Color.Green
  3940. End If
  3941.  
  3942. ElseIf terzoR = 1 Then
  3943. If CheckBox1.Checked Then
  3944. TextBox1.BackColor = Color.Green
  3945. End If
  3946. ElseIf terzoR = 2 Then
  3947. If CheckBox2.Checked Then
  3948. TextBox1.BackColor = Color.Green
  3949. End If
  3950. ElseIf terzoR = 3 Then
  3951. If CheckBox3.Checked Then
  3952. TextBox1.BackColor = Color.Green
  3953. End If
  3954. ElseIf terzoR = 4 Then
  3955. If CheckBox4.Checked Then
  3956. TextBox1.BackColor = Color.Green
  3957. End If
  3958. ElseIf terzoR = 5 Then
  3959. If CheckBox5.Checked Then
  3960. TextBox1.BackColor = Color.Green
  3961. End If
  3962. ElseIf terzoR = 6 Then
  3963. If CheckBox6.Checked Then
  3964. TextBox1.BackColor = Color.Green
  3965. End If
  3966. ElseIf terzoR = 7 Then
  3967. If CheckBox7.Checked Then
  3968. TextBox1.BackColor = Color.Green
  3969. End If
  3970. ElseIf terzoR = 8 Then
  3971. If CheckBox8.Checked Then
  3972. TextBox1.BackColor = Color.Green
  3973. End If
  3974. ElseIf terzoR = 9 Then
  3975. If CheckBox9.Checked Then
  3976. TextBox1.BackColor = Color.Green
  3977. End If
  3978. End If
  3979. End If
  3980. ElseIf secondoR = 7 Then
  3981. If CheckBox7.Checked Then
  3982. If terzoR = 0 Then
  3983. If CheckBox10.Checked Then
  3984. TextBox1.BackColor = Color.Green
  3985. End If
  3986.  
  3987. ElseIf terzoR = 1 Then
  3988. If CheckBox1.Checked Then
  3989. TextBox1.BackColor = Color.Green
  3990. End If
  3991. ElseIf terzoR = 2 Then
  3992. If CheckBox2.Checked Then
  3993. TextBox1.BackColor = Color.Green
  3994. End If
  3995. ElseIf terzoR = 3 Then
  3996. If CheckBox3.Checked Then
  3997. TextBox1.BackColor = Color.Green
  3998. End If
  3999. ElseIf terzoR = 4 Then
  4000. If CheckBox4.Checked Then
  4001. TextBox1.BackColor = Color.Green
  4002. End If
  4003. ElseIf terzoR = 5 Then
  4004. If CheckBox5.Checked Then
  4005. TextBox1.BackColor = Color.Green
  4006. End If
  4007. ElseIf terzoR = 6 Then
  4008. If CheckBox6.Checked Then
  4009. TextBox1.BackColor = Color.Green
  4010. End If
  4011. ElseIf terzoR = 7 Then
  4012. If CheckBox7.Checked Then
  4013. TextBox1.BackColor = Color.Green
  4014. End If
  4015. ElseIf terzoR = 8 Then
  4016. If CheckBox8.Checked Then
  4017. TextBox1.BackColor = Color.Green
  4018. End If
  4019. ElseIf terzoR = 9 Then
  4020. If CheckBox9.Checked Then
  4021. TextBox1.BackColor = Color.Green
  4022. End If
  4023. End If
  4024. End If
  4025. ElseIf secondoR = 8 Then
  4026. If CheckBox8.Checked Then
  4027. If terzoR = 0 Then
  4028. If CheckBox10.Checked Then
  4029. TextBox1.BackColor = Color.Green
  4030. End If
  4031.  
  4032. ElseIf terzoR = 1 Then
  4033. If CheckBox1.Checked Then
  4034. TextBox1.BackColor = Color.Green
  4035. End If
  4036. ElseIf terzoR = 2 Then
  4037. If CheckBox2.Checked Then
  4038. TextBox1.BackColor = Color.Green
  4039. End If
  4040. ElseIf terzoR = 3 Then
  4041. If CheckBox3.Checked Then
  4042. TextBox1.BackColor = Color.Green
  4043. End If
  4044. ElseIf terzoR = 4 Then
  4045. If CheckBox4.Checked Then
  4046. TextBox1.BackColor = Color.Green
  4047. End If
  4048. ElseIf terzoR = 5 Then
  4049. If CheckBox5.Checked Then
  4050. TextBox1.BackColor = Color.Green
  4051. End If
  4052. ElseIf terzoR = 6 Then
  4053. If CheckBox6.Checked Then
  4054. TextBox1.BackColor = Color.Green
  4055. End If
  4056. ElseIf terzoR = 7 Then
  4057. If CheckBox7.Checked Then
  4058. TextBox1.BackColor = Color.Green
  4059. End If
  4060. ElseIf terzoR = 8 Then
  4061. If CheckBox8.Checked Then
  4062. TextBox1.BackColor = Color.Green
  4063. End If
  4064. ElseIf terzoR = 9 Then
  4065. If CheckBox9.Checked Then
  4066. TextBox1.BackColor = Color.Green
  4067. End If
  4068. End If
  4069. End If
  4070. ElseIf secondoR = 9 Then
  4071. If CheckBox9.Checked Then
  4072. If terzoR = 0 Then
  4073. If CheckBox10.Checked Then
  4074. TextBox1.BackColor = Color.Green
  4075. End If
  4076.  
  4077. ElseIf terzoR = 1 Then
  4078. If CheckBox1.Checked Then
  4079. TextBox1.BackColor = Color.Green
  4080. End If
  4081. ElseIf terzoR = 2 Then
  4082. If CheckBox2.Checked Then
  4083. TextBox1.BackColor = Color.Green
  4084. End If
  4085. ElseIf terzoR = 3 Then
  4086. If CheckBox3.Checked Then
  4087. TextBox1.BackColor = Color.Green
  4088. End If
  4089. ElseIf terzoR = 4 Then
  4090. If CheckBox4.Checked Then
  4091. TextBox1.BackColor = Color.Green
  4092. End If
  4093. ElseIf terzoR = 5 Then
  4094. If CheckBox5.Checked Then
  4095. TextBox1.BackColor = Color.Green
  4096. End If
  4097. ElseIf terzoR = 6 Then
  4098. If CheckBox6.Checked Then
  4099. TextBox1.BackColor = Color.Green
  4100. End If
  4101. ElseIf terzoR = 7 Then
  4102. If CheckBox7.Checked Then
  4103. TextBox1.BackColor = Color.Green
  4104. End If
  4105. ElseIf terzoR = 8 Then
  4106. If CheckBox8.Checked Then
  4107. TextBox1.BackColor = Color.Green
  4108. End If
  4109. ElseIf terzoR = 9 Then
  4110. If CheckBox9.Checked Then
  4111. TextBox1.BackColor = Color.Green
  4112. End If
  4113. End If
  4114. End If
  4115. Else
  4116. TextBox1.BackColor = Color.Black
  4117. End If
  4118. Else
  4119. TextBox1.BackColor = Color.Black
  4120. End If
  4121. Else
  4122. TextBox1.BackColor = Color.Black
  4123. End If
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement