獅子さんのアプリ開発日記
cocos2d-x / XCode によるスマートフォンのアプリ開発(c++)
Monday, July 20, 2015
Sunday, July 19, 2015
Sunday, July 6, 2014
auスマートパスの退会
スマートパスのアプリからだと「ページが表示されません」と言われて退会できない。
そこで、au Marketアプリのほうからログインし、アプリ(右上の||縦二本線)→ auスマートパストップ→ auスマートパス(のフォルダアイコン)→ 「各種サービス入会・退会」→ 「auスマートパス」退会(スマートパスのアプリと中身は実質同じ)これでいける。
Friday, January 17, 2014
Access VBAのテキストボックス入力制御
' 使用例 Call chkKeyPress(KeyAscii, TextBox1, 8, "[0-9]")
'【パターン例】
'"[0-9]" '半角数字のみ入力可
'[A-Z] 半角英字のみ
'[!0-9] 半角数字以外
'[!A-Z] 半角英字以外
' キー入力チェック関数
Public Sub chkKeyPress(ByRef KeyAscii As MSForms.ReturnInteger, _
txtTest As Object, _
maxLength As Long, _
pattern As String)
Select Case KeyAscii
Case vbKeyBack, vbKeyDelete, vbKeyEscape ' BS,Del,Escapeは除外
Exit Sub
End Select
If Not Chr(KeyAscii) Like pattern Then
KeyAscii = 0
Exit Sub
End If
If LenB(StrConv(txtTest.Text, vbFromUnicode)) - txtTest.SelLength >= maxLength Then
KeyAscii = 0
End If
End Sub
Tuesday, September 24, 2013
Monday, September 23, 2013
Subscribe to:
Posts (Atom)