本と鍵の季節

圖片只供參考

圖書

本と鍵の季節

作者	米澤　穂信
出版社	集英社
出版日期	2018-12-14
編號/ISBN	9784087711738
定價 (配送說明)	通常配送 ~~139~~118 港幣 Saved $21 3-4 週到港
數量	本

關於此書

次郎は高校二年の図書委員。利用者のほとんどいない放課後の図書室で、同じく図書委員の松倉詩門（しもん）と当番を務めている。背が高く顔もいい松倉は目立つ存在で、快活でよく笑う一方、ほどよく皮肉屋ないいやつだ。そんなある日、図書委員を引退した先輩女子が訪ねてきた。亡くなった祖父が遺した開かずの金庫、その鍵の番号を探り当ててほしいというのだが……。　　　放課後の図書室に持ち込まれる謎に、男子高校生ふたりが挑む全六編。　爽やかでほんのりビターな米澤穂信の図書室ミステリ、開幕！　　　【著者プロフィール】　米澤穂信（よねざわ・ほのぶ）　　１９７８年岐阜県生まれ。大学卒業後、書店員勤務の傍ら小説を執筆。２００１年『氷菓』で第５回角川学園小説大賞（ヤングミステリー＆ホラー部門）　奨励賞を受賞してデビュー。『氷菓』をはじめとする古典部シリーズはアニメ化、漫画化、実写映画化され、ベストセラーに。　２０１１年『折れた竜骨』で第６４回日本推理作家協会賞（長編及び連作短編集部門）を受賞。２０１４年『満願』で第２７回山本周五郎賞を受賞。　『満願』と２０１５年刊行の『王とサーカス』はそれぞれ三つの年間ミステリランキングで１位に輝き、史上初の２年連続３冠を達成した。

精選產品

Disney 廸士尼

涵蓋樂園攻略、經典故事、繪本、手作與樂譜等。

陶瓷藝術日本陶藝書

收錄大師工藝、器物美學與技法指南，領略職人精神。

日本寫真集

人氣影星與偶像的限定寫真集。

日本週刊組裝雜誌

每期收集精密零件，親手打造高階經典模型。

MOOK 日本品牌附錄書

附贈限定潮牌包款與雜貨，超值收藏熱門潮流。

樂譜專區

動漫影視、J-Pop與古典，鋼琴、吉他、管樂等樂器一應俱全。

日本旅遊

日本自由行, 賞櫻絕景, 溫泉攻略, 飲飲食食, 自駕遊推薦。

《Casa BRUTUS》雜誌書

專注日本建築、設計與生活美學指南。

日本手作書

日本手作書：從飾品到生活小物，啟發無限創意，打造質感生活美學。

Imports System.Xml.Linq Imports System.Text Public NotInheritable Class SideBannerService Private Sub New() End Sub ' ========================================================================= ' FACEBOOK + SIDE BANNERS ' ========================================================================= Public Shared Function RenderSideFacebook() As String Dim path As String = "F:\xml_data\sidebanner.xml" Dim sb As New StringBuilder() sb.Append("

") ' 1. Load XML Banners (if file exists) If System.IO.File.Exists(path) Then Dim doc As XDocument = XDocument.Load(path) Dim items As IEnumerable(Of XElement) = doc.Root.Elements("side_banner") For Each item As XElement In items Dim url As String = If(item.Element("url") IsNot Nothing, item.Element("url").Value, "") Dim title As String = If(item.Element("title") IsNot Nothing, item.Element("title").Value, "") Dim isBlank As String = If(item.Element("isblank") IsNot Nothing, item.Element("isblank").Value, "") Dim img As String = If(item.Element("images") IsNot Nothing, item.Element("images").Value, "") Dim target As String = If(isBlank.ToUpper() = "Y", " target='_blank' rel='noopener noreferrer'", "") sb.Append("

") sb.Append(" ") sb.Append("

") Next End If ' 2. Facebook Widget Box (Matching exact legacy layout) sb.Append("

") sb.Append("

") ' Top Blue Header Bar sb.Append("

") sb.Append(" facebook") sb.Append("

") ' Inner Body: Logo + Name + Follow Button sb.Append("

") ' Left: Logo sb.Append(" ") sb.Append(" yoihon

") sb.Append(" ") ' Right: Text and Button sb.Append("

") sb.Append(" yoihon....") sb.Append(" ") sb.Append(" ") sb.Append(" Follow Page") sb.Append(" ") sb.Append("

") sb.Append("

") Return sb.ToString() End Function ' ========================================================================= ' FEATURE SECTION (FREE DELIVERY + PAYMENT METHODS) ' ========================================================================= Public Shared Function RenderSideFeature(lang As String) As String Dim sb As New StringBuilder() Dim altText As String = LanguagePack.GetText("lang_txt_freedelivery", lang) If String.IsNullOrEmpty(altText) Then altText = "Free Delivery" sb.Append("

") ' Free Delivery Banner sb.Append("

") sb.Append(" ") sb.Append(" " & altText & "

") sb.Append(" ") sb.Append("

") ' Payment Methods sb.Append("

") sb.Append("

") sb.Append(" ") sb.Append(" Payment Method Paypal, Payme, FPS, Visa, Mastercard

") sb.Append(" ") sb.Append("

") sb.Append("

") sb.Append(" ") sb.Append(" Octopus Card

") sb.Append(" ") sb.Append("

") sb.Append("

") Return sb.ToString() End Function End Class