The Sadness Vietsub Jun 2026

(tên tiếng Trung: 哭悲 - Khốc Bi) là một trong những từ khóa được cộng đồng mê phim kinh dị tại Việt Nam săn đón nhiều nhất trong những năm gần đây. Ra mắt năm 2021 bởi đạo diễn người Canada Rob Jabbaz tại Đài Loan, tác phẩm này đã phá vỡ mọi giới hạn thông thường của dòng phim xác sống và body horror. Bộ phim nhanh chóng trở thành một "cơn ác mộng" đầy ám ảnh đối với người xem.

Giữa bối cảnh hỗn loạn đó, cặp tình nhân trẻ Jim và Kat bị chia cắt ở hai đầu thành phố. Hành trình Jim tìm cách vượt qua những con phố đầy rẫy những kẻ cuồng sát để giải cứu Kat chính là trục xương sống của toàn bộ tác phẩm. 2. Định Nghĩa Lại Dòng Phim Zombie Và Slasher

(tên gốc tiếng Trung: 哭悲 - Khốc Bi ) là một trong những từ khóa được tìm kiếm nhiều nhất bởi cộng đồng mê phim kinh dị Việt Nam kể từ khi tác phẩm này ra mắt. Được đánh giá là bộ phim vượt qua mọi giới hạn thông thường của dòng phim đại dịch, tác phẩm kinh dị Đài Loan này đã tạo nên một làn sóng thảo luận bùng nổ nhờ mức độ tàn bạo, máu me và những thông điệp xã hội đầy ám ảnh.

(tựa Việt: Virus Đẫm Máu hoặc Khóc Bi ) là một trong những bộ phim kinh dị Đài Loan gây sốc nhất những năm gần đây. Được viết kịch bản và đạo diễn bởi Rob Jabbaz, tác phẩm này đã đẩy giới hạn của dòng phim "zombie" lên một tầm cao mới về sự tàn khốc và điên rồ. 1. Cốt truyện kịch tính và tàn bạo The Sadness Vietsub

Phụ nữ mang thai hoặc những ai dễ bị thao túng tâm lý bởi các hình ảnh tiêu cực. Hướng Dẫn Tìm Kiếm Và Xem Phim Bản Đẹp

"The Sadness" is a cinematic endurance test, a film that pushes its audience to the absolute limit. For those brave enough to seek it out, a "The Sadness Vietsub" is the key that unlocks this terrible, violent world, allowing Vietnamese-speaking audiences to fully immerse themselves in its shocking narrative. Whether it's for academic interest, a love of gore, or just morbid curiosity, the journey to find "The Sadness Vietsub" is a journey into the heart of 21st-century cult horror.

The Sadness Vietsub: Đỉnh Cao Kinh Dị Và Nỗi Ám Ảnh Bạo Lực Không Dành Cho Số Đông (tên tiếng Trung: 哭悲 - Khốc Bi) là

(2021) của đạo diễn Rob Jabbaz không chỉ đơn thuần là một tác phẩm kinh dị thây ma; nó là một hành trình tàn khốc vào sâu thẳm sự băng hoại của con người khi mọi xiềng xích đạo đức bị tháo bỏ.

Bộ phim lấy bối cảnh một thành phố Đài Bắc giả tưởng đang phải đối mặt với virus "Alvin". Ban đầu, người dân và chính phủ đều chủ quan, coi virus này chỉ như một loại cúm mùa thông thường. Tuy nhiên, virus bất ngờ đột biến, tác động trực tiếp vào hệ thần kinh trung ương của người nhiễm. Nó giải phóng hoàn toàn những bản năng đen tối, tàn bạo và bệnh hoạn nhất của con người, biến họ thành những kẻ khát máu nhưng vẫn giữ nguyên trí thông minh và ý thức. Cốt Truyện Kịch Tính Và Nghẹt Thở

The businessman’s head twitched violently to the side, his neck snapping with an audible crack. He didn't seem to mind the pain. In fact, his eyes—bloodshot and weeping crimson tears—were filled with a perverse, ecstatic delight. Giữa bối cảnh hỗn loạn đó, cặp tình

Bộ phim lấy bối cảnh tại thành phố Đài Bắc sau một năm chống chọi với đại dịch virus Alvin (một biến thể giả tưởng của virus cúm). Mọi chuyện trở nên tồi tệ khi virus đột ngột đột biến, không biến nạn nhân thành những thây ma vô hồn mà biến họ thành những kẻ sát nhân điên cuồng, tàn bạo và cực kỳ biến thái.

Because the film is so fast-paced, you cannot afford to pause and re-read garbled subtitles. Official Vietsub files ( .srt or .ass ) are timed perfectly to the action, ensuring you don't miss a beat while reading.

