vb中Text2.Text = Text2.Text & y(c + 1) & x(k - 1 + i)

Text1.Text = ""Text2.Text = ""Open "G:\x.txt" For Input As #1 Do While Not EOF(1)Line Input #1, strs aa = aa + 1 If aa = 1 Then Text1.Text = Text1.Text + strs + ff If aa >= 3 Then Text2.Text = Text2.Text + strs + ff Loop Close #1 End Sub ...

dim strTmp as String strTmp=Text1.text Text1.text=Text2.text Text2.text=strTmp

回答：'本人写的代码只是提供一种思路并不完整,但可以实现 几几点几几 这种形式的转换,需要更全面的转换还得你自己研究修改代码,不好意思Public Sub change(k As Integer) If k = 1 Then Text2.Text = Text2.Text + "壹" If k = 2 Then Text2.Text = Text2.Text + "贰" If k = 3 ...

图2中的代码，表示当文本框1中输入字符时，文本框2中同步加入小写字母；文本框3中同步加入大写字母（非字母则不变）。

text2是一个文本框，text2.text指这个文本框中的文字。

能给你估计下了：1，从而造成变量C可能被赋值为大于10的数值、text1框中有a到F的字母、Val转化之后是单精度型的数，如果你的text中字符的长度小于是就是出错，建议在VAL前面价格CINT函数 2，这些字母会被认为是16进制的数一起被带入到程序中。3 再看看别人怎么说的。

有的话（比如是form2)就能直接在这个窗体里面处理了 private sub text2_keypress(keyascii as integer)if (text2.text= "43234"）then '你可以用一个文件保存这个密码，然后读入到一个字符串变量 ‘psw中，再做比较：if(text2.text =psw )then form1.label1.visible=true form2.hide end if e...

&在VB中是字符串连接 '' "双引号括起来的是字符串 没有括的是变量 而num是一个integer变量,由于没有带双引号 因此不是直接取其地址引用这个字符串 而是作为变量 先对其求值 再引用 简单的来说 就是 字符串是通过地址引用的 而双引号括起来的"字符串" 就是一个直接的地址 变量也是一个地...

才做同步动作 Form2.text2.Text = Text1.Text '这儿直接用第二个窗体的名子来调用 Exit Sub End If Next End Sub 如果变动比较频繁，这个效率可能比较低，如果你能保证2个窗体都始终存在，那可以去掉判断 Private Sub Text1_Change()Form2.text2.Text = Text1.Text End Sub ...

val就是将字符串转为数值型，如果不用val转换，你的a+b这种表达式就会被系统理解为两个字符串的合并，比如text1输入2，text2输入2，那a+b结果就是22而不是你要的4 要进行测试的话，你可以再添加一个commandbutton按钮，双击它加入下面代码 Private Sub Command2_Click()MsgBox Text1 + Text2 MsgB...