VB的TEXT1精度定义

如果你定义很多个变量的话,实现代码怎么着都不会简短的,可以用数组实现,下面代码可以参考一下：OptionExplicitDimgrp()AsStringPrivateSubForm_Load()ReD

PrivateSubCommand1_Click()'先判断为空时则出错IfText1=""ThenMsgBox"错误!"6,"系统错误"exitsubendifIfText1="111"ThenFo

PrivateSubCommand1_Click()  Dima AsString*100  a="da01564" &

&H表示16进制,所以data变量的值是text1.text表示的16进制数.比如text1.text是“1A”,data变量的值就是16进制数“1A”.

text1.SelStarttext1文本框中选中的文本的起始位置,如果没有选中任何文本,那就是光标所在位置text1.SelLengthtext1文本框中选中的文本的长度（字符数）,如果没有选中任何

1、""代表空格；2、chr(13)+chr(10)是ASCII的代码,加号是将两个字符“连接”；

无语第二个len(Text2.Text)=Len(Text2.Text)-1能赋值么?再问：那怎么改让Text1删一个字符text2也删一个再答：用函数(函数自己找，不多说)去掉他们值的最后一个字符，

现在的值是：fix（text1.text*2）你想要的是：d=val(text1.text)

没有区别,对于文本框来说,.Text是缺省属性,缺省属性可省略不写

1、&是字符串连接符.2、&H100,是十六进制100,转换为10进制：1*256+0*16+0=256.从左边算起,第1位+第2位*16+第3位*16^2+第4位*16^3……3、space()是指

代码很容易啊：Private Sub Command1_Click()If IsNumeric(Text1) = False Then&nb

Text1就相当于Text1.Text,.Text是文本框缺省属性,光写控件名,就相当于带缺省属性

可以这样简化,但意义似乎不大fora=0to20ifa=18thentext(a).forecolor=***endifnext再问：没看懂，解释一下好吗再答：汗……有哪里不懂呢？注释部分的英语意思是

DImAAsintegerDimB(1to10)AslongDimCAssingle

把这几个符号先存到数组里用随机函数PrivateSubForm_Load()DimS(1To4)AsStringDimaAsIntegerRandomizeS(1)="+":S(2)="-":S(3)

弹出式菜单,就像我们用鼠标右键弹出菜单一样.例如：object.popupMenumenunane,flags,x,y,boldcommandmenunane你定义的弹出式菜单名flag取0,4,8指

首先都是浮点数的类型,浮点就是小数点位置不确定,比如123.43,6557.521.在C语言中,一般单精度数据类型比如int,数据的范围是2的31次方,而双精度类型的整型比如longint的数据范围是

在应用程序所在的文件夹下打开一个名为text.txt的文件,并为文件分配一个编号为1的、供应用程序操作的文件句柄.文件打开以后只允许在文件尾部添加数据.

PrivateSubCommand1_Click()IfText2.Text=0ThenExitSubIfText1.Text/Text2.TextEndSu

你自己在VB的立即窗口测试一下：Print30000*2这样是会提示“溢出”的,改成下面这样：Print30000*2#'或者Print30000#*2就不会出错了.原理是30000和2两个数都是整型