【正文】
me = Then Exit Sub On Error Resume Next Open Fname For Output As 1 If Err 0 Then 39。 文件名: amp。 對(duì)于未保存的新表格,用戶點(diǎn)擊“保存”命令,將自動(dòng)打開“另存為”對(duì)話框,這時(shí)要求用戶輸入保存路徑和文件名,實(shí)現(xiàn)以上功能的代碼如下:Public Sub Save_Click() 39。找回車符位置If K 0 Then C = Mid(S, I, K I)ElseIf I = Len(S) Then C = Mid(S, I, Len(S) I + 1)End If(J * + 1) = CJ = J + 1 39。設(shè)置當(dāng)前單元格 = K = 4 39。當(dāng)系統(tǒng)啟動(dòng)時(shí)觸發(fā)得分表Form_Load這個(gè)事件時(shí),系統(tǒng)將將把該控件進(jìn)行初始化設(shè)置,設(shè)置為21行,11列,其代碼如下: = 11 = 1 = 21 = 12其中一行為表頭,其余為20個(gè)選手,當(dāng)添加選手超過20行,表的行樹將會(huì)自動(dòng)擴(kuò)展。 Static I as Integer I = I + 1 If I Val() Then I = 0 = False = True Exit Sub 39。 CStr(Sum) 。校驗(yàn)錯(cuò),向該終端發(fā)重發(fā)命令 Exit Sub 39。不足5個(gè)字符則為錯(cuò)誤,不予處理N = 0For I = 1 To L – 1 39。 計(jì)算機(jī)采用中斷方式接收打分鍵盤發(fā)過來的數(shù)據(jù),當(dāng)每次通信過程中收到5個(gè)字符時(shí)引發(fā)OnComm事件,在OnComm事件過程中并沒有去接收數(shù)據(jù),而只是啟動(dòng)定時(shí)器Timer1。由于接收數(shù)據(jù)是隨機(jī)的,所以我們采用中斷方式接收,在程序中建立了一個(gè)該控件的MSComm1_OnComm的事件過程,并將其設(shè)置為當(dāng)收到第5個(gè)字符時(shí)開始中斷,打分中斷發(fā)送數(shù)據(jù)的格式為,終端編號(hào)4個(gè)字符,分?jǐn)?shù)可以是一到五個(gè)字符(含一個(gè)小數(shù)點(diǎn)),再加上1個(gè)字節(jié)累加和,所以每次通訊至少6個(gè)字符最多10個(gè)字符。白色 (I).Visible = True Next I If Option1 Then (10) = 總分 Else (10) = 平均分 End If = TrueEnd Sub在設(shè)置求分方法后,我們并沒有馬上計(jì)算總分或者是均分,而是把這個(gè)工作放在了Timer1_Timer這個(gè)事件中,Timer1_Timer將在以后說明。H80000000 39。其判斷語句為If Index = 1 Then = False End If End Sub通常情況下,要去掉一個(gè)最高分,一個(gè)最低分,然后計(jì)算最后得分,但本系統(tǒng)由于只有三個(gè)打分終端,因此無法實(shí)現(xiàn)上述功能。, 1. 主窗口部分“前一選手”和“下一選手”其實(shí)現(xiàn)功能的代碼如下。而第二個(gè)主要窗口是用來顯示各選手的成績表,在該窗口中可以對(duì)各位選手的成績進(jìn)行排序,并且可以按照預(yù)先設(shè)置好的記分方式來顯示各各裁判所打的分?jǐn)?shù),并且記錄他們的總分或者是平均分?jǐn)?shù)。競賽打分時(shí)通常要去掉一個(gè)最高分和一個(gè)最低分,剩余的取平均值或總和。(4) 打分終端數(shù)量 為了簡化硬件,本設(shè)計(jì)只制作了三個(gè)打分終端。為了簡化設(shè)計(jì),分值可為四位整數(shù)或小數(shù)?;谏鲜鋈N方式的優(yōu)缺點(diǎn),我們選用了第三種方式,即RS485總線方式。(3)采用總線結(jié)構(gòu)的串行通信方式。主機(jī)采用查詢方式讀取第個(gè)打分終端上的數(shù)據(jù)。4.打分系統(tǒng)競賽打分時(shí)通常有多個(gè)評(píng)委,每人一個(gè)終端,各個(gè)終端通過電纜與計(jì)算機(jī)相連,由計(jì)算機(jī)按照某種評(píng)分規(guī)則計(jì)算選手的最終得分,再顯示的大屏幕上。自從1991年推出以來,vb已經(jīng)成為最為流行的編程語言之一,vb即visual basic,visual是指可視化的編程方法,basic是指在原有basic語言的基礎(chǔ)上發(fā)展起來的編程語言,visial basci繼承了basic語言易學(xué)易用的特點(diǎn)。人們將這些過程稱作Windows API。代表產(chǎn)品有Intel公司的MCS51系列機(jī),Motorola公司的MC6801系機(jī),TI公司的TMS7000系列機(jī),此外,Rockwell,NS,GI和日本松下等公司也先后生產(chǎn)了自己的單片機(jī)系列.(4) 第四代單片機(jī)(1983年以后):這是十六位單片機(jī)和八位高性能單片機(jī)并行發(fā)展的時(shí)代,十六位機(jī)的特點(diǎn)是,工藝先進(jìn),集成度高和內(nèi)部功能強(qiáng),加法運(yùn)算速度可達(dá)到1uS以上,而且允許用戶采用面向工業(yè)控制的專用語言,如PL/MPLUS ,TI公司的TMS9900,NEC公司的783系列和NS公司的HPC16040等。1974 年,美國仙童(Firchild),結(jié)構(gòu)奇特,具有與眾不同的指令系統(tǒng),單片機(jī)開始迅速發(fā)展,應(yīng)用領(lǐng)域也在不斷擴(kuò)大。本評(píng)分系統(tǒng)操作簡單,實(shí)用性強(qiáng),是開展評(píng)委打分比賽的得力助手!本系統(tǒng)由計(jì)算機(jī)、打分終端、顯示終端等組成,采用總線結(jié)構(gòu),連線少、結(jié)構(gòu)簡單,便于擴(kuò)展。競賽評(píng)分系統(tǒng)按照時(shí)下流行的評(píng)委打分方式設(shè)計(jì),有比較完善的競賽評(píng)分功能。其角色的轉(zhuǎn)換也常常困擾著人們的認(rèn)識(shí)思路和研發(fā)目標(biāo)。關(guān)鍵字: Visual Basic 、串行通訊、競賽Abstract:The petition hits subsystem software is a simple informationreceive and the management system management system, regarding thissystem requirement function plete,