當前位置:首頁 » 編程語言 » c語言程序設計英文

c語言程序設計英文

發布時間: 2023-09-14 18:38:15

Ⅰ C語言程序設計 (英文打字練習)

Option Explicit
Dim speed, right, wrong, keynum As Integer '定義速度,正確次數,錯誤次數,擊鍵次數
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Const SND_ASYNC = &H1
Dim rtn As LongSub letterInit() '初始化每個字母
lbl_letter.Caption = Chr(Int(Rnd * 26) + 97) '隨機產生字母,如果要產生大寫字母只要把97改成65即可
speed = Int(Rnd * 100 + 200)
lbl_letter.Left = Int(Rnd * (Form1.Width - lbl_letter.Width)) '隨機產生字母出現的位置
lbl_letter.Top = lbl_score.Height
End SubPrivate Sub Command1_Click()
letterInit
lbl_score.Caption = "成績: " & 0 & " 分" & " 錯誤: " & 0 & " 個" & " 正確率: " & 0 & "%"
Timer1.Enabled = True '啟動定時器
Timer2.Enabled = True
Timer1.Interval = 100
Timer2.Interval = 1000
'隱藏命令按鈕
Command1.Visible = False
Command2.Visible = False
lbl_time.Caption = 120 & " 秒"
End SubPrivate Sub Command2_Click()
Unload Me
End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)
keynum = keynum + 1 If Chr(KeyAscii) = lbl_letter.Caption Then '判斷所按鍵位是否與產生的字母相符
letterInit
rtn = sndPlaySound(App.Path & "\right.wav", SND_ASYNC)
right = right + 1
Else
rtn = sndPlaySound(App.Path & "\wrong.wav", SND_ASYNC)
wrong = wrong + 1
End If
lbl_score.Caption = "成績: " & right & "分" & " 錯誤: " & wrong & " 個" & " 正確率: " & Int(right / keynum * 100) & "%" If KeyAscii = 27 Then
Timer1.Enabled = False
Timer2.Enabled = False
lbl_score.BackColor = vbYellow
lbl_score.Caption = "成績: " & right & "分" & " 錯誤: " & wrong & " 個" & " 正確率: " & Int(right / keynum * 100) & "%" & " 按任意鍵繼續"
Else
lbl_score.BackColor = vbGreen
Timer1.Enabled = True
Timer2.Enabled = True
End If
End SubPrivate Sub Form_Load()
Form1.Left = (Screen.Width - Form1.Width) / 2
Form1.Top = (Screen.Height - Form1.Height) / 2
Form1.BorderStyle = 1
Form1.BackColor = vbBlack
Form1.Caption = "英文打字練習程序"
Command1.Default = True
Command1.Caption = "開始"
Command2.Caption = "退出"
'設置lbl_letter中顯示的字元的字體、樣式、字型大小,請同時調整lbl_letter的大小與字元大小相等
With lbl_letter.Font
.Name = "宋體"
.Size = 20
.Bold = True
End With
lbl_letter.ForeColor = vbYellow
lbl_letter.BackColor = Form1.BackColor
lbl_score.BackColor = vbGreen
lbl_score.Alignment = 0
lbl_score.Caption = "敲回車鍵開始打字練習,按ESC鍵暫停"
lbl_time.BackColor = lbl_score.BackColor
lbl_time.Alignment = 2
lbl_time.Caption = "時間120秒"
Timer1.Enabled = False
Timer2.Enabled = False
Randomize '初始化
End SubPrivate Sub Timer1_Timer()
lbl_letter.Top = lbl_letter.Top + speed
If lbl_letter.Top >= Form1.Height Then
letterInit
End If
End Sub Private Sub Timer2_Timer()
lbl_time.Caption = Val(lbl_time.Caption) - 1 & " 秒"
If Val(lbl_time.Caption) <= 0 Then '判斷時間是否已經用完
Timer1.Enabled = False
Timer2.Enabled = False
lbl_letter.Caption = ""
Select Case (right * (right / keynum))
Case Is <= 80
MsgBox "成績: 不及格! 不過別灰心,請多多練習!", vbOKOnly, "練習結束!"
Case Is <= 100
MsgBox "成績: 及格! 還要繼續加油努力啊!", vbOKOnly, "練習結束!"
Case Is <= 120
MsgBox "成績: 良!再加加油你就可以成為高手了!", vbOKOnly, "練習結束!"
Case Is >= 150
MsgBox "成績: 優秀! 太棒了,恭喜你再也不會為打字發愁了!", vbOKOnly, "練習結束!"
End Select Command1.Visible = True '命令按鈕恢復為可見狀態
Command2.Visible = True
right = 0
wrong = 0
keynum = 0
End If
End Sub哥哥幫你,對你好吧!也不搞點分來啊

