Используя графические элементы из коллекции Shapes, нарисуйте красивое животное - VB

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

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

1. Используя графические элементы из коллекции Shapes (окружности, прямоугольники, звёзды, куб, отрезки, стрелки, и т.д.) нарисуйте красивое животное. (использовать это кодом!

Решение задачи: «Используя графические элементы из коллекции Shapes, нарисуйте красивое животное»

textual
Листинг программы
  1. Private Sub Command1_Click()
  2. Form1.ScaleMode = 3
  3. Form1.Line (18, 80)-(18, 84)
  4. Form1.Line (18, 92)-(18, 93)
  5. Form1.Line (19, 79)-(19, 81)
  6. Form1.Line (20, 78)-(20, 81)
  7. Form1.Line (21, 54)-(21, 55)
  8. Form1.Line (21, 77)-(21, 81)
  9. Form1.Line (21, 190)-(21, 191)
  10. Form1.Line (21, 194)-(21, 195)
  11. Form1.Line (22, 52)-(22, 57)
  12. Form1.Line (22, 76)-(22, 86)
  13. Form1.Line (22, 94)-(22, 95)
  14. Form1.Line (22, 119)-(22, 123)
  15. Form1.Line (23, 52)-(23, 63)
  16. Form1.Line (23, 75)-(23, 89)
  17. Form1.Line (23, 92)-(23, 94)
  18. Form1.Line (23, 117)-(23, 118)
  19. Form1.Line (23, 128)-(23, 130)
  20. Form1.Line (23, 187)-(23, 188)
  21. Form1.Line (24, 52)-(24, 53)
  22. Form1.Line (24, 54)-(24, 64)
  23. Form1.Line (24, 75)-(24, 92)
  24. Form1.Line (24, 191)-(24, 192)
  25. Form1.Line (25, 52)-(25, 53)
  26. Form1.Line (25, 56)-(25, 64)
  27. Form1.Line (25, 68)-(25, 92)
  28. Form1.Line (25, 114)-(25, 115)
  29. Form1.Line (25, 135)-(25, 136)
  30. Form1.Line (25, 184)-(25, 185)
  31. Form1.Line (26, 58)-(26, 65)
  32. Form1.Line (26, 67)-(26, 98)
  33. Form1.Line (26, 113)-(26, 114)
  34. Form1.Line (26, 182)-(26, 183)
  35. Form1.Line (26, 212)-(26, 213)
  36. Form1.Line (27, 59)-(27, 99)
  37. Form1.Line (27, 111)-(27, 113)
  38. Form1.Line (28, 60)-(28, 100)
  39. Form1.Line (29, 60)-(29, 101)
  40. Form1.Line (29, 110)-(29, 111)
  41. Form1.Line (29, 132)-(29, 133)
  42. Form1.Line (30, 60)-(30, 102)
  43. Form1.Line (30, 131)-(30, 132)
  44. Form1.Line (30, 176)-(30, 177)
  45. Form1.Line (30, 212)-(30, 213)
  46. Form1.Line (31, 60)-(31, 100)
  47. Form1.Line (31, 129)-(31, 130)
  48. Form1.Line (31, 175)-(31, 176)
  49. Form1.Line (32, 60)-(32, 95)
  50. Form1.Line (32, 106)-(32, 107)
  51. Form1.Line (32, 127)-(32, 128)
  52. Form1.Line (32, 174)-(32, 175)
  53. Form1.Line (32, 200)-(32, 202)
  54. Form1.Line (33, 60)-(33, 90)
  55. Form1.Line (33, 105)-(33, 106)
  56. Form1.Line (33, 126)-(33, 127)
  57. Form1.Line (34, 59)-(34, 83)
  58. Form1.Line (34, 84)-(34, 87)
  59. Form1.Line (34, 124)-(34, 125)
  60. Form1.Line (34, 171)-(34, 172)
  61. Form1.Line (34, 183)-(34, 184)
  62. Form1.Line (34, 196)-(34, 197)
  63. Form1.Line (35, 58)-(35, 86)
  64. Form1.Line (35, 102)-(35, 103)
  65. Form1.Line (35, 122)-(35, 123)
  66. Form1.Line (35, 180)-(35, 181)
  67. Form1.Line (36, 56)-(36, 85)
  68. Form1.Line (36, 101)-(36, 102)
  69. Form1.Line (36, 120)-(36, 121)
  70. Form1.Line (36, 168)-(36, 169)
  71. Form1.Line (36, 179)-(36, 180)
  72. Form1.Line (37, 55)-(37, 74)
  73. Form1.Line (37, 76)-(37, 84)
  74. Form1.Line (37, 118)-(37, 119)
  75. Form1.Line (37, 177)-(37, 178)
  76. Form1.Line (38, 55)-(38, 69)
  77. Form1.Line (38, 81)-(38, 83)
  78. Form1.Line (38, 98)-(38, 99)
  79. Form1.Line (38, 116)-(38, 117)
  80. Form1.Line (39, 55)-(39, 66)
  81. Form1.Line (39, 95)-(39, 96)
  82. Form1.Line (39, 99)-(39, 100)
  83. Form1.Line (39, 113)-(39, 114)
  84. Form1.Line (40, 55)-(40, 65)
  85. Form1.Line (40, 68)-(40, 69)
  86. Form1.Line (40, 75)-(40, 76)
  87. Form1.Line (40, 93)-(40, 94)
  88. Form1.Line (40, 100)-(40, 101)
  89. Form1.Line (40, 110)-(40, 112)
  90. Form1.Line (40, 162)-(40, 163)
  91. Form1.Line (41, 52)-(41, 53)
  92. Form1.Line (41, 54)-(41, 65)
  93. Form1.Line (41, 66)-(41, 76)
  94. Form1.Line (41, 98)-(41, 99)
  95. Form1.Line (41, 107)-(41, 114)
  96. Form1.Line (41, 172)-(41, 173)
  97. Form1.Line (42, 54)-(42, 73)
  98. Form1.Line (42, 99)-(42, 100)
  99. Form1.Line (42, 104)-(42, 116)
  100. Form1.Line (42, 165)-(42, 168)
  101. Form1.Line (43, 49)-(43, 50)
  102. Form1.Line (43, 51)-(43, 71)
  103. Form1.Line (43, 80)-(43, 81)
  104. Form1.Line (43, 99)-(43, 100)
  105. Form1.Line (43, 101)-(43, 118)
  106. Form1.Line (43, 162)-(43, 164)
  107. Form1.Line (43, 165)-(43, 168)
  108. Form1.Line (44, 50)-(44, 70)
  109. Form1.Line (44, 82)-(44, 83)
  110. Form1.Line (44, 99)-(44, 119)
  111. Form1.Line (44, 164)-(44, 168)
  112. Form1.Line (45, 47)-(45, 48)
  113. Form1.Line (45, 49)-(45, 74)
  114. Form1.Line (45, 77)-(45, 78)
  115. Form1.Line (45, 84)-(45, 85)
  116. Form1.Line (45, 97)-(45, 120)
  117. Form1.Line (45, 155)-(45, 156)
  118. Form1.Line (45, 162)-(45, 163)
  119. Form1.Line (45, 165)-(45, 166)
  120. Form1.Line (46, 49)-(46, 61)
  121. Form1.Line (46, 62)-(46, 74)
  122. Form1.Line (46, 76)-(46, 77)
  123. Form1.Line (46, 95)-(46, 120)
  124. Form1.Line (46, 154)-(46, 155)
  125. Form1.Line (46, 161)-(46, 162)
  126. Form1.Line (47, 48)-(47, 73)
  127. Form1.Line (47, 75)-(47, 76)
  128. Form1.Line (47, 78)-(47, 79)
  129. Form1.Line (47, 87)-(47, 88)
  130. Form1.Line (47, 94)-(47, 121)
  131. Form1.Line (47, 153)-(47, 156)
  132. Form1.Line (47, 163)-(47, 165)
  133. Form1.Line (48, 41)-(48, 43)
  134. Form1.Line (48, 47)-(48, 67)
  135. Form1.Line (48, 68)-(48, 69)
  136. Form1.Line (48, 71)-(48, 72)
  137. Form1.Line (48, 74)-(48, 75)
  138. Form1.Line (48, 89)-(48, 90)
  139. Form1.Line (48, 98)-(48, 121)
  140. Form1.Line (48, 152)-(48, 156)
  141. Form1.Line (49, 41)-(49, 45)
  142. Form1.Line (49, 46)-(49, 66)
  143. Form1.Line (49, 101)-(49, 121)
  144. Form1.Line (49, 150)-(49, 151)
  145. Form1.Line (49, 152)-(49, 156)
  146. Form1.Line (50, 41)-(50, 65)
  147. Form1.Line (50, 104)-(50, 121)
  148. Form1.Line (50, 149)-(50, 150)
  149. Form1.Line (51, 41)-(51, 65)
  150. Form1.Line (51, 76)-(51, 77)
  151. Form1.Line (51, 79)-(51, 80)
  152. Form1.Line (51, 105)-(51, 121)
  153. Form1.Line (51, 151)-(51, 152)
  154. Form1.Line (51, 153)-(51, 155)
  155. Form1.Line (52, 41)-(52, 65)
  156. Form1.Line (52, 106)-(52, 121)
  157. Form1.Line (52, 150)-(52, 151)
  158. Form1.Line (53, 43)-(53, 47)
  159. Form1.Line (53, 48)-(53, 66)
  160. Form1.Line (53, 78)-(53, 79)
  161. Form1.Line (53, 106)-(53, 121)
  162. Form1.Line (54, 48)-(54, 65)
  163. Form1.Line (54, 66)-(54, 67)
  164. Form1.Line (54, 107)-(54, 122)
  165. Form1.Line (54, 158)-(54, 159)
  166. Form1.Line (55, 48)-(55, 66)
  167. Form1.Line (55, 69)-(55, 70)
  168. Form1.Line (55, 106)-(55, 122)
  169. Form1.Line (56, 48)-(56, 66)
  170. Form1.Line (56, 104)-(56, 122)
  171. Form1.Line (57, 47)-(57, 64)
  172. Form1.Line (57, 67)-(57, 68)
  173. Form1.Line (57, 69)-(57, 70)
  174. Form1.Line (57, 102)-(57, 123)
  175. Form1.Line (58, 47)-(58, 64)
  176. Form1.Line (58, 101)-(58, 123)
  177. Form1.Line (59, 47)-(59, 64)
  178. Form1.Line (59, 70)-(59, 71)
  179. Form1.Line (59, 99)-(59, 124)
  180. Form1.Line (60, 47)-(60, 63)
  181. Form1.Line (60, 64)-(60, 65)
  182. Form1.Line (60, 70)-(60, 72)
  183. Form1.Line (60, 98)-(60, 124)
  184. Form1.Line (61, 47)-(61, 66)
  185. Form1.Line (61, 96)-(61, 124)
  186. Form1.Line (61, 130)-(61, 131)
  187. Form1.Line (61, 148)-(61, 149)
  188. Form1.Line (61, 152)-(61, 153)
  189. Form1.Line (62, 47)-(62, 66)
  190. Form1.Line (62, 69)-(62, 70)
  191. Form1.Line (62, 80)-(62, 81)
  192. Form1.Line (62, 90)-(62, 91)
  193. Form1.Line (62, 94)-(62, 125)
  194. Form1.Line (62, 129)-(62, 132)
  195. Form1.Line (62, 145)-(62, 146)
  196. Form1.Line (62, 147)-(62, 150)
  197. Form1.Line (63, 46)-(63, 69)
  198. Form1.Line (63, 71)-(63, 72)
  199. Form1.Line (63, 90)-(63, 123)
  200. Form1.Line (63, 125)-(63, 127)
  201. Form1.Line (63, 128)-(63, 132)
  202. Form1.Line (63, 147)-(63, 150)
  203. Form1.Line (64, 45)-(64, 71)
  204. Form1.Line (64, 84)-(64, 85)
  205. Form1.Line (64, 90)-(64, 120)
  206. Form1.Line (64, 125)-(64, 126)
  207. Form1.Line (64, 127)-(64, 132)
  208. Form1.Line (64, 144)-(64, 145)
  209. Form1.Line (64, 147)-(64, 149)
  210. Form1.Line (65, 42)-(65, 73)
  211. Form1.Line (65, 88)-(65, 116)
  212. Form1.Line (65, 128)-(65, 132)
  213. Form1.Line (65, 148)-(65, 149)
  214. Form1.Line (66, 43)-(66, 48)
  215. Form1.Line (66, 51)-(66, 78)
  216. Form1.Line (66, 81)-(66, 82)
  217. Form1.Line (66, 87)-(66, 106)
  218. Form1.Line (66, 125)-(66, 128)
  219. Form1.Line (66, 129)-(66, 130)
  220. Form1.Line (66, 145)-(66, 148)
  221. Form1.Line (67, 43)-(67, 47)
  222. Form1.Line (67, 53)-(67, 92)
  223. Form1.Line (67, 128)-(67, 130)
  224. Form1.Line (68, 45)-(68, 46)
  225. Form1.Line (68, 55)-(68, 89)
  226. Form1.Line (69, 56)-(69, 87)
  227. Form1.Line (69, 92)-(69, 93)
  228. Form1.Line (70, 57)-(70, 86)
  229. Form1.Line (70, 91)-(70, 93)
  230. Form1.Line (70, 94)-(70, 96)
  231. Form1.Line (70, 111)-(70, 112)
  232. Form1.Line (71, 57)-(71, 85)
  233. Form1.Line (71, 93)-(71, 96)
  234. Form1.Line (71, 112)-(71, 113)
  235. Form1.Line (72, 57)-(72, 84)
  236. Form1.Line (72, 89)-(72, 92)
  237. Form1.Line (72, 93)-(72, 96)
  238. Form1.Line (72, 114)-(72, 116)
  239. Form1.Line (73, 53)-(73, 54)
  240. Form1.Line (73, 56)-(73, 59)
  241. Form1.Line (73, 60)-(73, 84)
  242. Form1.Line (73, 93)-(73, 96)
  243. Form1.Line (73, 109)-(73, 111)
  244. Form1.Line (73, 113)-(73, 116)
  245. Form1.Line (73, 123)-(73, 125)
  246. Form1.Line (74, 54)-(74, 58)
  247. Form1.Line (74, 61)-(74, 83)
  248. Form1.Line (74, 112)-(74, 116)
  249. Form1.Line (74, 118)-(74, 125)
  250. Form1.Line (75, 66)-(75, 81)
  251. Form1.Line (75, 82)-(75, 83)
  252. Form1.Line (75, 90)-(75, 93)
  253. Form1.Line (75, 94)-(75, 95)
  254. Form1.Line (75, 109)-(75, 111)
  255. Form1.Line (75, 113)-(75, 126)
  256. Form1.Line (76, 67)-(76, 70)
  257. Form1.Line (76, 93)-(76, 94)
  258. Form1.Line (76, 110)-(76, 123)
  259. Form1.Line (76, 124)-(76, 126)
  260. Form1.Line (77, 67)-(77, 69)
  261. Form1.Line (77, 82)-(77, 83)
  262. Form1.Line (77, 107)-(77, 126)
  263. Form1.Line (78, 67)-(78, 70)
  264. Form1.Line (78, 71)-(78, 72)
  265. Form1.Line (78, 82)-(78, 83)
  266. Form1.Line (78, 104)-(78, 126)
  267. Form1.Line (79, 69)-(79, 70)
  268. Form1.Line (79, 81)-(79, 83)
  269. Form1.Line (79, 101)-(79, 126)
  270. Form1.Line (80, 80)-(80, 84)
  271. Form1.Line (80, 98)-(80, 126)
  272. Form1.Line (81, 79)-(81, 84)
  273. Form1.Line (81, 95)-(81, 114)
  274. Form1.Line (81, 116)-(81, 126)
  275. Form1.Line (82, 78)-(82, 83)
  276. Form1.Line (82, 92)-(82, 93)
  277. Form1.Line (82, 96)-(82, 114)
  278. Form1.Line (82, 118)-(82, 126)
  279. Form1.Line (83, 77)-(83, 82)
  280. Form1.Line (83, 97)-(83, 115)
  281. Form1.Line (83, 118)-(83, 126)
  282. Form1.Line (84, 76)-(84, 82)
  283. Form1.Line (84, 98)-(84, 99)
  284. Form1.Line (84, 100)-(84, 115)
  285. Form1.Line (84, 119)-(84, 126)
  286. Form1.Line (85, 74)-(85, 81)
  287. Form1.Line (85, 98)-(85, 116)
  288. Form1.Line (85, 120)-(85, 126)
  289. Form1.Line (85, 129)-(85, 130)
  290. Form1.Line (86, 73)-(86, 81)
  291. Form1.Line (86, 99)-(86, 116)
  292. Form1.Line (86, 121)-(86, 123)
  293. Form1.Line (86, 125)-(86, 126)
  294. Form1.Line (86, 128)-(86, 129)
  295. Form1.Line (87, 72)-(87, 82)
  296. Form1.Line (87, 100)-(87, 117)
  297. Form1.Line (88, 71)-(88, 82)
  298. Form1.Line (88, 101)-(88, 117)
  299. Form1.Line (89, 71)-(89, 82)
  300. Form1.Line (89, 101)-(89, 117)
  301. Form1.Line (89, 131)-(89, 132)
  302. Form1.Line (90, 71)-(90, 83)
  303. Form1.Line (90, 101)-(90, 118)
  304. Form1.Line (91, 70)-(91, 79)
  305. Form1.Line (91, 102)-(91, 124)
  306. Form1.Line (92, 70)-(92, 79)
  307. Form1.Line (92, 102)-(92, 126)
  308. Form1.Line (93, 70)-(93, 79)
  309. Form1.Line (93, 102)-(93, 126)
  310. Form1.Line (93, 133)-(93, 135)
  311. Form1.Line (94, 70)-(94, 78)
  312. Form1.Line (94, 103)-(94, 126)
  313. Form1.Line (95, 70)-(95, 77)
  314. Form1.Line (95, 103)-(95, 126)
  315. Form1.Line (95, 137)-(95, 139)
  316. Form1.Line (96, 70)-(96, 77)
  317. Form1.Line (96, 103)-(96, 126)
  318. Form1.Line (96, 137)-(96, 139)
  319. Form1.Line (97, 70)-(97, 77)
  320. Form1.Line (97, 103)-(97, 126)
  321. Form1.Line (97, 136)-(97, 137)
  322. Form1.Line (97, 142)-(97, 143)
  323. Form1.Line (98, 70)-(98, 76)
  324. Form1.Line (98, 104)-(98, 126)
  325. Form1.Line (98, 128)-(98, 129)
  326. Form1.Line (98, 136)-(98, 137)
  327. Form1.Line (98, 142)-(98, 145)
  328. Form1.Line (99, 70)-(99, 76)
  329. Form1.Line (99, 104)-(99, 109)
  330. Form1.Line (99, 114)-(99, 117)
  331. Form1.Line (99, 121)-(99, 126)
  332. Form1.Line (99, 141)-(99, 144)
  333. Form1.Line (99, 146)-(99, 147)
  334. Form1.Line (100, 70)-(100, 76)
  335. Form1.Line (100, 103)-(100, 104)
  336. Form1.Line (100, 106)-(100, 108)
  337. Form1.Line (100, 114)-(100, 116)
  338. Form1.Line (100, 121)-(100, 127)
  339. Form1.Line (100, 141)-(100, 142)
  340. Form1.Line (101, 69)-(101, 74)
  341. Form1.Line (101, 100)-(101, 101)
  342. Form1.Line (101, 106)-(101, 108)
  343. Form1.Line (101, 114)-(101, 116)
  344. Form1.Line (101, 121)-(101, 122)
  345. Form1.Line (101, 141)-(101, 142)
  346. Form1.Line (101, 149)-(101, 150)
  347. Form1.Line (102, 69)-(102, 74)
  348. Form1.Line (102, 99)-(102, 101)
  349. Form1.Line (102, 107)-(102, 119)
  350. Form1.Line (102, 121)-(102, 122)
  351. Form1.Line (102, 130)-(102, 131)
  352. Form1.Line (102, 149)-(102, 151)
  353. Form1.Line (103, 67)-(103, 74)
  354. Form1.Line (103, 98)-(103, 101)
  355. Form1.Line (103, 107)-(103, 123)
  356. Form1.Line (103, 130)-(103, 131)
  357. Form1.Line (103, 148)-(103, 152)
  358. Form1.Line (104, 66)-(104, 68)
  359. Form1.Line (104, 98)-(104, 102)
  360. Form1.Line (104, 105)-(104, 125)
  361. Form1.Line (104, 148)-(104, 151)
  362. Form1.Line (105, 99)-(105, 127)
  363. Form1.Line (105, 147)-(105, 150)
  364. Form1.Line (105, 153)-(105, 154)
  365. Form1.Line (106, 103)-(106, 126)
  366. Form1.Line (106, 147)-(106, 149)
  367. Form1.Line (107, 51)-(107, 54)
  368. Form1.Line (107, 103)-(107, 126)
  369. Form1.Line (107, 147)-(107, 148)
  370. Form1.Line (108, 48)-(108, 56)
  371. Form1.Line (108, 102)-(108, 126)
  372. Form1.Line (108, 155)-(108, 156)
  373. Form1.Line (108, 163)-(108, 164)
  374. Form1.Line (109, 46)-(109, 49)
  375. Form1.Line (109, 50)-(109, 57)
  376. Form1.Line (109, 99)-(109, 126)
  377. Form1.Line (109, 155)-(109, 157)
  378. Form1.Line (110, 45)-(110, 47)
  379. Form1.Line (110, 52)-(110, 58)
  380. Form1.Line (110, 101)-(110, 125)
  381. Form1.Line (110, 135)-(110, 136)
  382. Form1.Line (110, 140)-(110, 141)
  383. Form1.Line (110, 154)-(110, 155)
  384. Form1.Line (111, 43)-(111, 46)
  385. Form1.Line (111, 49)-(111, 50)
  386. Form1.Line (111, 52)-(111, 58)
  387. Form1.Line (111, 101)-(111, 125)
  388. Form1.Line (111, 135)-(111, 136)
  389. Form1.Line (111, 140)-(111, 141)
  390. Form1.Line (111, 153)-(111, 154)
  391. Form1.Line (111, 165)-(111, 166)
  392. Form1.Line (111, 169)-(111, 170)
  393. Form1.Line (112, 42)-(112, 45)
  394. Form1.Line (112, 52)-(112, 59)
  395. Form1.Line (112, 100)-(112, 124)
  396. Form1.Line (112, 135)-(112, 136)
  397. Form1.Line (112, 140)-(112, 141)
  398. Form1.Line (112, 167)-(112, 170)
  399. Form1.Line (113, 41)-(113, 46)
  400. Form1.Line (113, 51)-(113, 59)
  401. Form1.Line (113, 99)-(113, 123)
  402. Form1.Line (113, 135)-(113, 137)
  403. Form1.Line (113, 139)-(113, 141)
  404. Form1.Line (113, 159)-(113, 160)
  405. Form1.Line (113, 167)-(113, 169)
  406. Form1.Line (113, 170)-(113, 171)
  407. Form1.Line (114, 40)-(114, 47)
  408. Form1.Line (114, 49)-(114, 59)
  409. Form1.Line (114, 99)-(114, 115)
  410. Form1.Line (114, 117)-(114, 122)
  411. Form1.Line (114, 131)-(114, 132)
  412. Form1.Line (114, 140)-(114, 141)
  413. Form1.Line (114, 145)-(114, 146)
  414. Form1.Line (114, 158)-(114, 160)
  415. Form1.Line (114, 167)-(114, 168)
  416. Form1.Line (115, 44)-(115, 60)
  417. Form1.Line (115, 98)-(115, 114)
  418. Form1.Line (115, 132)-(115, 133)
  419. Form1.Line (115, 139)-(115, 141)
  420. Form1.Line (115, 144)-(115, 146)
  421. Form1.Line (115, 157)-(115, 159)
  422. Form1.Line (116, 44)-(116, 60)
  423. Form1.Line (116, 97)-(116, 113)
  424. Form1.Line (116, 144)-(116, 145)
  425. Form1.Line (116, 169)-(116, 173)
  426. Form1.Line (117, 44)-(117, 61)
  427. Form1.Line (117, 96)-(117, 113)
  428. Form1.Line (117, 144)-(117, 145)
  429. Form1.Line (117, 168)-(117, 171)
  430. Form1.Line (117, 172)-(117, 173)
  431. Form1.Line (118, 44)-(118, 50)
  432. Form1.Line (118, 52)-(118, 62)
  433. Form1.Line (118, 95)-(118, 112)
  434. Form1.Line (118, 127)-(118, 128)
  435. Form1.Line (118, 143)-(118, 145)
  436. Form1.Line (118, 162)-(118, 163)
  437. Form1.Line (118, 168)-(118, 169)
  438. Form1.Line (119, 44)-(119, 47)
  439. Form1.Line (119, 53)-(119, 65)
  440. Form1.Line (119, 94)-(119, 112)
  441. Form1.Line (119, 128)-(119, 130)
  442. Form1.Line (119, 144)-(119, 145)
  443. Form1.Line (119, 147)-(119, 148)
  444. Form1.Line (120, 44)-(120, 47)
  445. Form1.Line (120, 49)-(120, 50)
  446. Form1.Line (120, 51)-(120, 52)
  447. Form1.Line (120, 53)-(120, 68)
  448. Form1.Line (120, 94)-(120, 111)
  449. Form1.Line (120, 128)-(120, 129)
  450. Form1.Line (120, 147)-(120, 148)
  451. Form1.Line (121, 44)-(121, 48)
  452. Form1.Line (121, 49)-(121, 50)
  453. Form1.Line (121, 52)-(121, 69)
  454. Form1.Line (121, 93)-(121, 111)
  455. Form1.Line (121, 115)-(121, 116)
  456. Form1.Line (121, 119)-(121, 120)
  457. Form1.Line (121, 123)-(121, 124)
  458. Form1.Line (121, 146)-(121, 148)
  459. Form1.Line (121, 161)-(121, 164)
  460. Form1.Line (121, 168)-(121, 171)
  461. Form1.Line (122, 45)-(122, 49)
  462. Form1.Line (122, 51)-(122, 72)
  463. Form1.Line (122, 92)-(122, 110)
  464. Form1.Line (122, 114)-(122, 120)
  465. Form1.Line (122, 123)-(122, 125)
  466. Form1.Line (122, 127)-(122, 128)
  467. Form1.Line (122, 146)-(122, 147)
  468. Form1.Line (122, 160)-(122, 161)
  469. Form1.Line (122, 164)-(122, 165)
  470. Form1.Line (122, 168)-(122, 172)
  471. Form1.Line (123, 45)-(123, 74)
  472. Form1.Line (123, 91)-(123, 110)
  473. Form1.Line (123, 113)-(123, 122)
  474. Form1.Line (123, 123)-(123, 126)
  475. Form1.Line (123, 165)-(123, 167)
  476. Form1.Line (123, 170)-(123, 172)
  477. Form1.Line (124, 44)-(124, 76)
  478. Form1.Line (124, 90)-(124, 109)
  479. Form1.Line (124, 113)-(124, 123)
  480. Form1.Line (124, 150)-(124, 151)
  481. Form1.Line (125, 43)-(125, 77)
  482. Form1.Line (125, 89)-(125, 109)
  483. Form1.Line (125, 112)-(125, 123)
  484. Form1.Line (125, 149)-(125, 151)
  485. Form1.Line (126, 42)-(126, 79)
  486. Form1.Line (126, 88)-(126, 123)
  487. Form1.Line (126, 148)-(126, 150)
  488. Form1.Line (127, 46)-(127, 48)
  489. Form1.Line (127, 49)-(127, 80)
  490. Form1.Line (127, 87)-(127, 123)
  491. Form1.Line (127, 149)-(127, 150)
  492. Form1.Line (127, 163)-(127, 170)
  493. Form1.Line (128, 49)-(128, 71)
  494. Form1.Line (128, 73)-(128, 81)
  495. Form1.Line (128, 86)-(128, 123)
  496. Form1.Line (128, 153)-(128, 155)
  497. Form1.Line (128, 166)-(128, 169)
  498. Form1.Line (129, 48)-(129, 72)
  499. Form1.Line (129, 76)-(129, 123)
  500. Form1.Line (129, 151)-(129, 153)
  501. Form1.Line (129, 168)-(129, 169)
  502. Form1.Line (130, 47)-(130, 75)
  503. Form1.Line (130, 78)-(130, 123)
  504. Form1.Line (130, 149)-(130, 152)
  505. Form1.Line (131, 46)-(131, 78)
  506. Form1.Line (131, 82)-(131, 123)
  507. Form1.Line (131, 149)-(131, 151)
  508. Form1.Line (132, 46)-(132, 80)
  509. Form1.Line (132, 82)-(132, 83)
  510. Form1.Line (132, 84)-(132, 123)
  511. Form1.Line (133, 45)-(133, 123)
  512. Form1.Line (133, 164)-(133, 167)
  513. Form1.Line (134, 45)-(134, 65)
  514. Form1.Line (134, 71)-(134, 123)
  515. Form1.Line (134, 155)-(134, 156)
  516. Form1.Line (134, 166)-(134, 167)
  517. Form1.Line (135, 45)-(135, 64)
  518. Form1.Line (135, 76)-(135, 123)
  519. Form1.Line (135, 154)-(135, 156)
  520. Form1.Line (136, 44)-(136, 63)
  521. Form1.Line (136, 83)-(136, 123)
  522. Form1.Line (136, 145)-(136, 146)
  523. Form1.Line (136, 153)-(136, 155)
  524. Form1.Line (137, 44)-(137, 63)
  525. Form1.Line (137, 83)-(137, 123)
  526. Form1.Line (137, 144)-(137, 146)
  527. Form1.Line (137, 152)-(137, 154)
  528. Form1.Line (138, 44)-(138, 62)
  529. Form1.Line (138, 82)-(138, 123)
  530. Form1.Line (138, 145)-(138, 146)
  531. Form1.Line (138, 152)-(138, 154)
  532. Form1.Line (138, 163)-(138, 165)
  533. Form1.Line (139, 44)-(139, 61)
  534. Form1.Line (139, 82)-(139, 123)
  535. Form1.Line (139, 145)-(139, 147)
  536. Form1.Line (139, 153)-(139, 154)
  537. Form1.Line (140, 44)-(140, 61)
  538. Form1.Line (140, 83)-(140, 123)
  539. Form1.Line (140, 133)-(140, 134)
  540. Form1.Line (140, 139)-(140, 142)
  541. Form1.Line (140, 145)-(140, 147)
  542. Form1.Line (140, 153)-(140, 154)
  543. Form1.Line (141, 44)-(141, 61)
  544. Form1.Line (141, 83)-(141, 123)
  545. Form1.Line (141, 131)-(141, 132)
  546. Form1.Line (141, 137)-(141, 139)
  547. Form1.Line (141, 141)-(141, 143)
  548. Form1.Line (141, 163)-(141, 164)
  549. Form1.Line (142, 9)-(142, 10)
  550. Form1.Line (142, 44)-(142, 61)
  551. Form1.Line (142, 82)-(142, 123)
  552. Form1.Line (142, 132)-(142, 133)
  553. Form1.Line (142, 137)-(142, 138)
  554. Form1.Line (142, 141)-(142, 143)
  555. Form1.Line (142, 154)-(142, 155)
  556. Form1.Line (142, 162)-(142, 164)
  557. Form1.Line (143, 9)-(143, 13)
  558. Form1.Line (143, 45)-(143, 61)
  559. Form1.Line (143, 81)-(143, 123)
  560. Form1.Line (143, 137)-(143, 138)
  561. Form1.Line (144, 9)-(144, 14)
  562. Form1.Line (144, 45)-(144, 61)
  563. Form1.Line (144, 80)-(144, 123)
  564. Form1.Line (144, 152)-(144, 153)
  565. Form1.Line (145, 9)-(145, 14)
  566. Form1.Line (145, 45)-(145, 61)
  567. Form1.Line (145, 64)-(145, 69)
  568. Form1.Line (145, 78)-(145, 123)
  569. Form1.Line (145, 164)-(145, 165)
  570. Form1.Line (146, 9)-(146, 15)
  571. Form1.Line (146, 46)-(146, 71)
  572. Form1.Line (146, 76)-(146, 82)
  573. Form1.Line (146, 83)-(146, 123)
  574. Form1.Line (146, 154)-(146, 155)
  575. Form1.Line (146, 161)-(146, 165)
  576. Form1.Line (147, 9)-(147, 16)
  577. Form1.Line (147, 46)-(147, 72)
  578. Form1.Line (147, 73)-(147, 81)
  579. Form1.Line (147, 83)-(147, 123)
  580. Form1.Line (147, 149)-(147, 150)
  581. Form1.Line (147, 152)-(147, 154)
  582. Form1.Line (147, 165)-(147, 166)
  583. Form1.Line (148, 10)-(148, 16)
  584. Form1.Line (148, 47)-(148, 79)
  585. Form1.Line (148, 82)-(148, 83)
  586. Form1.Line (148, 84)-(148, 123)
  587. Form1.Line (148, 148)-(148, 149)
  588. Form1.Line (149, 10)-(149, 17)
  589. Form1.Line (149, 47)-(149, 77)
  590. Form1.Line (149, 81)-(149, 123)
  591. Form1.Line (149, 148)-(149, 149)
  592. Form1.Line (149, 160)-(149, 161)
  593. Form1.Line (149, 166)-(149, 167)
  594. Form1.Line (150, 10)-(150, 18)
  595. Form1.Line (150, 48)-(150, 74)
  596. Form1.Line (150, 78)-(150, 83)
  597. Form1.Line (150, 85)-(150, 123)
  598. Form1.Line (150, 145)-(150, 146)
  599. Form1.Line (150, 148)-(150, 149)
  600. Form1.Line (150, 165)-(150, 167)
  601. Form1.Line (151, 11)-(151, 19)
  602. Form1.Line (151, 49)-(151, 73)
  603. Form1.Line (151, 75)-(151, 83)
  604. Form1.Line (151, 85)-(151, 122)
  605. Form1.Line (151, 148)-(151, 149)
  606. Form1.Line (151, 167)-(151, 168)
  607. Form1.Line (152, 12)-(152, 20)
  608. Form1.Line (152, 51)-(152, 81)
  609. Form1.Line (152, 86)-(152, 122)
  610. Form1.Line (153, 12)-(153, 21)
  611. Form1.Line (153, 52)-(153, 79)
  612. Form1.Line (153, 87)-(153, 122)
  613. Form1.Line (153, 157)-(153, 159)
  614. Form1.Line (153, 160)-(153, 161)
  615. Form1.Line (153, 164)-(153, 166)
  616. Form1.Line (154, 14)-(154, 22)
  617. Form1.Line (154, 54)-(154, 77)
  618. Form1.Line (154, 87)-(154, 122)
  619. Form1.Line (154, 149)-(154, 150)
  620. Form1.Line (154, 165)-(154, 169)
  621. Form1.Line (155, 15)-(155, 24)
  622. Form1.Line (155, 55)-(155, 75)
  623. Form1.Line (155, 88)-(155, 122)
  624. Form1.Line (155, 166)-(155, 169)
  625. Form1.Line (156, 17)-(156, 25)
  626. Form1.Line (156, 55)-(156, 69)
  627. Form1.Line (156, 73)-(156, 74)
  628. Form1.Line (156, 89)-(156, 122)
  629. Form1.Line (156, 154)-(156, 155)
  630. Form1.Line (156, 156)-(156, 157)
  631. Form1.Line (156, 168)-(156, 169)
  632. Form1.Line (157, 18)-(157, 27)
  633. Form1.Line (157, 55)-(157, 67)
  634. Form1.Line (157, 89)-(157, 122)
  635. Form1.Line (157, 150)-(157, 151)
  636. Form1.Line (157, 168)-(157, 169)
  637. Form1.Line (158, 19)-(158, 29)
  638. Form1.Line (158, 54)-(158, 65)
  639. Form1.Line (158, 90)-(158, 121)
  640. Form1.Line (158, 155)-(158, 156)
  641. Form1.Line (158, 157)-(158, 158)
  642. Form1.Line (159, 21)-(159, 32)
  643. Form1.Line (159, 52)-(159, 64)
  644. Form1.Line (159, 91)-(159, 121)
  645. Form1.Line (159, 157)-(159, 158)
  646. Form1.Line (159, 159)-(159, 160)
  647. Form1.Line (159, 163)-(159, 164)
  648. Form1.Line (160, 23)-(160, 35)
  649. Form1.Line (160, 49)-(160, 63)
  650. Form1.Line (160, 92)-(160, 121)
  651. Form1.Line (160, 153)-(160, 155)
  652. Form1.Line (160, 156)-(160, 157)
  653. Form1.Line (160, 158)-(160, 159)
  654. Form1.Line (160, 160)-(160, 162)
  655. Form1.Line (160, 163)-(160, 164)
  656. Form1.Line (161, 24)-(161, 41)
  657. Form1.Line (161, 43)-(161, 61)
  658. Form1.Line (161, 93)-(161, 122)
  659. Form1.Line (161, 153)-(161, 155)
  660. Form1.Line (161, 164)-(161, 165)
  661. Form1.Line (162, 26)-(162, 59)
  662. Form1.Line (162, 94)-(162, 122)
  663. Form1.Line (162, 154)-(162, 155)
  664. Form1.Line (163, 29)-(163, 56)
  665. Form1.Line (163, 94)-(163, 122)
  666. Form1.Line (164, 31)-(164, 54)
  667. Form1.Line (164, 94)-(164, 122)
  668. Form1.Line (164, 168)-(164, 169)
  669. Form1.Line (165, 34)-(165, 51)
  670. Form1.Line (165, 94)-(165, 122)
  671. Form1.Line (166, 39)-(166, 45)
  672. Form1.Line (166, 94)-(166, 122)
  673. Form1.Line (167, 94)-(167, 122)
  674. Form1.Line (168, 94)-(168, 122)
  675. Form1.Line (169, 95)-(169, 123)
  676. Form1.Line (170, 95)-(170, 123)
  677. Form1.Line (171, 96)-(171, 123)
  678. Form1.Line (172, 96)-(172, 123)
  679. Form1.Line (173, 96)-(173, 124)
  680. Form1.Line (174, 40)-(174, 41)
  681. Form1.Line (174, 96)-(174, 124)
  682. Form1.Line (175, 43)-(175, 44)
  683. Form1.Line (175, 96)-(175, 124)
  684. Form1.Line (176, 96)-(176, 124)
  685. Form1.Line (177, 46)-(177, 47)
  686. Form1.Line (177, 81)-(177, 82)
  687. Form1.Line (177, 96)-(177, 125)
  688. Form1.Line (178, 97)-(178, 125)
  689. Form1.Line (179, 94)-(179, 95)
  690. Form1.Line (179, 97)-(179, 125)
  691. Form1.Line (180, 96)-(180, 125)
  692. Form1.Line (181, 98)-(181, 125)
  693. Form1.Line (182, 98)-(182, 126)
  694. Form1.Line (183, 98)-(183, 126)
  695. Form1.Line (184, 99)-(184, 126)
  696. Form1.Line (185, 99)-(185, 126)
  697. Form1.Line (186, 99)-(186, 126)
  698. Form1.Line (187, 100)-(187, 126)
  699. Form1.Line (188, 100)-(188, 126)
  700. Form1.Line (189, 49)-(189, 50)
  701. Form1.Line (189, 100)-(189, 127)
  702. Form1.Line (190, 101)-(190, 126)
  703. Form1.Line (191, 66)-(191, 67)
  704. Form1.Line (191, 101)-(191, 127)
  705. Form1.Line (192, 101)-(192, 106)
  706. Form1.Line (192, 107)-(192, 127)
  707. Form1.Line (193, 74)-(193, 75)
  708. Form1.Line (193, 102)-(193, 127)
  709. Form1.Line (194, 52)-(194, 53)
  710. Form1.Line (194, 102)-(194, 127)
  711. Form1.Line (195, 84)-(195, 86)
  712. Form1.Line (195, 102)-(195, 127)
  713. Form1.Line (196, 47)-(196, 48)
  714. Form1.Line (196, 103)-(196, 127)
  715. Form1.Line (197, 46)-(197, 47)
  716. Form1.Line (197, 103)-(197, 127)
  717. Form1.Line (198, 57)-(198, 58)
  718. Form1.Line (198, 103)-(198, 127)
  719. Form1.Line (199, 43)-(199, 44)
  720. Form1.Line (199, 103)-(199, 127)
  721. Form1.Line (200, 40)-(200, 41)
  722. Form1.Line (200, 104)-(200, 127)
  723. Form1.Line (201, 104)-(201, 127)
  724. Form1.Line (202, 105)-(202, 127)
  725. Form1.Line (203, 60)-(203, 61)
  726. Form1.Line (203, 105)-(203, 127)
  727. Form1.Line (204, 91)-(204, 92)
  728. Form1.Line (204, 105)-(204, 127)
  729. Form1.Line (205, 106)-(205, 127)
  730. Form1.Line (206, 106)-(206, 127)
  731. Form1.Line (207, 24)-(207, 25)
  732. Form1.Line (207, 107)-(207, 127)
  733. Form1.Line (208, 23)-(208, 24)
  734. Form1.Line (208, 107)-(208, 117)
  735. Form1.Line (208, 118)-(208, 127)
  736. Form1.Line (209, 103)-(209, 104)
  737. Form1.Line (209, 107)-(209, 127)
  738. Form1.Line (210, 107)-(210, 109)
  739. Form1.Line (210, 110)-(210, 127)
  740. Form1.Line (211, 22)-(211, 23)
  741. Form1.Line (211, 29)-(211, 31)
  742. Form1.Line (211, 56)-(211, 57)
  743. Form1.Line (211, 114)-(211, 127)
  744. End Sub

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


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

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

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

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

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

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