初次接觸VB的經歷

2021-05-23 16:16:28 字數 1239 閱讀 7505

1.字串的連線操作:

dim g_strinipath as string

2.對ini檔案的操作:

寫ini檔案:

call writeprivateprofilestring("videoinfo", "lvideostandard", g_strvideostandard, g_strinipath)

讀ini檔案:

public sub readstring()

dim ret     as long

dim buff     as string

buff = string(255, 0)

ret = getprivateprofilestring("videoinfo ", "lvideostandard", "pal", buff, 256, g_strinipath)

if cdbl(ret) = -1 then

g_strvideostandard = "pal"

else

g_strvideostandard = buff

end if

call msgbox(g_strvideostandard)

end sub

3.option控制項的使用和字串的比較:

private sub optntsc_click()

g_strvideostandard = "ntsc"

call sdk30001.setvideostandard(1)

end sub

private sub optpal_click()

g_strvideostandard = "pal"

call sdk30001.setvideostandard(32)

end sub

if strcomp(g_strvideostandard, "pal", 1) = 0 then

msgbox ("pppppppp")

'lvideostandard = 32

'optpal.value = true

'optntsc.value = false

elseif strcomp(g_strvideostandard, "ntsc", 1) = 0 then

msgbox ("nnnnnnnnn")

'lvideostandard = 1

'optntsc.value = true

'optpal.value = false

end if

perl 的初次接觸

以前做文字的處理主要是使用python。但kaldi中使用perl比較多,所以也有必要了解一些。先從接觸run.pl 開始吧 run.pl 是kaldi中進行本地並行處理的指令碼。使用方法 run.pl log file command line arguments.主要功能是解析引數,將comma...

初次接觸perl

今天貝在煩乙個程式,也為難他了,剛學perl不到兩天,就讓他寫程式完成功能,雖然現在他有很大的提高,但是也還是心裡沒底啊。第一次布置的任務,他說如果不完成還是挺不好的,呵呵,沒辦法,我就樂於助人,趕緊看了看perl的大概語法,變數迴圈等,然後找了相關的網頁看了看,還好,因為比較熟悉c語言,而且上過s...

初次接觸powershell

在linux下接觸shell後,發現shell的功能是如此的強大!window呢?同樣,學習了 nix的做法,實現了shell,稱為powershell,在我看來,這個名字取得不過份,它通過。net與shell的結合,提供了強大的平台操作功能,提供了與 nix的相同的命令的語法,令 nix的程式設計...