諮詢VB案例設計,VB程式設計程式設計

發布 科技 2024-08-07
8個回答
  1. 匿名使用者2024-01-31

    老闆,你能公布你的電子郵件位址嗎? 直接發給你,就是像我這樣無聊的人會幫你做。 畢竟,你的積分真的少了一點。 這兩個程式更關注控制項的屬性設定。

    在 1 中,timer1 和 timer2 被啟用為 false

    multiline=true in text1 in 2 等。

    另請注意:2 在執行時輸入文字的字段用“空格”分隔。 例如,guocan vb 有兩個子段。

    答案是 1. dim t1, t2, h, ci as integer

    private sub form_click()

    trueline (-100, 0)-(100, 0)

    end sub

    private sub form_load()

    0ci = 1

    end sub

    private sub timer1_timer()

    t1 = t1 + 1

    100 / ci - t1

    if t1 = int(100 / ci) then

    falsetruet1 = 0

    ci = ci + 1

    end if

    if int(100 / ci) = 0 then = false

    clsprint

    end sub

    private sub timer2_timer()

    t2 = t2 + 1

    t2if t2 = int(100 / ci) then

    true false

    t2 = 0

    ci = ci + 1

    end if

    if int(100 / ci) = 0 then = false

    clsprint

    end sub

    答案 2. dim st(100) as string

    dim shu(100) as integer

    dim zf, stri as string

    dim t, max, k as integer

    private sub form_click()

    stri =

    for i = 1 to len(

    zf = mid(stri, i, 1)

    if asc(zf) = 32 then

    t = t + 1

    end if

    st(t) = st(t) +zf

    next i

    max = 0

    for i = 0 to t

    shu(i) = len(st(i))

    if max < shu(i) then max = shu(i): k = i

    next i

    print "角色是:" & st(k), "位元組數為:" & max

    end sub

  2. 匿名使用者2024-01-30

    15分? 我想沒有人能如此自由地幫助你獲得 15 分的那麼長 **。

  3. 匿名使用者2024-01-29

    您需要做的就是使用替換功能。

    格式:變數 = replace(源字串、要替換的內容、要替換的內容)。

    然後 msgbox 輸出此變數。

  4. 匿名使用者2024-01-28

    根據您的要求:

    設計乙個替換字元的程式,介面如圖所示。 在“原始字串”中輸入字串,在“指定字元”中輸入原始字串中包含的字串,在“替換為”中輸入指定字元的內容,單擊“替換”按鈕,將原始字串中的指定內容替換並連線到新字串中並顯示在“新字串”中。 單擊“退出”按鈕結束程式執行。

    生產完成,**如下:

  5. 匿名使用者2024-01-27

    private sub command1_click()static n as long, m as longm = val(text2)

    n = n + 1

    if text1 = "psw123" thenmsgbox "密碼正確", vbexclamation, "登入"

    n = 0else

    if n >= m then

    msgbox n & "如果您輸入了錯誤,請退出", vbexclamation, "登入"

    endelse

    msgbox "部分" & n & "二級密碼不正確,請重新輸入", vbexclamation, "登入"

    end if

    end if

    end sub

    private sub form_load()= "密碼:"

    允許使用密碼的次數:"

    還行" "登入"

    text1 = ""

    text2 = 3

    end sub

  6. 匿名使用者2024-01-26

    問題 2:

    x = 1if x = fix(x \ 2) *2 then msgbox "這是乙個偶數" else msgbox "這是乙個奇數"

  7. 匿名使用者2024-01-25

    VB 是 Visual Basic 程式語言。

    編寫電腦程式需要使用計算機程式語言。 計算機程式語言是人與計算機之間的橋梁。 就像人類語言一樣,有許多計算機程式語言。

    目前使用最廣泛的語言是“C++”、“Pascal”、“Basic”等。 在眾多計算機程式語言中,基本語言是最容易學習和使用的。

    Basic 是 Beginner's All Purpose Symbolic Instruction Code 的縮寫,意思是面向初學者的通用符號指令**,一直是程式設計入門的首選語言。

    1991年,Visual Basic(VB)問世,這是BASIC的第三代產品,它不僅繼承了BASIC語言易學易用的優點,還增加了圖形介面設計工具。 它簡化了編寫複雜視窗程式的過程,使程式設計師能夠更專注於解決問題的過程。

  8. 匿名使用者2024-01-24

    哦,我也不會,雞蛋很痛。

相關回答
4個回答2024-08-07

我已經發給大家了,記得選我了,看在廣大網友的份上,現在把原始檔貼上去吧。 >>>More

5個回答2024-08-07

private sub command1_click() '將文字框的內容新增到列表框中。 >>>More

8個回答2024-08-07

private sub command1_click()

dim i as long, n as long, gen as long, su() as long, s as long >>>More

7個回答2024-08-07

你的程式**迴圈結構,我不會再尷尬了,也幫不了你了。

7個回答2024-08-07

乙個簡單的計算器可以用一系列小部件製作。 >>>More