編程語言用英語怎麼說

問題一:"編程"用英語怎麼說 編程
[詞典] programme; [醫] programming;
[例句]編程者似乎對大批量製造含暴力因素的產品處之漠然,毫無責任心。
Programme-makers seem irresponsibly insouciant about churning out violence.

問題二:編程序的英語翻譯 編程序用英語怎麼說 編程序
[詞典] program; programming; programing;
[例句]可編程序控制器在變頻器通信和控制中的應用
The application of PLC to the frequency converter's control and munication

問題三:」這個網站是用什麼語言開發的?「用英文怎麼說,感謝! 30分 This site is what kind of programming language development?

問題四:計算機編程語言c++用英語口語怎麼讀 C plus plus

問題五:為什麼編程一定要用英語,可以用其他語言嗎? 因為美國是這方面的領導者,所以用字母寫代碼。中國還有一個神奇的易語言,樓主要不要試試?

問題六:編程語言中的賦值號用英語怎麼讀 編程語言中的賦值號用英語是
equal
或者是is
讀作
一口

問題七:C語言程序設計用英語怎麼說 C語言程序設計 ( C Language Programming ) 絕對正確

問題八:電腦程序員用英語怎麼說? prog功ammer

puter programmer

developer

coder

由上至下,推薦度遞減

問題九:「我用C語言來編寫程序」英語怎麼說 i program with C language

問題十:編程語言中的「子函數」用英語怎麼說 子函數
基本翻譯
subfunction

Ⅲ 求問,C語言怎麼設計一個程序,輸入一個大寫字母,從這個字母開始,按順序輸入所有英文字母

#include <stdio.h>
void main()

{
char x;
printf("請輸入大寫賀困字母¸:\n");
scanf("%c",&x);
while(x>='A') //與A比較,未到A就繼續輸出,如果有皮瞎不明這一步,請去了解ASCII碼表中大寫字母的碼值.
{
printf("%c ",x); //強燃拍空制輸出字母
x--; //遞減,即D->C->B->A
}

}

熱點內容
滑板鞋腳本視頻 發布:2025-02-02 09:48:54 瀏覽:432
群暉怎麼玩安卓模擬器 發布:2025-02-02 09:45:23 瀏覽:557
三星安卓12彩蛋怎麼玩 發布:2025-02-02 09:44:39 瀏覽:743
電腦顯示連接伺服器錯誤 發布:2025-02-02 09:24:10 瀏覽:536
瑞芯微開發板編譯 發布:2025-02-02 09:22:54 瀏覽:146
linux虛擬機用gcc編譯時顯示錯誤 發布:2025-02-02 09:14:01 瀏覽:232
java駝峰 發布:2025-02-02 09:13:26 瀏覽:651
魔獸腳本怎麼用 發布:2025-02-02 09:10:28 瀏覽:532
linuxadobe 發布:2025-02-02 09:09:43 瀏覽:212
sql2000資料庫連接 發布:2025-02-02 09:09:43 瀏覽:726