1. Báo điện tử Đảng Cộng sản Việt Nam
2. Tạp chí Cộng sản
3. Báo điện tử đại biểu nhân dân
4. Nhân dân điện tử
5. Quân đội nhân dân
6. Công an nhân dân
7. Cổng thông tin điện tử Chính phủ nước cộng hòa XHCN Việt Nam
8. Việt Nam nét
9. VnExpress
10. Thanh niên
11. Tiền phong
12. Tuổi trẻ
13. Đại đoàn kết
14. Người đưa tin
15. Dân trí
16. Doanh nhân Sài Gòn
17. Tia sáng
18. Giáo dục & Thời đại
19. Giáo dục và xã hội
20. Giáo dục VN
21. Xã hội thông tin
22. VoV.vn
23. Hà Nội mới
24. Lao động
25. văn hiến Việt Nam
26. Thương hiệu và công luận
27. Người lao động
28. văn Vn.net
29. Văn nghệ quân đội
30. Nhà văn Tp Hồ Chí Minh
31. Văn Hải Phòng. com
32. Sông Hương
33. Hội nông dân Việt Nam
34. Mặt trân tổ quốc Việt Nam
35. iCTnews
36. Infonet
37. Petrotimes
38. Văn hóa Nghệ An
39. Kiến thức
40. Thế giới &Việt Nam
41. Sức khỏe và đời sống
42. Hội sử học Việt Nam
43. Kiến trúc Việt Nam
44. Nông nghiệp - Nông thôn Việt Nam
45. Dân Việt
46. Đài truyền hình Việt Nam
47. Sài Gòn giải phóng
48. Diễn đàn doanh nghiệp
49. Giáo hội Phật giáo Việt Nam
50. Giác ngộ
51. Hồn Việt
52. Văn học quê nhà
53. Tổ quốc
54. Quê hương
56. Pháp luật Plus (Cơ quan ngôn luận của Bộ Tư pháp)
57. Đời sống & Pháp luật (Tòa soạn ở Cầu Giấy - HN)
58. Việt Nam mới
59. Nông nghiệp Việt Nam
60. văn hóa nghệ thuật
61. SoHa
62. Zing
63. Du lịch Việt Nam
64. Gia đình (Cơ quan chủ quản: Tổng cục dân số, KHH GĐ )
65. Việt Nam Finance
66. CAFEF
67. Một thế giới
68. Thời đại mới
69. Giao thông
70. Viettimes
71. Doanh nhân Sài Gòn
72. Công an TP Hồ Chí Minh
73. Văn học và ngôn ngữ (ĐH KHXH&NV- ĐHQG TP HCM)
74. BizLive
75. Khoa học phổ thông (Liên hiệp các hội KH&KT TP HCM)
76. Báo điện tử TẦM NHÌN
77. Cây thuốc quý (Website của Hội dược liệu Việt Nam)
78. Báo Văn nghệ (Hội Nhà văn Việt Nam)
79. Hướng nghiệp Việt Nam (Trung tâm tư vấn hướng nghiệp ViệtNam)
80. Tri thuc VN
81. Người đô thị (Viện nghiên cứu đô thị và phát triển hạ tầng)
82. Theleader (Cơ quan báo chí của Hội các Nhà quản trị doanh nghiệp Việt Nam)
83. Phụ nữ (Hội Liên hiệp Phụ nữ TP HCM)
84. Kinh tế và đô thị (UBND Tp.Hà Nội)
85. Người tiêu dùng
86. Báo Giáo dục - TP Hồ Chí Minh
87. Phu Nu Today
88. Phụ nữ Việt Nam (Cơ quan TW Hội LHPN VN)
89. Chung ta (Công ty CP Chúng Ta Học)
90. Đất Việt (Diễn đàn của Liên hiệp các Hội KH&KT Việt Nam)
91. Luật Việt Nam
92.Công lý (Cơ quan của Tòa án nhân dân tối cao)
93. Du lịch Việt Nam
94. Thời đại (Diễn đàn của Liên hiệp các tổ chức hữu nghị Việt Nam)
95. Môi trường và đô thị (Toà soạn : 1802A, Cao ốc M3 M4, 91 Nguyễn Chí Thanh, Đống Đa, Hà Nội.)
96. Hạt giống tâm hồn
97. Nam kỳ lục tỉnh
Thứ Hai, 24 tháng 4, 2017
Thứ Năm, 20 tháng 4, 2017
Đọc thơ trên mạng
1.Truyện Kiều- [Xem tại đây]
2. Gửi bác Trần Nhuận Minh. [Xem tại đây]
3. Tiếng địch sông Ô. Xem tại đây.
4.Cuộc đời yêu như vợ của ta ơi - Thơ Việt Phương, đọc thơ tại đây; xem bài viết tại đây
5. Hai chị em - Thơ Vương Trọng, đọc tại đây.
6. CHỊ - Thơ Võ Văn Trực, đọc tại đây.
7.Thị mầu - Thơ Anh Ngọc, đọc tại đây hoặc tại đây
2. Gửi bác Trần Nhuận Minh. [Xem tại đây]
3. Tiếng địch sông Ô. Xem tại đây.
4.Cuộc đời yêu như vợ của ta ơi - Thơ Việt Phương, đọc thơ tại đây; xem bài viết tại đây
5. Hai chị em - Thơ Vương Trọng, đọc tại đây.
6. CHỊ - Thơ Võ Văn Trực, đọc tại đây.
7.Thị mầu - Thơ Anh Ngọc, đọc tại đây hoặc tại đây
8.các vị La Hán chùa Tây Phương - Thơ Huy Cận, đọc tại đây.
*
**
PHẠM THUẬN THÀNH
Nhà ta
I
Bây giờ đang là nhà ta
Ba gian hai chái như là ngày xưa
Không sợ nắng chẳng sợ mưa
Chắn che điều ác để giờ con khôn
II
Bây giờ đang là nhà ta
Mồ hôi nước mắt hơn toà lầu cao
Bớt ăn bớt mặc năm nao
Góp gom gỗ lạt biết bao công trình
III
Bây giờ đang là nhà ta
Phá ra xây gác hoá ra nhà người
Nào đâu góc đọng tiếng cười
Nào đâu góc chứa những lời yêu thương
Nào đâu góc toả mùi hương
Nào đâu góc chật tiếng trường ê a
Bây giờ đang là nhà ta
Phá ra xây mới hoá ra nhà người.
Nguồn: Tại đây.
*
* *
BIỂN
(XUÂN DIỆU)
Anh không xứng là biển xanh
Nhưng anh muốn em là bờ cát trắng
Bờ cát dài phẳng lặng
Soi ánh nắng pha lê
Bờ đẹp đẽ cát vàng
Thoai thoải hàng thông đứng
Như lặng lẽ mơ màng
Suốt ngàn năm bên sóng
Anh xin làm sóng biếc
Hôn mãi cát vàng em
Hôn thật khẽ, thật êm
Hôn êm đềm - mãi mãi
Đã hôn rồi. Hôn lại
Cho đến mãi muôn đời
Đến tan cả đất trời
Anh mới thôi dào dạt
Cũng có khi ào ạt
Như nghiền nát bờ em
Là lúc triều yêu mến
Ngập bến của ngày đêm
Anh không xứng là biển xanh
Nhưng cũng xin làm bể biếc
Để hát mãi bên ghềnh
Mối tình chung thắm thiết
Để những khi bọt tung trắng xoá
Và gió về bay toả nơi nơi
Như hôn mãi ngàn năm không thoả
Bởi yêu bờ lắm lắm, em ơi!
*
* *
BIỂN
(XUÂN DIỆU)
Anh không xứng là biển xanh
Nhưng anh muốn em là bờ cát trắng
Bờ cát dài phẳng lặng
Soi ánh nắng pha lê
Bờ đẹp đẽ cát vàng
Thoai thoải hàng thông đứng
Như lặng lẽ mơ màng
Suốt ngàn năm bên sóng
Anh xin làm sóng biếc
Hôn mãi cát vàng em
Hôn thật khẽ, thật êm
Hôn êm đềm - mãi mãi
Đã hôn rồi. Hôn lại
Cho đến mãi muôn đời
Đến tan cả đất trời
Anh mới thôi dào dạt
Cũng có khi ào ạt
Như nghiền nát bờ em
Là lúc triều yêu mến
Ngập bến của ngày đêm
Anh không xứng là biển xanh
Nhưng cũng xin làm bể biếc
Để hát mãi bên ghềnh
Mối tình chung thắm thiết
Để những khi bọt tung trắng xoá
Và gió về bay toả nơi nơi
Như hôn mãi ngàn năm không thoả
Bởi yêu bờ lắm lắm, em ơi!
*
* *
Thứ Tư, 19 tháng 4, 2017
Đọc báo mạng (Từ 19-4-17)
Thứ ba, 09-5-17:
*/ Tát học sinh vì bị đùa cợt, thầy giáo mất việc (VNN, 09-5-17)
Chủ nhật, 07-5-17:
*/
Thứ năm, 04-5-17:
Nhớ nhà văn hóa Nguyễn Khắc Viện (ND, 05-5-17)Thứ năm, 04-5-17:
*/Câu chuyện phụ huynh cho con học tại nhà (không đến trường)
- Cái kết lặng người từ câu chuyện 2 học sinh nghỉ phổ thông tự học ở nhà (VNN, 03-5-17)
- Trường học chính là xã hội thu nhỏ mà con trẻ được tiếp xúc (DT, 4-5-17)
Thứ tư, 03-5-17:
*/ Tiểu thuyết Việt 2016 và tín hiệu mới từ thị trường xuất bản (VNQĐ, 02-5-17)
*/ Vì sao tình trạng “suy thoái tư tưởng đạo đức” ngày càng trầm trọng? (VOV, 02-5-17)
Thứ ba, 02-5-17:
*/Người giàu có sang không? (TP, 30-4-17)
Chủ nhật, 30-4-17:
*/ Hồi ký Trần Trọng Kim: Một sử liệu đáng quý (Zing, 29-4-17)
*/ Khách quan và bình lắng nhìn về một quá khứ đầy xung đột (TS, 26-4-17)
*/ GS Nguyễn Minh Thuyết: 'Không thể nhập khẩu sách giáo khoa' (VnEx, 28-4-17)
bài có tính lịch sử (để tham khảo): Ngày 6/1: Mã Morse được phát minh bởi một họa sĩ
Xem thêm tại đây, tại đây
Thứ bảy, 29-4-17:
*/ Những thất bại của ông Trump trong 100 ngày đầu tại vị (DT, 29-4-17)
*/ Chuyện tiếp quản ngân hàng quốc gia Việt Nam cộng hòa (TT, 29-4-17)
*/ Bộ công an rút đề xuất cấm dùng thiết bị ghi hình lén (TT, 28-4-17)
*/ Cử nhân càng nhiều, thất nghiệp càng tăng (DNSG, 26-4-17)
*/ Giáo sư Hồ Ngọc Đại : Hãy lắng nghe dù chỉ còn một ý kiến khác (VN, 28-4-17) PV giáo sư Hồ Ngọc Đại
*/ Bhutan – Quốc gia hạnh phúc hay chiến lược marketing của quốc gia? (DNSG, 23/4/17)
Thứ sáu, 28-4-17:
*/ Những dấu hiệu bạn không có 'số' giàu (VnExp, 28/4/17)
*/ GS.TS Nguyễn Văn Minh: Trải nghiệm sáng tạo không phải là một môn học (DT, 28-4-17)
*/ Vụ Đồng Tâm và trò lố của những “nhà dân chủ” (CAND, 27-4-17)
*/ Có một Tướng Trà rất khác (Viettimes, 26-4-17)
*/ “GS quần đùi”: Phải hiểu tại sao tôi vận quần đùi lên lớp (Viettimes, 26-4-17)
*/ Tôn vinh hay mua bán danh hiệu? (NNVN, 24-4-17)
Thứ ba, 25-4-17:
*/ Bàn về cam kết của ông Nguyễn Đức Chung ở Đồng Tâm (VOV, 24-4-17)
*/ Sự việc ở Đồng Tâm: Cần thay đổi cung cách làm việc với người dân (DT, 24-4-17)
*/ GS Đặng Hùng Võ: Pháp luật đất đai của Việt Nam có 3 lỗ hổng lớn (VnF, 24-4-17)
*/ Viết nhân ngày 30/4 - Kỳ 3: Chuẩn tướng Hạnh điều binh khiển tướng (TP, 24-4-17)
*/ Trải nghiệm bằng trang sách (TB KTSG, 23-4-17)
*/ Vụ việc ở Đồng Tâm diễn ra như thế nào? (Zing, 23-4-17)
*/ 3 cam kết của ông Nguyễn Đức Chung với người dân Đồng Tâm (Zing, 22-4-17)
Thứ hai, 24-4-17:
*/ Đào tạo tiến sĩ sau năm 2017 - càng lên cao tiêu chuẩn càng... thấp (GD, 23-4-17)
*/ Bộ trưởng Mai Tiến Dũng yêu cầu nghiêm túc thực hiện chỉ đạo của Thủ tướng (GD, 22-4-17)
*/ Vụ dân Đồng Tâm giữ cán bộ, cảnh sát: Cần lắm sự thấu hiểu! (LĐ, 23-4-17)
*/ 'Với tôi, sách cũ quý hơn vàng!' (Zing, 22-4-17)
*/ Vĩnh Phúc: UBKT Tỉnh ủy kết luận vụ “không có hồ sơ đảng viên" tại huyện Sông Lô (TH&CL, 20-4-17)
Thứ bảy, 22-4-17:
*/ Từ chạn sách nhà ông bà ngoại tôi ngày ấy... (ND, 21-4-17)
*/ Con trai út nhà sử học Trần Huy Liệu: Ông tự 'chuốc' khổ tâm (TT, 20-4-17)
*/ Chiến lược giải cứu thịt lợn: Trái đắng Trung Quốc (ĐV, 21-4-17)
Thứ tư, 19-4-17:
*/ Giáo viên muốn môn Toán 'học gì thi nấy, không đánh đố' (VnEx, 20-4-17)
*/ 900 ngàn giáo viên phổ thông, ai theo được chương trình mới? (GD, 20-4-17)
*/ Việt Nam nói về thông tin Mỹ chuyển giao tàu tuần tra (NLĐ, 20-4-17)
*/ Việt Nam phản ứng việc Trung Quốc tập trận bắn đạn thật ở Biển Đông (NLĐ, 20-4-17)
*/Thác Bản Giốc thành trọng điểm du lịch quốc gia, quy mô 1.000 ha (NLĐ, 20-4-17)
*/ Nhà thơ Xuân Quỳnh chính thức được tặng Giải thưởng Hồ Chí Minh (Petrotimes, 18-4-17)
*/ HTX kiểu mới - mô hình quan trọng để phát triển đất nước (ĐĐK, 20-4-17) Xem thêm về HTX kiểu mới: Xây dựng HTX kiểu mới, khâu đột phá để phát triển nông nghiệp bền vững (ĐĐK, 27-11-16)
Tin cũ: +/ 2 mẹ con giết người trúng đề, ném xác xuống sông phi tang (NLĐ, 29-3-17)
Xem thêm tại đây
Thứ tư, 19-4-17:
*/ Đối thoại ở thôn Hoành (VnEx, 19-4-17)
*/ Thông tin mới nhất vụ gây rối trật tự ở huyện Mỹ Đức (VNN, 18-9-17)
Thứ Năm, 13 tháng 4, 2017
Macro trong excel và lập trình VBA - Phần 2
Xem phần 1 tại đây
1.Biến mảng:
Trong nhiều trường hợp ta phải sử dụng biến mảng để xử lý. Để hiểu về biến mảng, ta xét vài ví dụ sau:
Ví dụ 1:
Sub Vi_du_1()
Dim M1(1 To 30) As Integer
Dim i As Integer
For i = 1 To 30
M1(i) = i * 2 + 1
Next i
For i = 1 To 30
Cells(i + 2, 2) = M1(i)
Next i
End Sub
1.Biến mảng:
Trong nhiều trường hợp ta phải sử dụng biến mảng để xử lý. Để hiểu về biến mảng, ta xét vài ví dụ sau:
Ví dụ 1:
Sub Vi_du_1()
Dim M1(1 To 30) As Integer
Dim i As Integer
For i = 1 To 30
M1(i) = i * 2 + 1
Next i
For i = 1 To 30
Cells(i + 2, 2) = M1(i)
Next i
End Sub
Trong ví dụ trên ta đã khai báo một biến mảng có tên là M1. Biến mảng M1 có 30 phần tử được thể hiện trong cặp dấu ngoặc đơn bằng 1 To 30. Mỗi phần tử của M1 là một số nguyên. Câu lệnh For thứ nhất trong ví dụ trên gán giá trị cho các phần tử của mảng. Câu lệnh For thứ hai in các phần tử mảng ở cột B, từ dòng thứ 3.
Ví dụ 2:
Sub Vi_du_2()
Dim M1(1 To 30) As String
Dim i As Integer
For i = 1 To 21
M1(i) = Cells(i + 2, 2)
Next i
For i = 1 To 21
Cells(i + 2, 4) = M1(i)
Next i
End Sub
Trong ví dụ trên mỗi phần tử của mảng M1 là một xâu kí tự. Câu lệnh For thứ nhất đọc các giá trị trên cột B từ dòng thứ 3 đến dòng thứ 23 vào mảng. Câu lệnh For thứ hai in nội dung biến mảng vào cột D (các phần tử từ 1 đến 21) từ dòng thứ 3 đến dòng thứ 23
Bạn có thể chạy thử để kiểm nghiệm.
Bạn hãy tự đặt cho mình những bài toán có sử dụng biến mảng để sử dụng mảng cho thuần thục nhé.
Ví dụ dưới đây sẽ nói đến mảng 2 chiều.
(còn tiếp)
Ví dụ 2:
Sub Vi_du_2()
Dim M1(1 To 30) As String
Dim i As Integer
For i = 1 To 21
M1(i) = Cells(i + 2, 2)
Next i
For i = 1 To 21
Cells(i + 2, 4) = M1(i)
Next i
End Sub
Trong ví dụ trên mỗi phần tử của mảng M1 là một xâu kí tự. Câu lệnh For thứ nhất đọc các giá trị trên cột B từ dòng thứ 3 đến dòng thứ 23 vào mảng. Câu lệnh For thứ hai in nội dung biến mảng vào cột D (các phần tử từ 1 đến 21) từ dòng thứ 3 đến dòng thứ 23
Bạn có thể chạy thử để kiểm nghiệm.
Bạn hãy tự đặt cho mình những bài toán có sử dụng biến mảng để sử dụng mảng cho thuần thục nhé.
Ví dụ dưới đây sẽ nói đến mảng 2 chiều.
(còn tiếp)
Thứ Tư, 5 tháng 4, 2017
Đăng ký:
Bài đăng (Atom)