:D   Private Sub LaharePost.Chautari
  
  Dim Lahare_Says = Guf

 Dim Ritthe_Says = Guf

  Set GufPlace = Chautari

   If Lahare_Says = Shayari Then
    MsgBox ("दुर्से देक्का तो बारिसहो रहिथि, नजिक आया तो भेँस नाहारहिथि etc.)

Else  MsgBox ("Lahare_Says= Ritthe_Says ")

    Exit Sub
  End If

End Sub