VB面积计算器问题， VB问题， 一个计算器

这个计算器非常好，而且数字没有被过滤。 但请遵循您的思路：

因为当你按下符号时，你会清空它一次。 那么按 = 符号时的值应该是 n2private sub equal click（）if <>then

n2=val(

if c =0 then = str(n1 + n2)if c =1 then = str(n1-n2)if c =2 then = str(n1* n2)if c =3 then = str(n1/n2)endif

end sub

亲爱的同志，我是小学生，我不明白你在说什么。 但是我可以请一位老师告诉我做 **:p rivate sub command1 click（） 的计算器。

val( +val(

end sub

private sub command2_click()= val( -val(

end sub

private sub command3_click()= val( *val(

end sub

private sub command4_click()= val( / val(

end sub

private sub command5_click()= ""

end sub

private sub command6_click()endend sub

如果你不明白，告诉我，我会给你解释，如果你不喜欢，就不要回复我。

这是一个简单的计算器，最简单，没有 if 语句......

如果您想要实物，请告诉我您的电子邮件地址，谢谢您的合作。

private sub 开始计算 click（） 的值范围 pi = r = 输入圆的半径。

s = * r * rif 平方毫米，然后打印"圆的面积是"; s; "平方毫米"如果平方厘米，则打印"圆的面积是"; s; "平方厘米"如果是正方形，则打印"圆的面积是"; s; "平方米"如果平方公里，则打印"圆的面积是"; s; ;"平方公里";

如果不是（平方毫米或平方厘米或平方米或平方公里），则打印"请选择一个单位"

1.计算单位是唯一的，所以一定要使用单键，不能多键;

2.原始程序似乎没有计算半径的输入;

看看你的程序看起来不是VB，给你一个VB程序。

你们都在空中。

如果 = add，则此项目将直接转到 msgbox。

它应该后面跟着 elseif

有时需要 DIM，例如 a=a+1 和首字母 a=0

每次打开表单 a 时，它都会从 0 开始产生此效果。

这是一个需要的问题。

如果循环中需要初始化，例如，如果每个循环都需要将变量重置为 0，那么 dimvb 中没有指定哪个变量只能用于循环结构。

关键是要理解主题并使用适当的变量。

建议查看这两个陈述的定义。

static 是静态变量和数组变量的定义，dim 的定义称为自动变量。

static，每次引用时都会保留其值; 每次引用 dim 定义的变量时都会重新分配该变量。

由于 DIM 和 Static 具有不同的生命周期，因此 DIM 定义事件的结束和自动销毁。

另一方面，静态变量在程序结束时被销毁。

圆形结构中的变量需要重用，因此请使用 dim

答案：A

a 设置文本框不可输入，但可以显示。

b 设置要在文本框中输入的最大字符数。

c 设置文本框不可见，运行后隐藏。

d 设置文本框的宽度。

正确答案是：一个

enabled 表示是否启用。

maxlength 是最大长度。

visible 指示是否显示。

width 是宽度。