小编Bon*_*ond的帖子

获取列表框中的选定项

我是 VB6 的新手。当我按下Modify按钮时,我需要在列表框中获取所选项目以将其内容设置为文本框的文本。

Private Sub Modify_Click()
    List2.List(0) = Text3.Text
End Sub
Run Code Online (Sandbox Code Playgroud)

我需要从列表框中更改所选项目的索引 0。

在 VB.Net 中,我使用了以下语句,但是在 VB6 中,我不知道该怎么做。

val=ListBox2.SelectedItem.Value 
Run Code Online (Sandbox Code Playgroud)

vb6

3
推荐指数
1
解决办法
3万
查看次数

使用Swift在YouTube iOS Helper中禁用相关视频

我知道要禁用相关视频,我们需要?rel=0在YouTube URL的末尾添加。我的问题是如何在Swift中做到这一点?

  1. 我想不出一种方法来编辑HTML / JavaScript / Objective C文件来使其正常工作。

  2. 我不确定如何使用传递的参数,loadWithVideoId因为它总是无法编译。

有什么办法吗?

PS:我正在开发一个可以播放YouTube视频的iOS应用。我正在尝试禁用相关视频,并且使用YouTube-iOS-helper

youtube-api youtube-data-api swift

2
推荐指数
1
解决办法
1358
查看次数

计算包含文本的唯一值的数量

我有以下代码来计算包含字符串的列中的单元格数量"ABC-QR":

Ctr = Application.WorksheetFunction.CountIf(Sheet1.Range("D4:D1500"), "*ABC-QR*")
EU.Cells(16, 3) = Ctr
Run Code Online (Sandbox Code Playgroud)

"ABC-QR"之所以使用,是因为这是不会改变的数据部分.例如,这些单元格中的真实数据"ABC-QR00012345"或其可能具有的任何数字.我想修改我的代码,以便在计算时不包含重复项.

excel vba excel-vba

2
推荐指数
1
解决办法
517
查看次数

YouTube播放列表长度

我想知道是否有办法获得播放列表中的总视频数量.

我正在构建一个Python脚本,需要获取要循环播放的视频数量.或者,如果无法获取此信息,您能否在没有for循环的情况下为我提供一种方法?

youtube youtube-api

2
推荐指数
1
解决办法
3207
查看次数

VBScript运行时错误'800a01a8',需要对象:''使用WScript.Quit时

我将最后的部分放入VBScript页面,我想要处理的一件事是通过URL传入的变量是否为空.如果是这种情况,我希望页面停止运行并显示"必须登录"消息.

我有以下代码:

<%
If (Request.QueryString("nn") = "") Then
Response.Write "<p>You must be logged in to view content. <a href='http://URL/login?ReturnUrl=/interests'>Click here</a> to log in.</p>"
    WScript.Quit
End If
%>
Run Code Online (Sandbox Code Playgroud)

错误抛出线WScript.Quit.有任何想法吗?

vbscript asp-classic

2
推荐指数
1
解决办法
633
查看次数

迭代注册表项

我已经知道如何使用RegRead读取注册表值:

var WshShell = W.CreateObject("WScript.Shell");
var val = WshShell.RegRead("HKLM\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Audio\\EnableCaptureMonitor");
WScript.Echo(val);
Run Code Online (Sandbox Code Playgroud)

现在我想迭代某个注册表路径中的所有键。有任何想法吗?

wsh registrykey jscript

2
推荐指数
1
解决办法
1272
查看次数

当声明重复的命名函数时,Javascript如何执行代码?

我试图理解为什么执行语句声明重复函数会影响它.

就像JavaScript首先读取所有函数一样,无论放置/控制流如何,然后执行console.log表达式.例:

function Question(x, y) {
   this.getAnswer = function() {
  return 42;
  };
};

var tony = new Question('Stack','Overflow');
console.log(tony.getAnswer());   // 42, as expected.

// If the following 2 lines are uncommented, I get an error:
// function Question(x, y) { 
// };
Run Code Online (Sandbox Code Playgroud)

错误是:

未捕获的TypeError:tony.getAnswer不是函数

但是,当它运行console.log语句时,JavaScript如何知道它还不是一个函数,因为Person类直到后面的行才被覆盖console.log

javascript object

1
推荐指数
1
解决办法
2368
查看次数

直到循环输入框无限循环

我正在创建一个概率宏,用户可以在其中输入纸牌游戏中的玩家数量。如果我输入字符串 (ex, Joe)、非整数 (ex, 15.67) 或小于 0 的整数 (ex, -25),则 InputBox 应该循环。但是,大于 0 的整数应终止循环。(无论用户输入如何,我都必须强制杀死 Excel 以停止 InputBox。)

一旦输入大于 0 的整数,我希望 InputBox 关闭/退出 Sub。我在这里做错了什么?

Sub GenerateCards()
Players = InputBox("How many players? Please enter an integer.")
    Do Until TypeName(Players) = "Integer" And Players > 0 ' why does this loop even if both conditions are met (ex, Players=5?)
        Players = InputBox("How many players? Please enter an integer.")
    Loop
End Sub
Run Code Online (Sandbox Code Playgroud)

excel vba probability

1
推荐指数
1
解决办法
1535
查看次数

显示数字1到100的总和和平均值

我试图在C#中编写一个简单的程序来显示数字1到100的总和和平均值.输出应该看起来像......

the sum is 5050
the average is 50.5
Run Code Online (Sandbox Code Playgroud)

我似乎无法让它正常工作,返回值只返回总和而不是它之前的措辞,我已经尝试了其他方式来显示消息和总和,但他们不工作.我试图使用模型视图视图控制器方法,但无法理解我出错的地方以及如何让它显示上述结果.我的代码如下.

class SumAndAverage
{
    public float sum = 0;
    public float ave = 0;


    public float SumAndAve()
    {

        for (int i = 1; i <= 100; i++)
        {
            sum = sum + i;
            ave = sum / i;
        }

        return sum + ave;

    }

}
Run Code Online (Sandbox Code Playgroud)

}

class SumAndAverageController
{
    IView view;
    SumAndAverage sumAndAverage;
    public SumAndAverageController(IView theView, SumAndAverage theSumAndAverage){
    view = theView;
    sumAndAverage = theSumAndAverage;
}
    public void Go()
    {
        view.Start();
        //mAndAverage.SetNumber(view.GetString("Please …
Run Code Online (Sandbox Code Playgroud)

c#

-4
推荐指数
1
解决办法
2604
查看次数