Sub LabelCaptions(lMonth As Long, lYear As Long)
Dim lCount As Long            'Counter
Dim lNumber As Long           'Counter
Dim lMonthPrev As Long        'Previous month
Dim lDaysPrev As Long         'Days in previous month
Dim lYearPrev As Long         'Previous year

'Get the month name from the month number
sMonth = MonthName(lMonth)

'Save month number in variable
lSelMonth = lMonth

'Save year in variable
lSelYear = lYear

'Prepare for getting days in previous month
Select Case lMonth
   Case 2 To 11
      lMonthPrev = lMonth - 1
      lYearPrev = lYear
   Case 1
      lMonthPrev = 12
      lYearPrev = lYear - 1
   Case 12
      lMonthPrev = 11
      lYearPrev = lYear
End Select

'Days in month (function call - see below)
lDays = DaysInMonth(lMonth, lYear)
'Days in previous month
lDaysPrev = DaysInMonth(lMonthPrev, lYearPrev)

'If it is Jan. 1900 the
'back button is disabled.
If lSelYear >= 1900 And lSelMonth > 1 Then
   lblBack.Enabled = True
ElseIf lSelYear = 1900 And lSelMonth = 1 Then
   lblBack.Enabled = False
End If

'If this wasn't started by a selection
'in one of the combo boxes (month, year).
If bCmbSel = False Then
   cmbMonth.Text = sMonth
   cmbYear.Text = lYear
End If

'Find the first date in the month.
lFirstDayInMonth = DateSerial(lSelYear, lSelMonth, 1)

'Find the weekday number using local settings for
'first day of the week. We want to know if it is a
'Monday etc. for putting the first day of the month
'in the right weekday position.
'The first day of a week varies from country to country.
'In USA it is Sunday, in Denmark it is Monday.
'So we use vbUseSystemDayOfWeek to get the local settings.
lFirstDayInMonth = Weekday(lFirstDayInMonth, vbUseSystemDayOfWeek)

If lFirstDayInMonth = 1 Then
   lStartPos = 8
Else
   lStartPos = lFirstDayInMonth
End If

'Days from previous month if the
'first day in the month is not a monday.
lNumber = lDaysPrev + 1
For lCount = lStartPos - 1 To 1 Step -1
   lNumber = lNumber - 1
   With colLabels.Item(lCount)
      .Caption = lNumber
      .ForeColor = &HE0E0E0
   End With
Next

'The labels/buttons for the days of the month.
lNumber = 0
For lCount = lStartPos To lDays + lStartPos - 1
   lNumber = lNumber + 1
   With colLabels.Item(lCount)
      .Caption = lNumber
      .ForeColor = &H80000012
   End With
Next

'The days (labels) in next month
lNumber = 0
For lCount = lDays + lStartPos To 42
   lNumber = lNumber + 1
   With colLabels.Item(lCount)
      .Caption = lNumber
      .ForeColor = &HE0E0E0
   End With
Next

End Sub

Function DaysInMonth(lMonth As Long, lYear As Long) As Long

'Number of days in month
Select Case lMonth
   Case 1, 3, 5, 7, 8, 10, 12
      DaysInMonth = 31
   Case 2
      'Leap year?
      If IsDate("29/2/" & lYear) = False Then
         DaysInMonth = 28
      Else
         DaysInMonth = 29
      End If
   Case Else
      DaysInMonth = 30
End Select

End Function

Option Explicit

'By declaring Public WithEvents we can handle
'events "collectively". In this case it is
'the click event on a date label, and by
'doing it this way we avoid writing click
'events for each and every date label.
Public WithEvents InputLabel As MSForms.Label
Private Sub InputLabel_click()

'We change the look of the selected day
With InputLabel
   'If previous month
   If .Tag < lStartPos Then
      If UserForm1.lblBack.Enabled = True Then
         UserForm1.lblBack_Click
      End If
      Exit Sub
   End If
   If .Tag > lDays + lStartPos - 1 Then
      UserForm1.lblForward_Click
      Exit Sub
   End If
   'If selected already, we exit
   If .BorderColor = vbBlue Then Exit Sub
   
   .BorderColor = vbBlue
   .BorderStyle = fmBorderStyleSingle

   'If another day was chosen before this
   'one, we make that label look normal.
   If Len(sActiveDay) > 0 Then
      If sActiveDay <> InputLabel.Name Then
         With colLabels.Item(sActiveDay)
            .BorderColor = &H8000000E
            .BorderStyle = fmBorderStyleNone
         End With
      End If
   End If
   sActiveDay = InputLabel.Name
   lFirstDay = Val(InputLabel.Caption)
   
   'If a second date has not been selected
   If bSecondDate = False Then
      UserForm1.FillFirstDay
   Else
      'If it is the second date selected
      UserForm1.FillSecondDay
   End If
End With

End Sub