1. 怎麼用VB在地圖上添加一個代表車輛的特殊符號,求源代碼!
創建一個新類,即可調用該類的加密和解密方法
Option Explicit
'Base64編碼函數:Base64Encode
'Instr1 編碼前字元串
'Outstr1 編碼後字元串
Public Function Base64Encode(InStr1 As String) As String
Dim mInByte(3) As Byte, mOutByte(4) As Byte
Dim myByte As Byte
Dim i As Integer, LenArray As Integer, j As Integer
Dim myBArray() As Byte
Dim OutStr1 As String
myBArray() = StrConv(InStr1, vbFromUnicode)
LenArray = UBound(myBArray) + 1
For i = 0 To LenArray Step 3
If LenArray - i = 0 Then
Exit For
End If
If LenArray - i = 2 Then
mInByte(0) = myBArray(i)
mInByte(1) = myBArray(i + 1)
Base64EncodeByte mInByte, mOutByte, 2
ElseIf LenArray - i = 1 Then
mInByte(0) = myBArray(i)
Base64EncodeByte mInByte, mOutByte, 1
Else
mInByte(0) = myBArray(i)
mInByte(1) = myBArray(i + 1)
mInByte(2) = myBArray(i + 2)
Base64EncodeByte mInByte, mOutByte, 3
End If
For j = 0 To 3
OutStr1 = OutStr1 & Chr(mOutByte(j))
Next j
Next i
Base64Encode = OutStr1
End Function
Private Sub Base64EncodeByte(mInByte() As Byte, mOutByte() As Byte, Num As Integer)
Dim tByte As Byte
Dim i As Integer
If Num = 1 Then
mInByte(1) = 0
mInByte(2) = 0
ElseIf Num = 2 Then
mInByte(2) = 0
End If
tByte = mInByte(0) And &HFC
mOutByte(0) = tByte / 4
tByte = ((mInByte(0) And &H3) * 16) + (mInByte(1) And &HF0) / 16
mOutByte(1) = tByte
tByte = ((mInByte(1) And &HF) * 4) + ((mInByte(2) And &HC0) / 64)
mOutByte(2) = tByte
tByte = (mInByte(2) And &H3F)
mOutByte(3) = tByte
For i = 0 To 3
If mOutByte(i) > = 0 And mOutByte(i) <= 25 Then
mOutByte(i) = mOutByte(i) + Asc( "A ")
ElseIf mOutByte(i) > = 26 And mOutByte(i) <= 51 Then
mOutByte(i) = mOutByte(i) - 26 + Asc( "a ")
ElseIf mOutByte(i) > = 52 And mOutByte(i) <= 61 Then
mOutByte(i) = mOutByte(i) - 52 + Asc( "0 ")
ElseIf mOutByte(i) = 62 Then
mOutByte(i) = Asc( "+ ")
Else
mOutByte(i) = Asc( "/ ")
End If
Next i
If Num = 1 Then
mOutByte(2) = Asc( "= ")
mOutByte(3) = Asc( "= ")
ElseIf Num = 2 Then
mOutByte(3) = Asc( "= ")
End If
End Sub
Public Function Base64Decode(InStr1 As String) As String
Dim mInByte(4) As Byte, mOutByte(3) As Byte
Dim i As Integer, LenArray As Integer, j As Integer
Dim myBArray() As Byte
Dim OutStr1 As String
Dim tmpArray() As Byte
myBArray() = StrConv(InStr1, vbFromUnicode)
LenArray = UBound(myBArray)
ReDim tmpArray(((LenArray + 1) / 4) * 3)
j = 0
For i = 0 To LenArray Step 4
If LenArray - i = 0 Then
Exit For
Else
mInByte(0) = myBArray(i)
mInByte(1) = myBArray(i + 1)
mInByte(2) = myBArray(i + 2)
mInByte(3) = myBArray(i + 3)
Base64DecodeByte mInByte, mOutByte, 4
End If
tmpArray(j * 3) = mOutByte(0)
tmpArray(j * 3 + 1) = mOutByte(1)
tmpArray(j * 3 + 2) = mOutByte(2)
j = j + 1
Next i
Base64Decode = BinaryToString(tmpArray)
End Function
Private Sub Base64DecodeByte(mInByte() As Byte, mOutByte() As Byte, ByteNum As Integer)
Dim tByte As Byte
Dim i As Integer
ByteNum = 0
For i = 0 To 3
If mInByte(i) > = Asc( "A ") And mInByte(i) <= Asc( "Z ") Then
mInByte(i) = mInByte(i) - Asc( "A ")
ElseIf mInByte(i) > = Asc( "a ") And mInByte(i) <= Asc( "z ") Then
mInByte(i) = mInByte(i) - Asc( "a ") + 26
ElseIf mInByte(i) > = Asc( "0 ") And mInByte(i) <= Asc( "9 ") Then
mInByte(i) = mInByte(i) - Asc( "0 ") + 52
ElseIf mInByte(i) = Asc( "+ ") Then
mInByte(i) = 62
ElseIf mInByte(i) = Asc( "/ ") Then
mInByte(i) = 63
Else ' "= "
ByteNum = ByteNum + 1
mInByte(i) = 0
End If
Next i
'取前六位
tByte = (mInByte(0) And &H3F) * 4 + (mInByte(1) And &H30) / 16
'0的六位和1的前兩位
mOutByte(0) = tByte
tByte = (mInByte(1) And &HF) * 16 + (mInByte(2) And &H3C) / 4
'1的後四位和2的前四位
mOutByte(1) = tByte
tByte = (mInByte(2) And &H3) * 64 + (mInByte(3) And &H3F)
mOutByte(2) = tByte
'2的後兩位和3的六位
End Sub
Private Function BinaryToString(ByVal BinaryStr As Variant) As String '二進制轉換為字元串
Dim lnglen As Long
Dim tmpBin As Variant
Dim strC As String
Dim skipflag As Long
Dim i As Long
skipflag = 0
strC = " "
If Not IsNull(BinaryStr) Then
lnglen = LenB(BinaryStr)
For i = 1 To lnglen
If skipflag = 0 Then
tmpBin = MidB(BinaryStr, i, 1)
If AscB(tmpBin) > 127 Then
strC = strC & Chr(AscW(MidB(BinaryStr, i + 1, 1) & tmpBin))
skipflag = 1
Else
strC = strC & Chr(AscB(tmpBin))
End If
Else
skipflag = 0
End If
Next
End If
BinaryToString = strC
End Function
Private Function StringToBinary(ByVal VarString As String) As Variant '字元串轉成二進制
Dim strBin As Variant
Dim varchar As Variant
Dim varasc As Long
Dim varlow, varhigh
Dim i As Long
strBin = " "
For i = 1 To Len(VarString)
varchar = Mid(VarString, i, 1)
varasc = Asc(varchar)
If varasc < 0 Then
varasc = varasc + 65535
End If
If varasc > 255 Then
varlow = Left(Hex(Asc(varchar)), 2)
varhigh = Right(Hex(Asc(varchar)), 2)
strBin = strBin & ChrB( "&H " & varlow) & ChrB( "&H " & varhigh)
Else
strBin = strBin & ChrB(AscB(varchar))
End If
Next
StringToBinary = strBin
End Function
2. 按鍵精靈的源代碼裡面可以打上備注嗎這樣方便修改。
跟其它編程語言是一樣的,都有注釋的符號用來備注內容,方便以後修改辨識解讀.
// 注釋一行內容.這符號後全部為注釋內容.可以單獨一行作為備注內容,也可以在代碼的最後使用.比如:
for 3//循環3次
'和//的作用一樣.
/*......*/這兩個符號之間的全部為注釋內容.主要用來注釋段落.
以上都符號是英文輸入
3. 計算機的原碼,反碼,補碼是怎麼回事可以舉例說明嗎
原碼、反碼和補碼是計算機中對數字二進制的三種表示方法。
1、原碼
原碼(true
form)是一種計算機中對數字的二進制定點表示方法。原碼表示法在數值前面增加了一位符號位(即最高位為符號位):正數該位為0,負數該位為1(0有兩種表示:+0和-0),其餘位表示數值的大小。
例如:用8位二進製表示一個數,+11的原碼為00001011,-11的原碼就是10001011。
2、反碼
反碼是數值存儲的一種,多應用於系統環境設置,如linux平台的目錄和文件的默認許可權的設置umask,就是使用反碼原理。反碼的表示方法是:正數的反碼與其原碼相同;負數的反碼是對正數逐位取反,符號位保持為1。
例如:
[+7]反=
0
0000111
B;
[-7]反=
1
1111000
B。
3、補碼
正數:正數的補碼和原碼相同。負數:負數的補碼則是符號位為「1」。並且,這個「1」既是符號位,也是數值位。數值部分按位取反後再在末位(最低位)加1。也就是「反碼+1」。
例如:
[+7]補=
0
0000111
B;
[-7]補=
1
1111001
B。
(3)源碼如何增加操作符號擴展閱讀
原碼、反碼、補碼的轉換方法如下:
(1)
已知原碼,求補碼。
例:已知某數X的原碼為10110100B,試求X的補碼和反碼。
首先通過原碼的首位確定該數字的正負,若為正數,反碼與原碼相同,補碼比原碼在末尾加1;若為負數,求其反碼時,符號位不變,數值部分按位求反;求其補碼時,再在其反碼的末位加1。
(2)已知補碼,求原碼。
按照求負數補碼的逆過程,數值部分應是最低位減1,然後取反。但是對二進制數來說,先減1後取反和先取反後加1得到的結果是一樣的,故仍可採用取反加1的方法。
參考資料來源:網路-反碼
參考資料來源:網路-補碼
參考資料來源:網路-原碼
4. 網頁中或源代碼注釋里那種用符號打出來的圖形是怎麼做的
特殊符號和其他地方一樣的打發,還有種特殊符號是 英文輸入法狀態輸入&,在可以顯示特殊符號的地方會顯示下面這些,前面是符號,後面是他的代碼
5. 源碼的書寫規則
Delphi 源碼格式書寫規范 學任何一門語言,都要注意源碼格式書寫規范.下面說說Delphi 源碼格式書寫規范.1.規范簡介
本規范主要規定Delphi源程序在書寫過程中所應遵循的規則及注意事項。編寫該規范的目的是使公司軟體開發人員的源代碼書寫習慣保持一致。這樣做可以使每一個組員都可以理解其它組員的代碼,以便於源代碼的二次開發記憶系統的維護。
2.一般格式規范
2.1縮進
縮進就是在當源程序的級改變時為增加可讀性而露出的兩個空格。縮進的規則為每一級縮進兩個空格。不準許使用Tab。因為Tab會因為用戶所作的設置不同而產生不同的效果。當遇到begin 或進入判斷、循環、異常處理、with語句、記錄類型聲明、類聲明等的時侯增加一級, 當遇到end或退出判斷、循環、異常處理、with語句、記錄類型聲明、類聲明等的時侯減少一級。例如:
if TmpInt <> 100 then
TmpInt := 100;
2.2 Begin..End
begin語句和end語句在源程序中要獨佔一行,例如:
for I := 0 to 10 do begin //不正確的用法
end;
for I := 0 to 10 do //正確的用法
begin
end;
2.3空格
在操作符及邏輯判斷符號的兩端添加空格,例如:I := I + 1;,a and b 等,但添加括弧時不需要空格。例如:if ( a > b ) then //錯誤的用法
If (a > b) then //正確的用法
又例如:procere Test(Param1: integer; Param3: string);
3. Object Pascal語法書寫格式規范
3.1保留字
Object Pascal 語言的保留字或關鍵詞應全部使用小寫字母。
3.2過程和函數
3.2.1命名及格式
過程和函數的名稱應全部使用有意義的單片語成,並且所有單詞的第一個字母應該使用大寫字母。例如:
procere formatharddisk;//不正確的命名
procere FormatHardDisk;//正確的命名
設置變數內容的過程和函數,應使用Set作為前綴,例如:
procere SetUserName;
讀取變數內容的過程和函數,應使用Get作為前綴,例如:
function GetUserName: string;
3.2.2 過程和函數的參數
3.2.2.1命名
統一類型的參數寫在同一句中:
procere Foo(Param1, Param2, Param3: Integer; Param4: string);
3.2.2.2命名
所有參數必須是有意義的;並且當參數名稱和其它屬性名稱重了的時候,加一個前綴'A', 例如:
procere SomeProc(AUserName: string; AUserAge: integer);
3.2.2.3命名沖突
當使用的兩個unit中包括一個重名的函數或過程時, 那幺當你引用這一函數或過程時,將執行在use 子句中後聲明的那個unit中的函數或過程。為了避免這種'uses-clause-dependent'需要在引用函數或過程時,寫完整函數或過程的出處。例如:
SysUtils.FindClose(SR);
Windows.FindClose(Handle);
3.3 變數
3.3.1 變數命名及格式
首先所有變數必須起有意義的名字,使其它組員可以很容易讀懂變數所代表的意義,變數命名可以採用同義的英文命名,可使用幾個英文單詞,但每一單詞的首字母必須大寫。例如:
var
WriteFormat::string;
同時對於一些特定類型可採用一定的簡寫如下:
指針類型
P 紀錄類型
Rec 數組類型
Arr 類
Class 循環控制變數通常使用單一的字元如:i, j, 或 k。 另外使用一個有意義的名字例如:UserIndex ,也是准許的。
3.3.2 局部變數
在過程中使用局部變數遵循所有其它變數的命名規則。
3.3.3 全局變數
盡量不使用全局變數,如必須使用全局變數則必須加前綴'g',同時應在變數名稱中體現變數的類型。例如:
gprecUserCount: point;//名稱為UserCount的全局變數,其類型為指向一結構的指針
但是在模塊內部可以使用全局變數。所有模塊內全局變數必須用'F'為前綴。如果幾個模塊之間需要進行資料交換,則需要通過聲明屬性的方法來實現。例如:
type
TFormOverdraftReturn = class(TForm)
private
{ Private declarations }
FuserName: string;
FuserCount: Integer;
Procere SetUserName(Value: string);
Function GetUserName: string;
public
{ Public declarations }
property UserName: string read GetUserName write SetUserName;
property UserCount: Integer read FuserCount write FuserCount;
end;
3.4類型
3.4.1 大小寫協議
保留字的類型名稱必須全部小寫。Win32 API 的類型通常全部大寫,對於其它類型則首字母大寫,其餘字母小寫,例如:
var
MyString: string; // reserved word
WindowHandle: HWND; // Win32 API type
I: Integer; // type identifier introced in System unit
3.4.2 浮點類型
盡量不使用 Real 類型,他只是為了和舊的Pascal代碼兼容,盡量使用Double 類型。Double 類型是對處理器和數據匯流排做過最優化的並且是IEEE定義的標准數據結構。當數值超出Double的范圍時,使用Extended 。但Extended不被Jave支持。但使用其它語言編寫的DLL時可能會使用Single 類型。
3.4.3 枚舉類型
枚舉類型的名字必須有意義並且類型的名字之前要加前綴'T'。枚舉類型的內容的名字必須包含枚舉類型名稱的簡寫,例如:
TSongType = (stRock, stClassical, stCountry, stAlternative, stHeavyMetal, stRB);
3.4.4 數組類型
數組類型的名字必須有意義並且類型的名字之前要加前綴'T'。如果聲明一個指向數組類型的指針必須在該類型的名字之前加前綴'P',例如:
type
PCycleArray = ^TCycleArray;
TCycleArray = array[1..100] of integer;
3.4.5記錄類型
記錄類型的名字必須有意義並且類型的名字之前要加前綴'T'。如果聲明一個指向數組類型的指針必須在該類型的名字之前加前綴'P',例如:
type
PEmployee = ^TEmployee;
TEmployee = record
EmployeeName: string
EmployeeRate: Double;
end;
3.5類
3.5.1 命名及格式
類的名字必須有意義並且類型的名字之前要加前綴'T'。例如:
type
TCustomer = class(TObject)
類實例的名字通常是去掉'T'的類的名字。例如:
var
Customer: TCustomer;
3.5.2 類中的變數
3.5.2.1命名及格式
類的名字必須有意義並且類型的名字之前要加前綴'F'。所有的變數必須是四有的。如果需要從外部訪問此變數則需要聲明一屬性
3.5.3 方法
3.5.3.1命名及格式
同函數和過程的命名及格式。
3.5.3.2 屬性訪問方法
所有的屬性訪問方法必須出現在private 或 protected 中。屬性訪問方法的命名同函數和過程的命名另外讀方法(reader method)必須使用前綴'Get'. 寫方法(writer method)必須使用前綴'Set'。寫方法的參數必須命名為'Value',其類型同所要寫的屬性相一致。例如:
TSomeClass = class(TObject)
private
FSomeField: Integer;
protected
function GetSomeField: Integer;
procere SetSomeField( Value: Integer);
public
property SomeField: Integer read GetSomeField write SetSomeField;
end;
3.6屬性
3.6.1 命名及格式
同其用操作的,出去前綴'F'的類的變數的名稱相一致 。
3.7文件
3.7.1項目文件
3.7.1.1項目目錄結構
程序主目錄--Bin(應用程序所在路徑)
-Db(本地資料庫所在路徑)
-Doc(文檔所在路徑)
-Hlp(幫助文件所在路徑)
-Backup(備份路徑)
-Tmp(臨時文件路徑)
3.7.1.2命名
項目文件必須使用一個有意義的名字。例如: Delphi中系統信息的項目文件被命名為 SysInfo.dpr。
3.7.2 Form 文件
3.7.2.1命名
同Form的名稱相一致:例如:Form的名稱為FormMain則Form文件的名稱就為FormMain.frm。
3.7.3 Data Mole 文件
3.7.3.1命名
data mole文件的命名應該有意義,並且使用'DM'作為前綴。例如: 用戶data mole 被命名為'DMCustomers.dfm'。
3.7.4 Remote Data Mole 文件
3.7.4.1 命名
remote data mole文件的命名應該有意義,並且使用'RDM'作為前綴。例如:用戶remote data mole 被命名為'RDMCustomers.dfm'。
3.7.5 Unit文件
3.7.5.1普通 Unit
3.7.5.1.1 Unit文件命名
unit文件的命名應該有意義,並且使用'unit'作為前綴。例如: 通用unit 被命名為'UnitGeneral'。
3.7.5.2 Form Units
3.7.5.2.1命名
Form unit 文件的名字必須和Form的名稱保持一致。例如:主窗體叫FormMain.pas 則Form Unit文件的名字為:UnitFormMain。
3.7.5.3 Data Mole Units
3.7.5.3.1命名
Data Mole unit 文件的名字必須和Data Mole的名稱保持一致。例如:主Data Mole叫DMMain.pas 則Data Mole Unit文件的名字為:UnitDMMain。
3.7.5.4 文件頭
在所有文件的頭部應寫上此文件的用途,作者,日期及輸入和輸出。例如:
{
修改日期:
作者:
用途:
本模塊結構組成:
}
3.7.6 Forms和Data Moles Forms
3.7.6.1 Form類
1. Form類命名標准
Forms類的命名應該有意義,並且使用'TForm'作為前綴。例如: About Form類的名字為:
TAboutForm = class(TForm)
主窗體的名字為
TMainForm = class(TForm)
2. Form類實例的命名標准
Form 的類實例的名字應同期掉'T'的Form類的名字相一致。例如:
Type Name
Instance Name TaboutForm
AboutForm TmainForm
MainForm TCustomerEntryForm
CustomerEntryForm
3.7.6.2 Data Moles Form
3.7.6.2.1. Data Mole Form 命名標准
Data Moles Forms類的命名應該有意義,並且使用'TDM'作為前綴。例如:
TDMCustomer = class(TDataMole)
TDMOrders = class(TDataMole)
3.7.6.2.2. Data Mole 實例命名標准
Data Mole Form 的類實例的名字應同期掉'T'的Data Mole Form類的名字相一致。例如:
Type Name
Instance Name TCustomerDataMole
CustomerDataMole TordersDataMole
OrdersDataMole 3.8控制項
3.8.1 控制項實例的命名
控制項的實例應使用去掉'T'該控制項類的名稱作為前綴,例如:
輸入用戶姓名的Tedit的名字為:EditUserName。
3.8.2 控制項的簡寫
控制項的名稱可使用以下簡寫,但所用簡寫於控制項名稱之間葯添加'_':
3.8.2.1 Standard Tab
mm TMainMenu
pm TPopupMenu
mmi TMainMenuItem
pmi TPopupMenuItem
lbl TLabel
edt TEdit
mem TMemo
btn TButton
cb TCheckBox
rb TRadioButton
lb TListBox
cb TComboBox
scb TScrollBar
gb TGroupBox
rg TRadioGroup
pnl TPanel
cl TCommandList
3.8.2.2 Additional Tab
bbtn TBitBtn
sb TSpeedButton
me TMaskEdit
sg TStringGrid
dg TDrawGrid
img TImage
shp TShape
bvl TBevel
sbx TScrollBox
clb TCheckListbox
spl TSplitter
stx TStaticText
cht TChart
3.8.2.3 Win32 Tab
tbc TTabControl
pgc TPageControl
il TImageList
re TRichEdit
tbr TTrackBar
prb TProgressBar
ud TUpDown
hk THotKey
ani TAnimate
dtp TDateTimePicker
tv TTreeView
lv TListView
hdr THeaderControl
stb TStatusBar
tlb TToolBar
clb TCoolBar
3.8.2.4 System Tab
tm TTimer
pb TPaintBox
mp TMediaPlayer
olec TOleContainer
ddcc TDDEClientConv
ddci TDDEClientItem
ddsc TDDEServerConv
ddsi TDDEServerItem
3.8.2.5 Internet Tab
csk TClientSocket
ssk TServerSocket
wbd TWebDispatcher
pp TPageProcer
tp TQueryTableProcer
dstp TDataSetTableProcer
nmdt TNMDayTime
nec TNMEcho
nf TNMFinger
nftp TNMFtp
nhttp TNMHttp
nMsg TNMMsg
nmsg TNMMSGServ
nntp TNMNNTP
npop TNMPop3
nuup TNMUUProcessor
smtp TNMSMTP
nst TNMStrm
nsts TNMStrmServ
ntm TNMTime
nudp TNMUdp
psk TPowerSock
ngs TNMGeneralServer
html THtml
url TNMUrl
sml TSimpleMail
3.8.2.6 Data Access Tab
ds TDataSource
tbl TTable
qry TQuery
sp TStoredProc
db TDataBase
ssn TSession
bm TBatchMove
usql TUpdateSQL
3.8.2.7 Data Controls Tab
dbg TDBGrid
dbn TDBNavigator
dbt TDBText
dbe TDBEdit
dbm TDBMemo
dbi TDBImage
dblb TDBListBox
dbcb TDBComboBox
dbch TDBCheckBox
dbrg TDBRadioGroup
dbll TDBLookupListBox
dblc TDBLookupComboBox
dbre TDBRichEdit
dbcg TDBCtrlGrid
dbch TDBChart
3.8.2.8 Decision Cube Tab
dcb TDecisionCube
dcq TDecisionQuery
dcs TDecisionSource
dcp TDecisionPivot
dcg TDecisionGrid
dcgr TDecisionGraph
3.8.2.9 QReport Tab
qr TQuickReport
qrsd TQRSubDetail
qrb TQRBand
qrcb TQRChildBand
qrg TQRGroup
qrl TQRLabel
qrt TQRText
qre TQRExpr
qrs TQRSysData
qrm TQRMemo
qrrt TQRRichText
qrdr TQRDBRichText
qrsh TQRShape
qri TQRImage
qrdi TQRDBMImage
qrcr TQRCompositeReport
qrp TQRPreview
qrch TQRChart
3.8.2.10 Dialogs Tab
OpenDialog TOpenDialog
SaveDialog TSaveDialog
OpenPictureDialog TOpenPictureDialog
SavePictureDialog TSavePictureDialog
FontDialog TFontDialog
ColorDialog TColorDialog
PrintDialog TPrintDialog
PrinterSetupDialog TPrintSetupDialog
FindDialog TFindDialog
ReplaceDialog TReplaceDialog
3.8.2.11 Win31 Tab
dbll TDBLookupList
dblc TDBLookupCombo
ts TTabSet
ol TOutline
tnb TTabbedNoteBook
nb TNoteBook
hdr THeader
flb TFileListBox
dlb TDirectoryListBox
dcb TDriveComboBox
fcb TFilterComboBox
3.8.2.12 Samples Tab
gg TGauge
cg TColorGrid
spb TSpinButton
spe TSpinEdit
dol TDirectoryOutline
cal TCalendar
ibea TIBEventAlerter
3.8.2.13 ActiveX Tab
cfx TChartFX
vsp TVSSpell
f1b TF1Book
vtc TVTChart
grp TGraph
3.8.2.14 Midas Tab
prv TProvider
cds TClientDataSet
qcds TQueryClientDataSet
dcom TDCOMConnection
olee TOleEnterpriseConnection
sck TSocketConnection
rms TRemoteServer
mid TmidasConnection
4.修改規范
本規則所做的規定僅適用於已經納入配置管理的程序。在這類修改中,要求保留修改前的內容、並標識出修改和新增的內容。並在文件頭加入修改人、修改日期、修改說明等必要的信息。
4.1修改歷史記錄
對源文件進行經過批準的修改時,修改者應在程序文件頭加入修改歷史項。在以後的每一次修改時,修改者都必須在該項目中填寫下列信息:
修改人
修改時間
修改原因
修改說明即如何修改
4.2新增代碼行
新增代碼行的前後應有注釋行說明。
// 修改人,修改時間,修改說明
新增代碼行
// 修改結束
4.3刪除代碼行
刪除代碼行的前後用注釋行說明。
//修改人,修改時間,修改說明
//要刪除的代碼行(將要刪除的語句進行注釋)
//修改結束
4.4修改代碼行
修改代碼行以刪除代碼行後在新增代碼行的方式進行。
//修改人,修改時間,修改說明
//修改前的代碼行
//修改結束
//修改後的代碼行
修改後的代碼行
//修改結束
6. 易語言源碼怎麼寫 教教我把 要打什麼符號 還有在么打網址上去一鍵就可以 打開網址
學習基礎吧!
不學的話,是學不好易語言的哦!
/* 下面是關於問題的回答 */
『Main
拖放一個編輯框控制項
拖放一個按鈕控制項
雙擊按鈕控制項
然後輸入以下代碼
打開指定網址(編輯框1.內容)
按快捷鍵F5運行程序
測試是否能編譯運行
如果能運行
在編輯框控制項中輸入你要打開的網址
然後按按鈕控制項,打開編輯框裡面的網址
按ESC鍵結束程序!
/*程序運行結束*/