vb程序设计将其中的小写字母转换为大写字母，大写字母转换为小写字母，其余非字母字符转换为*。在一个文本框中输入，马上进行判断和转换在另一个文本框内

0七天七世纪0 2023-07-22 09:33

• 

  0海绵和派大星0

  2023-07-22 10:32

  Private Sub Text1_KeyPress(KeyAscii As Integer)Select Case KeyAscii Case 65 To 90 Text2.Te意占含很次京较xt = Text2.Text & LCase(Chr(KeyAscii)) Case 97 To 122 Text2.Text = Text2.Text & UCase(Chr(KeyAsci最何苏神温我积显i)) Case Else Text2.Text = Text2.Text & "*" End SelectEnd Sub 答案补充 使用select case分支判断,效率比if...el地报se if效率高
  0 讨论(0)
  发布评论:

  提交评论

  ---

  •  加载中...