else If message.Text = "/replykeyboard" Then
Log("ReplyKeyboard requested")
Dim kmark As ReplyKeyboardMarkup
kmark.initkeyboard(1,3)
kmark.SetButton(0,0,"BTN0-0")
kmark.SetButton(0,1,"BTN0-1")
kmark.SetButton(0,2,"BTN0-2")
kmark.SetButton(1,0,"BTN1-0")
kmark.SetButton(1,1,"BTN1-1")
kmark.SetButton(1,2,"BTN1-2")
kmark.initialize(kmark.GetKeyboard,True,True,True)
Dim buttons As Message = jtb.sendMessage(jtb.byId(from.Id),"Yo man","MARKDOWN",False,False,message.MessageId,kmark)