首頁(yè) 猿問(wèn) 我寫了case...

我寫了case isnumeric(text1.text) 可是好像不能這樣寫，請(qǐng)問(wèn)要怎么修改？

MySQL PHP

人到中年有點(diǎn)甜 2022-04-22 13:15:56

可是為什么它不運(yùn)行下面的語(yǔ)句塊？那要怎么修改？那個(gè)錯(cuò)誤的原因是什么？我寫的程序Private Sub Form_Click()Dim s$s = Text1.TextSelect Case sCase "a" To "z"Text2.Text = "它是小寫字母"Case "A" To "Z"Text2.Text = "它是大寫字母"Case IsNumeric(Text1.Text)Text2.Text = "它是數(shù)字"Case ElseText2.Text = "它是其他字符"End SelectEnd Sub

查看完整描述

1 回答

翻閱古今

TA貢獻(xiàn)1780條經(jīng)驗(yàn) 獲得超5個(gè)贊

因?yàn)镃ase語(yǔ)句中無(wú)法嵌套使用函數(shù)，Case必須保證后面的判斷類型與Select case的那個(gè)變量一致（既然你s是String，那么IsNumeric是布爾類型，當(dāng)然不可以。解決方法：1）用If……ElseIf代替Select Case。2）用Case "0" To "9"代替IsNumeric（但是只能適用于輸入一個(gè)數(shù)字）

反對(duì) 回復(fù) 2022-04-24