T.Hayashi's Diary | 掲示板 | ML案内 | リンク | Yahoo! | 自作ソフト紹介 | 自己紹介
マウスコンピューター/G-Tune
日記
バイク・オートバイ
PC
クルマ
交通取締
ダイエット・健康
食べ歩き・うどん
映画・音楽・漫画

携帯電話版




★ VisualBasic関数のラッパーDLL VBWRAP ver1.00



 ASPやVBSで,

  「format関数が使えない!!!」
  「val関数はどこにいった!!!」

 と,お嘆きの貴方へ。他にもチョイチョイと包んでみました。


・VisualBasicにはあるのにVisual Basic Scripting Editionには何故か無い関数を呼び出します。

・誰かがラッパーを作って公開しているものだと思っていたのですが,探して見つからなかったので…。

・呼び出せる機能は,以下のとおりです。

  ・Format関数
  ・Strconv関数
  ・Val関数
  ・Midステートメント
  ・Like演算子
  ・FileDateTime関数
  ・FileLen関数
  ・MonthDays関数(自作。年月から当月の日数を得られます)


Windows2000で動作します。
Win98,Me,NT4.0でも動作すると思いますが未確認です。

30日間試用できるシェアウエア形式です。登録料は¥1000です。
振込先はダウンロードファイル内の「readme.txt」に記載しています。

まずはお使い頂きまして,お気に召しましたら,お振込みをお願い致します <(_ _)>


ダウンロード(vbwrap100.lzh) 983KB LZH形式


動作サンプル  実際に使用した結果を出力させています。

'vbWrap オブジェクト生成
dim oVbWrap
set oVbWrap = createObject("vbWrap.vbFunction")

vbfFormat メソッド 使用例  (Format関数ラッパー)
結果
数値の桁を揃えて出力

oVbWrap.vbfFormat(second(time), "00000")
00036
カンマ,小数点を揃えて出力

oVbWrap.vbfFormat(minute(time) * 100 + second(time) / 100, "#,##0.00")
2,400.36
現在の年月日を揃えて出力

oVbWrap.vbfFormat(date, "yyyy/mm/dd")
2019/05/22
現在時刻を和暦で出力

oVbWrap.vbfFormat(now, "gggee年mm月dd日 aaaa hh:nn:ss")
平成31年05月22日 水曜日 14:24:36
現在の年月日を,月を英語で出力

oVbWrap.vbfFormat(now, "d-mmmm-yy")
22-May-19


vbfStrConv メソッド 使用例 (StrConv関数ラッパー)
結果
大文字,全角に変換

oVbWrap.vbfStrConv("アイウエオ abc", 1 + 4)
アイウエオ ABC
カタカナ→ひらがな変換

oVbWrap.vbfStrConv("ラッパー", 32)
らっぱー


vbfVal メソッド 使用例 (Val関数ラッパー)
結果
16進数表記文字列を数値に変換

oVbWrap.vbfVal("&hfe")
254
8進数表記文字列を数値に変換

oVbWrap.vbfVal("&o10")
8


vbsMid メソッド 使用例 (Midステートメントラッパー)
結果
”abcde”の3文字目からを”xy”に置き換えます

oVbWrap.vbsMid("abcde", 3, "xy")
abxye


vbcLike メソッド 使用例 (Like演算子ラッパー)
結果
1文字目が”a”であるかを調べます

oVbWrap.vbcLike("abcde", "a*")
True
1文字目が”b”であるかを調べます

oVbWrap.vbcLike("abcde", "b*")
False


vbfFileDateTime メソッド 使用例 (FileDateTime関数ラッパー)
結果
自ファイルの更新日時を取得

oVbWrap.vbfFileDateTime(server.mappath("vbwrap.asp"))
2014/10/05 20:38:19
トップページの更新日時を取得

oVbWrap.vbfFileDateTime(server.mappath("../index.asp"))
2014/10/05 20:38:20


vbfFileLen メソッド 使用例 (FileLen関数ラッパー)
結果
自ファイルのバイト長を取得

oVbWrap.vbfFilelen(server.mappath("vbwrap.asp"))
17091
トップページのバイト長を取得

oVbWrap.vbfFilelen(server.mappath("../index.asp"))
12090



MonthDays メソッド 使用例 (年月から当月の日数を返します)
結果
今月の日数を取得

date & " → " & oVbWrap.MonthDays(date)
2019/05/22 → 31
2002年5月の日数を取得

oVbWrap.MonthDays("2002/5")
31







画面上へ 
当サイトの内容は全てフィクションです。内容に関して一切の責任を負いません。
当サイトに掲載の文章・写真の無断転載/著作権法に定められた範囲を超える引用を禁じます。
すべての内容は日本の著作権法並びに国際条約により保護されています。

ブログ  楽天 ライブドア エキサイト goo はてなダイアリー