Simple Sand Samples

プログラミング言語サンプル集

---

TOPへ

Hello World!(各言語のTOP)

(変換)10進数->16進数

(変換)10進数->8進数

(文字列)文字列を連結する

(文字列)小文字->大文字 変換

(文字列)大文字->小文字 変換

(文字列)文字列の長さを得る

(文字列)文字列を左右反転

(文字列)文字列を置換する

(文字列)文字列を置換(初回マッチのみ)

(文字列)10進文字列->数値 変換

(文字列)16進文字列->数値 変換

(文字列)文字列->文字コード 変換

(文字列)文字列の一部を取り出す

(文字列)文字列を分割する

(文字列)一文字毎に分割する

(連想配列)連想配列(辞書)を使う

(テキスト)標準入力を読み込んで表示

(テキスト)全行一括読み込み

(テキスト)ファイル読み込み

(テキスト)ファイル書き込み

(テキスト)全行左右反転

(テキスト)ファイルのタブスペース変換

(テキスト)ファイル行数を数える

(テキスト)列挙した数の合計を求める

(テキスト)CSVファイル読み込み

(正規表現)正規表現を使う

(ファイル)カレントディレクトリ取得

(ファイル)ディレクトリ存在チェック

(ファイル)ディレクトリのファイル一覧

(日付時刻)今日の日付を得る

(日付時刻)現在の時刻を得る

(日付時刻)日付と時刻を得る

乱数を使う

(RDBMS)MySQLへ接続する

(RDBMS)MDB(MSAccess)へ接続

(MsgBox)MsgBoxを使う

(Excel)Excelを起動する

(Excel)ブックを保存

(Excel)ブックを開く

(Excel)ブックを複数開く

(Excel)シートを追加する(末尾)

(Excel)シートを追加する(先頭)

(Excel)セルに値を設定する

(Excel)セルの前景色を設定する

(Excel)セルの背景色を設定する

(Excel)コメントオブジェクトを使う

(Excel)罫線を引く

(Excel)罫線の色や太さを変更する

(Excel)図形作成

(Excel)タイミングチャート作成

---

COBOL	awk	C言語	D言語	GO言語	Lua	Vim
bash	Perl	Gauche	Clojure	CLISP	EmacsLisp	VimScript
tcsh	Ruby	Groovy	Java	C#	VBScript	JavaScript
Io言語	Python	Erlang	Scala	VB.NET	Excel/VBA	PHP
Tcl	Haskell		OCaml	PowerShell	Windows	Unix/Linux

VBS > CSVファイルを読み込む

    read-csv.vbs

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
basedir = CreateObject("WScript.Shell").CurrentDirectory
filename = WScript.Arguments.Item(0)
With CreateObject("Scripting.FileSystemObject")
	out = ""
	Set fp = .OpenTextFile(filename)
	Do While fp.AtEndOfStream <> True
		row = Split(fp.ReadLine, ",", -1, VbTextCompare)
		For Each m In row
			sp =""
			For i = Len(m) To 3
				sp = sp & " "
			Next
			out = out & sp & m
		Next
		out = out & VbCrLf
	Loop
	fp.Close
	WScript.Echo out
End With

C:\> type sample.csv
1,2,3,4,5,6,7,8,9
2,4,6,8,10,12,14,16,18
3,6,9,12,15,18,21,24,27
4,8,12,16,20,24,28,32,36
5,10,15,20,25,30,35,40,45
C:\> cscript read-csv.vbs sample.csv
Microsoft (R) Windows Script Host Version 5.7
Copyright (C) Microsoft Corporation 1996-2001. All rights reserved.

 1  2  3  4  5  6  7  8  9 
 2  4  6  8 10 12 14 16 18 
 3  6  9 12 15 18 21 24 27 
 4  8 12 16 20 24 28 32 36 
 5 10 15 20 25 30 35 40 45